Metrics for Midpoint on a great circle

start0.0ms (0%)

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

analyze706.0ms (2.3%)

Memory

20.4MiB live, 1 108.2MiB allocated; 134ms 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.8s (18.6%)

Memory

263.9MiB live, 9 346.9MiB allocated; 3.0s collecting garbage

Samples

4.7s	4 434×	1	valid
680.0ms	3 818×	0	valid
2.0ms	4×	2	valid

Precisions

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

ival-cos: 2.5s (50.2% of total)

adjust: 1.1s (23% of total)

ival-sin: 549.0ms (11.1% of total)

ival-atan2: 349.0ms (7.1% of total)

ival-mult!: 305.0ms (6.2% of total)

ival-add!: 71.0ms (1.4% of total)

ival-sub!: 44.0ms (0.9% of total)

Bogosity

explain391.0ms (1.3%)

Memory

-12.6MiB live, 899.1MiB allocated; 32ms collecting garbage

FPErrors

Click to see full error table

Ground Truth	Overpredictions	Example	Underpredictions	Example	Subexpression
77	113	(5.8267805781488e-94 3.7542479238767997e+58 9.246648392319059e-74 4.1584679076741676e-48)	0	-	`(sin.f64 (-.f64 lambda1 lambda2))`
77	113	(5.8267805781488e-94 3.7542479238767997e+58 9.246648392319059e-74 4.1584679076741676e-48)	0	-	`(cos.f64 (-.f64 lambda1 lambda2))`
6	0	-	1	(1.4261722619547339e-101 -6.830982376111479e+114 1.4292315105847952e+300 3.015741312438773e+91)	`(+.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	190	0
`sin.f64`	`(sin.f64 (-.f64 lambda1 lambda2))`	sensitivity	190	0
`+.f64`	`(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))`	cancellation	2	1

Confusion

	Predicted +	Predicted -
+	6	0
-	184	66

Precision

0.031578947368421054

Recall

1.0

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	6	0	0
-	184	0	66

Precision?

0.031578947368421054

Recall?

1.0

Freqs

test

number	freq
0	66
2	188
3	2

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

242.0ms	384×	1	valid
17.0ms	128×	0	valid

Compiler

Compiled 186 to 46 computations (75.3% saved)

Precisions

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

ival-cos: 138.0ms (61.3% of total)

ival-sin: 34.0ms (15.1% of total)

adjust: 19.0ms (8.4% of total)

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

ival-mult!: 10.0ms (4.4% of total)

ival-add!: 5.0ms (2.2% of total)

ival-sub!: 4.0ms (1.8% of total)

preprocess36.0ms (0.1%)

Memory

3.7MiB live, 51.3MiB allocated; 1ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	95	314
1	219	313
2	422	313
3	940	313
4	2456	313
5	6076	313

Stop Event

1×	node-limit

Alt Table

Click to see full alt table

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

Symmetry

(abs phi1)

(abs phi2)

Compiler

Compiled 40 to 28 computations (30% saved)

series24.0ms (0.1%)

Memory

16.1MiB live, 63.2MiB allocated; 1ms 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
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	phi1	@	-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	lambda1	@	0	((+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) phi2 (sin (- lambda1 lambda2)) (- lambda1 lambda2) lambda2 (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (cos phi1) phi1 (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)))

rewrite203.0ms (0.7%)

Memory

5.6MiB live, 379.9MiB allocated; 22ms 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 (+.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)) (pow.f64 lambda1 #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 lambda1 lambda1 (-.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 2 binary64)) (.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) (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 2 binary64))) (-.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)) (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 lambda1 lambda1 (-.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 2 binary64)) (.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 (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 2 binary64)) (-.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 lambda1 lambda1 (-.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 2 binary64)) (.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 lambda1 lambda1 (-.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 2 binary64)) (.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 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) (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 (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 (/.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 (+.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))) (+.f64 (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)) (.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)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(/.f64 (neg.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)))) (neg.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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 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) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (.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 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.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 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (.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 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (.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))) (fma.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) (neg.f64 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 (neg.f64 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)) (neg.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)))) lambda1 (.f64 (cos.f64 lambda2) (cos.f64 phi2))) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (fma.f64 (fma.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 (neg.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)))) 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 (neg.f64 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)) (neg.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)))) lambda1 (.f64 (cos.f64 lambda2) (cos.f64 phi2))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 (fma.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 (neg.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)))) lambda1 (.f64 (cos.f64 lambda2) (cos.f64 phi2))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 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 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.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 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)) 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 (neg.f64 lambda1) (-.f64 (neg.f64 (/.f64 (atan2.f64 (.f64 (neg.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #s(literal 1 binary64))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (neg.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (neg.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2))) (cos.f64 phi2)))
#s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2))))
#s(approx (- lambda1 lambda2) (*.f64 (neg.f64 lambda1) (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (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 (neg.f64 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 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2))) lambda2 (.f64 (sin.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2) (.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) lambda2) (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1))) lambda2)) lambda2 (.f64 (sin.f64 lambda1) (cos.f64 phi2))))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))
#s(approx (- lambda1 lambda2) (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 (neg.f64 lambda2) (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (*.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 (fma.f64 (fma.f64 (.f64 (.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/24 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 (.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/720 binary64) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 phi2 phi2) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1)))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (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))

eval56.0ms (0.2%)

Memory: 14.2MiB live, 114.4MiB allocated; 5ms collecting garbage
Compiler: Compiled 7 097 to 1 151 computations (83.8% saved)

prune19.0ms (0.1%)

Memory

6.1MiB live, 53.8MiB allocated; 1ms collecting garbage

Pruning

29 alts after pruning (29 fresh and 0 done)

	Pruned	Kept	Total
New	191	29	220
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	192	29	221

Accuracy

99.2%

Counts

221 → 29

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	66.7%	(/.f64 (-.f64 (.f64 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 2 binary64))) (-.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)))))
▶	52.3%	(/.f64 (+.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)) (pow.f64 lambda1 #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))))
▶	98.8%	(+.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))))))
▶	29.3%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	91.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)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
▶	98.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (+.f64 (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)) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))))))
▶	91.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)) (-.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 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))))
▶	98.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	98.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (.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 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))))))
▶	98.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.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))))) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	82.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (sin.f64 (+.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	98.9%	(+.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)))))))
▶	98.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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)))))))
▶	98.5%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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)))))))
▶	98.3%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))))))
▶	98.3%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
▶	79.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	80.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	77.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	77.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
▶	98.3%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
▶	79.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
▶	89.5%	(+.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))))))
▶	98.3%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	77.6%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	77.6%	(+.f64 lambda1 (atan2.f64 #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)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	80.9%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	98.8%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1))
▶	52.3%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)

Compiler

Compiled 994 to 599 computations (39.7% saved)

series633.0ms (2%)

Memory

-8.0MiB live, 1 388.5MiB allocated; 133ms collecting garbage

Counts

197 → 1 149

Calls

Call 1

Inputs
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
lambda1
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1))
(.f64 (+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1)
(+.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 (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))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda2
(cos.f64 phi2)
phi2
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 phi1)
phi1
#s(literal 1 binary64)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 lambda1 (atan2.f64 #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)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 #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)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.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))))
(fma.f64 (.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
(.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64))
(*.f64 phi2 phi2)
#s(literal -1/2 binary64)
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))
(fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))
(cos.f64 lambda2)
(neg.f64 (sin.f64 lambda2))
(sin.f64 lambda2)
(+.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))))))
(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 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2))))
(sin.f64 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)))
#s(approx (- lambda1 lambda2) (*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))
(/.f64 lambda1 lambda2)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (cos phi1) #s(literal 1 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (cos.f64 phi1) #s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))
(*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2))))))
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))))
(*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2))))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))
(fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2))
(neg.f64 lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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)))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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))))))
(+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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)))))
(.f64 (cos.f64 phi2) #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 (.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64)) (neg.f64 (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)))
(fma.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64)) (neg.f64 (sin.f64 lambda2))) lambda1 (cos.f64 lambda2))
(-.f64 (.f64 (.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64)) (neg.f64 (sin.f64 lambda2)))
(.f64 (.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64))
(*.f64 (cos.f64 lambda2) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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)))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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))))))
(+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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)))))
(.f64 (cos.f64 phi2) #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 (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)))
(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))
(-.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)))
(.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)
(fma.f64 (.f64 #s(literal 1/6 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))
(*.f64 #s(literal 1/6 binary64) lambda1)
#s(literal 1/6 binary64)
(*.f64 #s(literal -1/2 binary64) (cos.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 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))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(sin.f64 lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (sin.f64 (+.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (sin.f64 (+.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (cos.f64 phi1) (*.f64 (sin.f64 (+.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (sin.f64 (+.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (+.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.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))))) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.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))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (cos.f64 phi1) (.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))))) (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))))) (cos.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 (cos.f64 phi2) (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 3 binary64)) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (.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 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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 3 binary64)) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (.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 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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 3 binary64)) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (.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 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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 3 binary64)) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(pow.f64 (cos.f64 phi1) #s(literal 3 binary64))
#s(literal 3 binary64)
(fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (.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 2 binary64)) (.f64 (cos.f64 phi1) (*.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 (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 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(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 phi1)
(*.f64 (cos.f64 phi1) (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 (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 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)) (-.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 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 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(-.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 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 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (+.f64 (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)) (.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 (+.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))) (+.f64 (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)) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))))
(/.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))) (+.f64 (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)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))))
(+.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)))
(+.f64 (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)) (.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 (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 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 (cos.f64 phi2) (sin.f64 (/.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))))))
(sin.f64 (/.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 (-.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 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))
(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)))
(fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda2))
(*.f64 lambda1 lambda2)
(+.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)))
(/.f64 (+.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)) (pow.f64 lambda1 #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))))
(+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))
(pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64))
(+.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) 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 2 binary64))
(-.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 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 (-.f64 (.f64 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 2 binary64))) (-.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 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 2 binary64)))
(-.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
#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 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) 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))) lambda1) 1) 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))) lambda1) 1) #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))) lambda1) 1) #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))) lambda1) #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))) #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 (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 (+ (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 (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (neg lambda2)) (* -1/2 (* (pow phi2 2) (sin (neg lambda2)))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (neg lambda2)) (+ (* -1/2 (* (pow phi2 2) (sin (neg lambda2)))) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* (pow phi2 2) (cos (neg lambda2))))))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (neg lambda2)) (+ (* -1/2 (* (pow phi2 2) (sin (neg lambda2)))) (* lambda1 (+ (cos (neg lambda2)) (+ (* -1/2 (* (pow phi2 2) (cos (neg lambda2)))) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* 1/4 (* (pow phi2 2) (sin (neg lambda2)))))))))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (neg lambda2)) (+ (* -1/2 (* (pow phi2 2) (sin (neg lambda2)))) (* lambda1 (+ (cos (neg lambda2)) (+ (* -1/2 (* (pow phi2 2) (cos (neg lambda2)))) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (+ (* 1/4 (* (pow phi2 2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/6 (cos (neg lambda2))) (* 1/12 (* (pow phi2 2) (cos (neg lambda2))))))))))))))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (- (* lambda1 (cos lambda2)) (sin lambda2))))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) #s(hole binary64 (* -1 lambda2)))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) #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 lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (cos phi2))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* -1/2 (* (pow lambda1 2) (cos phi2)))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda1 2) (cos phi2)))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (cos phi2))) (* 1/24 (cos phi2))))))))))
#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 (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (cos (neg lambda2))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* 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)) 1) #s(hole binary64 (+ 1 (+ (* 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 (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (cos lambda2)))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (neg lambda1) #s(hole binary64 (* -1 lambda1)))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (cos lambda2)))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (sin lambda2)))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
#s(approx (* (* (cos lambda2) lambda1) -1/2) #s(hole binary64 (* -1/2 (* lambda1 (cos lambda2)))))
#s(approx (* (cos lambda2) lambda1) #s(hole binary64 (* lambda1 (cos lambda2))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (cos lambda2)))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))))))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (sin lambda2)))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ (sin lambda2) (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))))))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) #s(hole binary64 (* -1/2 (* lambda1 (cos lambda2)))))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) #s(hole binary64 (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2)))))))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) #s(hole binary64 (* -1/2 (cos lambda2))))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) #s(hole binary64 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))))
#s(approx (* 1/6 lambda1) #s(hole binary64 (* 1/6 lambda1)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (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 (+ (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 (sin lambda1) #s(hole binary64 lambda1))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* -1/6 (pow lambda1 2))))))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* (pow lambda1 2) (- (* 1/120 (pow lambda1 2)) 1/6))))))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/120 (* -1/5040 (pow lambda1 2)))) 1/6))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* -1 (* lambda1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* 1/6 (* lambda1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* 1/6 (* lambda1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* -1 (* 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))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/2 (* 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))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* 1/6 (* 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))))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (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)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* 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)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/2 (* 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)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* 1/6 (* 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)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (/ (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))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (/ (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))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (/ (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (/ (* (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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 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) (- (* -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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) 2)) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) 3))) (+ (/ (* (- (* -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) (- (* -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 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)) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 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))))))) (/ (* (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 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) (- (* -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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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)))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) 2)) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (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) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (* (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (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)))))))) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) 3))) (+ (/ (* (- (* -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)))))) (+ (/ (* (- (* -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) (- (* -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) (* (pow (cos (neg lambda2)) 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))))) (- (+ (* (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) (- (* -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 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)) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 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))))))))) (/ (* (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))))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) 2)) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) 3))) (+ (/ (* (- (* -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) (- (* -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 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)) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 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))))))) (/ (* (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 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) (- (* -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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* -1 (/ (* lambda1 (* (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 phi1) 3) (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) 2)) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (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))))) (/ (* (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 phi1) 3) (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (/ (* (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) 2)) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (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) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (* (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (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)))))))) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) 2)) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (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))))) (/ (* (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 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 phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (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))) (* -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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (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))))) (* 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 (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #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))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (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))) (* -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))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (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))))) (* 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))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (* (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))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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) (- (* -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)))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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)))))) (+ (/ (* (- (* -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) (- (* -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) (* (pow (cos (neg lambda2)) 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))))) (/ (* (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) (- (* -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)))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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)))))) (+ (/ (* (- (* -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)))))) (+ (/ (* (- (* -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) (- (* -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) (* (pow (cos (neg lambda2)) 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))))) (- (+ (* (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) (- (* -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) (* (pow (cos (neg lambda2)) 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)))))) (/ (* (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))))))) (+ (/ (* (- (* -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) (- (* -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) (* (pow (cos (neg lambda2)) 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))))) (/ (* (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) (- (* -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)))))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) #s(hole binary64 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (neg lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (neg lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (neg lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (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 phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (neg lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (/ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (/ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (/ (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda1 (- (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* lambda1 (- (+ (* 1/2 (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (+ (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* lambda1 (- (+ (* 1/2 (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* lambda1 (- (+ (* -1/6 (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (+ (* 1/2 (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (* -1/2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (+ (* -1/6 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (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)))))))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (+ (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* -1 (/ (* lambda1 (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (* -1/2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (* -1/6 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (+ (* 1/2 (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (+ (* lambda1 (- (/ (* (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 (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (+ (* 1/2 (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (* 1/2 (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (pow (cos phi1) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (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 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))))
#s(approx (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #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 (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (sin (* -1 lambda2)))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda1 (* (cos phi2) (cos (* -1 lambda2)))) (* (cos phi2) (sin (* -1 lambda2))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (* -1 lambda2))))) (* (cos phi2) (cos (* -1 lambda2))))) (* (cos phi2) (sin (* -1 lambda2))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (* -1 lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (* -1 lambda2))))))) (* (cos phi2) (cos (* -1 lambda2))))) (* (cos phi2) (sin (* -1 lambda2))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (sin (* -1 lambda2))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (sin (* -1 lambda2)) (* lambda1 (cos (* -1 lambda2))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (sin (* -1 lambda2)) (* lambda1 (+ (cos (* -1 lambda2)) (* -1/2 (* lambda1 (sin (* -1 lambda2)))))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (sin (* -1 lambda2)) (* lambda1 (+ (cos (* -1 lambda2)) (* lambda1 (+ (* -1/2 (sin (* -1 lambda2))) (* -1/6 (* lambda1 (cos (* -1 lambda2)))))))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* -1 lambda2)))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (* -1 (pow lambda2 3))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (- (pow lambda1 3) (pow lambda2 3))))
#s(approx (pow lambda1 3) #s(hole binary64 (pow lambda1 3)))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (pow lambda2 2)))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 lambda2) (pow lambda2 2))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ lambda1 lambda2)) (pow lambda2 2))))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) #s(hole binary64 (pow lambda2 2)))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) #s(hole binary64 (+ (* lambda1 lambda2) (pow lambda2 2))))
#s(approx (* lambda1 lambda2) #s(hole binary64 (* 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 (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 (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 3)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) #s(hole binary64 (+ (pow lambda1 3) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 3))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 3)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (+ (* -1 (* lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (+ (* lambda1 (- lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) #s(hole binary64 (* -1 (* lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) #s(hole binary64 (* lambda1 (- lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (* lambda1 lambda1) #s(hole binary64 (pow lambda1 2)))
#s(approx (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) #s(hole binary64 (* lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (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 (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) #s(hole binary64 (* -1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2))))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) #s(hole binary64 (- (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2))))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) #s(hole binary64 (* -1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) #s(hole binary64 (- lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #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))) lambda1) 1) lambda1) #s(hole binary64 lambda1))
#s(approx (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) 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))) lambda1) 1) #s(hole binary64 1))
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) #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 (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (- lambda1 lambda2)))))
#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 (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (* lambda1 (cos lambda2))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (* lambda1 (+ (cos lambda2) (* -1 (/ (sin lambda2) lambda1))))))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) #s(hole binary64 lambda1))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) #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 lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (cos phi2)))))
#s(approx (cos lambda1) #s(hole binary64 (cos lambda1)))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (* lambda1 (sin lambda2))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1)))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* -1/2 (* (pow lambda1 2) (cos lambda2)))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (/ (sin lambda2) lambda1)))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (+ (/ (cos lambda2) (pow lambda1 2)) (/ (sin lambda2) lambda1))))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (* -1/2 (* lambda1 (cos lambda2)))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (* lambda1 (+ (* -1/2 (cos lambda2)) (/ (sin lambda2) lambda1)))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* -1/6 (* (pow lambda1 3) (sin lambda2)))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* (pow lambda1 3) (+ (* -1/2 (/ (cos lambda2) lambda1)) (* -1/6 (sin lambda2))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* (pow lambda1 3) (+ (* -1/2 (/ (cos lambda2) lambda1)) (+ (* -1/6 (sin lambda2)) (/ (sin lambda2) (pow lambda1 2)))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* (pow lambda1 3) (+ (* -1/2 (/ (cos lambda2) lambda1)) (+ (* -1/6 (sin lambda2)) (+ (/ (cos lambda2) (pow lambda1 3)) (/ (sin lambda2) (pow lambda1 2))))))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (* -1/6 (* (pow lambda1 2) (sin lambda2)))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1/2 (/ (cos lambda2) lambda1)) (* -1/6 (sin lambda2))))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1/2 (/ (cos lambda2) lambda1)) (+ (* -1/6 (sin lambda2)) (/ (sin lambda2) (pow lambda1 2)))))))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) #s(hole binary64 (* -1/6 (* (pow lambda1 2) (sin lambda2)))))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) #s(hole binary64 (* (pow lambda1 2) (+ (* -1/2 (/ (cos lambda2) lambda1)) (* -1/6 (sin lambda2))))))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) #s(hole binary64 (* -1/6 (* lambda1 (sin lambda2)))))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) #s(hole binary64 (* lambda1 (+ (* -1/2 (/ (cos lambda2) lambda1)) (* -1/6 (sin lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 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 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) 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 (sin lambda1) #s(hole binary64 (sin lambda1)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) lambda1)))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))) lambda1)))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (- lambda1 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)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (/ (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (/ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (/ (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (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 phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) #s(hole binary64 (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))) lambda1)))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) lambda1)))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (pow (cos phi1) 2) (- (cos phi1) (* (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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (* (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 (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (pow (cos phi1) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (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 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 lambda1))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* lambda1 (- (+ 1 (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda2 2)) (pow lambda1 2)))) (/ lambda2 lambda1)))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* lambda1 (- (+ 1 (/ (* lambda2 (+ (* -1 (pow lambda2 2)) (pow lambda2 2))) (pow lambda1 3))) (+ (* -1 (/ (pow lambda2 2) (pow lambda1 2))) (+ (/ lambda2 lambda1) (/ (pow lambda2 2) (pow lambda1 2))))))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (pow lambda1 3)))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (* (pow lambda1 3) (+ 1 (* -1 (/ (pow lambda2 3) (pow lambda1 3)))))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (pow lambda1 2)))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (* (pow lambda1 2) (+ 1 (/ lambda2 lambda1)))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (* (pow lambda1 2) (+ 1 (+ (/ lambda2 lambda1) (/ (pow lambda2 2) (pow lambda1 2)))))))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) #s(hole binary64 (* lambda1 lambda2)))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) #s(hole binary64 (* lambda1 (+ lambda2 (/ (pow lambda2 2) 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))
#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 (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 lambda1))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (* lambda1 (- (+ 1 (* -1 (/ (+ (* -1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)) (pow lambda1 2)))) (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (* lambda1 (- (+ 1 (* -1 (/ (* (+ (* -1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (pow lambda1 3)))) (+ (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) (+ (* -1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2))) (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2))))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) #s(hole binary64 (pow lambda1 3)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) #s(hole binary64 (* (pow lambda1 3) (+ 1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 3) (pow lambda1 3))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (pow lambda1 2)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (* (pow lambda1 2) (- (+ 1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2))) (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) #s(hole binary64 (pow lambda1 2)))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))))))
#s(approx (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) #s(hole binary64 lambda1))
#s(approx (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) #s(hole binary64 (pow lambda1 2)))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)))))))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) #s(hole binary64 lambda1))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #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))) lambda1) 1) 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))) lambda1) 1) #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))) lambda1) #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))) #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 (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 (+ (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 (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (neg (+ lambda2 (* -1 lambda1)))) (* -1/2 (* (pow phi2 2) (sin (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (cos lambda2)) (/ (sin lambda2) lambda1))))))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) #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 (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1)))))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (/ (sin lambda2) lambda1)) (* 1/2 (cos lambda2)))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* -1 (* (pow lambda1 3) (+ (* 1/6 (sin lambda2)) (* 1/2 (/ (cos lambda2) lambda1)))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* -1 (* (pow lambda1 3) (+ (* -1 (/ (+ (* -1/2 (cos lambda2)) (/ (sin lambda2) lambda1)) lambda1)) (* 1/6 (sin lambda2)))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* -1 (* (pow lambda1 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) lambda1)) (* 1/6 (sin lambda2)))))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (/ (sin lambda2) lambda1)) (* 1/2 (cos lambda2))) lambda1)) (* -1/6 (sin lambda2))))))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) #s(hole binary64 (* -1 (* lambda1 (+ (* 1/6 (sin lambda2)) (* 1/2 (/ (cos lambda2) lambda1)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI))))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 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)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) #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 phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))) (/ (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))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (/ (* (pow (cos phi2) 3) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 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)))))))) (/ (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (/ (* (pow (cos phi2) 3) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 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)))))))) (/ (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (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 phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (* (pow (cos phi2) 3) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 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 (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) #s(hole binary64 (* (pow (cos phi2) 3) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 3))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (* (cos (* 1/2 (PI))) (sin phi1))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (/ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (/ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (/ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (pow (cos phi1) 2) (- (cos phi1) (* (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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ (* (pow (cos phi2) 3) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 3)) (pow (cos phi1) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (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 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (sin (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (sin (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (+ (* -1 lambda2) (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda2 2)) lambda1))) lambda1)) 1)))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (+ (* -1 lambda2) (* -1 (/ (+ (* -1 (/ (* lambda2 (+ (* -1 (pow lambda2 2)) (pow lambda2 2))) lambda1)) (+ (* -1 (pow lambda2 2)) (pow lambda2 2))) lambda1))) lambda1)) 1)))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (* -1 (* (pow lambda1 3) (- (/ (pow lambda2 3) (pow lambda1 3)) 1)))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -1 (/ (+ (* -1 lambda2) (* -1 (/ (pow lambda2 2) lambda1))) lambda1))))))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 lambda2) (* -1 (/ (pow lambda2 2) 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 (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 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 (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (- (+ (* -1 (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2) lambda1)) (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2) lambda1)) (* -1 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))) lambda1)) 1)))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (- (* -1 (/ (- (* -1 (/ (* (+ (* -1 (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2)) (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2)) (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))) lambda1)) (+ (* -1 (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2)) (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2))) lambda1)) (* -1 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))) lambda1)) 1)))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) #s(hole binary64 (* -1 (* (pow lambda1 3) (- (* -1 (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 3) (pow lambda1 3))) 1)))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 3)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -1 (/ (- (* -1 (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2) lambda1)) (* -1 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))) lambda1))))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2)))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -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))) lambda1) #s(hole binary64 (* lambda1 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))))
#s(approx (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -1 (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2) (pow lambda1 2)))))))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) #s(hole binary64 (* -1 (* lambda1 (- (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1) 1)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin lambda1)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx lambda2 #s(hole binary64 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 (+ (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 (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin lambda1) (* -1/2 (* (pow phi2 2) (sin lambda1))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin lambda1) (+ (* -1/2 (* (pow phi2 2) (sin lambda1))) (* lambda2 (+ (* -1 (cos lambda1)) (* 1/2 (* (pow phi2 2) (cos lambda1)))))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin lambda1) (+ (* -1/2 (* (pow phi2 2) (sin lambda1))) (* lambda2 (+ (* -1 (cos lambda1)) (+ (* 1/2 (* (pow phi2 2) (cos lambda1))) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/4 (* (pow phi2 2) (sin lambda1))))))))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin lambda1) (+ (* -1/2 (* (pow phi2 2) (sin lambda1))) (* lambda2 (+ (* -1 (cos lambda1)) (+ (* 1/2 (* (pow phi2 2) (cos lambda1))) (* lambda2 (+ (* -1/2 (sin lambda1)) (+ (* 1/4 (* (pow phi2 2) (sin lambda1))) (* lambda2 (+ (* -1/12 (* (pow phi2 2) (cos lambda1))) (* 1/6 (cos lambda1))))))))))))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 lambda1))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ lambda1 (* lambda2 (- (* -1/2 (* lambda1 lambda2)) 1)))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)))))
#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 (neg (sin lambda2)) #s(hole binary64 (* -1 lambda2)))
#s(approx (neg (sin lambda2)) #s(hole binary64 (* lambda2 (- (* 1/6 (pow lambda2 2)) 1))))
#s(approx (neg (sin lambda2)) #s(hole binary64 (* lambda2 (- (* (pow lambda2 2) (+ 1/6 (* -1/120 (pow lambda2 2)))) 1))))
#s(approx (neg (sin lambda2)) #s(hole binary64 (* lambda2 (- (* (pow lambda2 2) (+ 1/6 (* (pow lambda2 2) (- (* 1/5040 (pow lambda2 2)) 1/120)))) 1))))
#s(approx (sin lambda2) #s(hole binary64 lambda2))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* -1/6 (pow lambda2 2))))))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* (pow lambda2 2) (- (* 1/120 (pow lambda2 2)) 1/6))))))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/120 (* -1/5040 (pow lambda2 2)))) 1/6))))))
#s(approx (- (/ lambda1 lambda2) 1) #s(hole binary64 (/ (+ lambda1 (* -1 lambda2)) lambda2)))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (cos phi2))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* -1/2 (* (pow lambda2 2) (cos phi2)))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda2 2) (cos phi2)))))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (cos phi2))) (* 1/24 (cos phi2))))))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos lambda1) (cos phi2)))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* 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 (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 1))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (+ 1 (* lambda1 lambda2))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2))))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (+ 1 (* lambda2 (+ lambda1 (* lambda2 (- (* -1/6 (* lambda1 lambda2)) 1/2)))))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ 1 (* -1/2 (pow lambda1 2)))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda1 lambda2)))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ lambda1 (* lambda2 (- (* 1/4 (pow lambda1 2)) 1/2))))))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ lambda1 (* lambda2 (- (+ (* -1/6 (* lambda1 lambda2)) (* 1/4 (pow lambda1 2))) 1/2))))))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (* -1/2 lambda1)))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (+ lambda2 (* -1/2 lambda1))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ 1 (* 1/4 (* lambda1 lambda2)))))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ 1 (* lambda2 (+ (* -1/6 lambda2) (* 1/4 lambda1))))))))
#s(approx (* (* (cos lambda2) lambda1) -1/2) #s(hole binary64 (* -1/2 lambda1)))
#s(approx (* (* (cos lambda2) lambda1) -1/2) #s(hole binary64 (+ (* -1/2 lambda1) (* 1/4 (* lambda1 (pow lambda2 2))))))
#s(approx (* (* (cos lambda2) lambda1) -1/2) #s(hole binary64 (+ (* -1/2 lambda1) (* (pow lambda2 2) (+ (* -1/48 (* lambda1 (pow lambda2 2))) (* 1/4 lambda1))))))
#s(approx (* (* (cos lambda2) lambda1) -1/2) #s(hole binary64 (+ (* -1/2 lambda1) (* (pow lambda2 2) (+ (* 1/4 lambda1) (* (pow lambda2 2) (+ (* -1/48 lambda1) (* 1/1440 (* lambda1 (pow lambda2 2))))))))))
#s(approx (* (cos lambda2) lambda1) #s(hole binary64 lambda1))
#s(approx (* (cos lambda2) lambda1) #s(hole binary64 (+ lambda1 (* -1/2 (* lambda1 (pow lambda2 2))))))
#s(approx (* (cos lambda2) lambda1) #s(hole binary64 (+ lambda1 (* (pow lambda2 2) (+ (* -1/2 lambda1) (* 1/24 (* lambda1 (pow lambda2 2))))))))
#s(approx (* (cos lambda2) lambda1) #s(hole binary64 (+ lambda1 (* (pow lambda2 2) (+ (* -1/2 lambda1) (* (pow lambda2 2) (+ (* -1/720 (* lambda1 (pow lambda2 2))) (* 1/24 lambda1))))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ 1 (* -1/2 (pow lambda1 2)))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda1 (* lambda2 (+ 1 (* -1/6 (pow lambda1 2)))))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ (* lambda1 (+ 1 (* -1/6 (pow lambda1 2)))) (* lambda2 (- (* 1/4 (pow lambda1 2)) 1/2))))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ (* lambda1 (+ 1 (* -1/6 (pow lambda1 2)))) (* lambda2 (- (+ (* 1/4 (pow lambda1 2)) (* lambda1 (* lambda2 (- (* 1/36 (pow lambda1 2)) 1/6)))) 1/2))))))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (* -1/2 lambda1)))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ 1 (* -1/6 (pow lambda1 2)))))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ 1 (+ (* -1/6 (pow lambda1 2)) (* 1/4 (* lambda1 lambda2))))))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ 1 (+ (* -1/6 (pow lambda1 2)) (* lambda2 (+ (* 1/4 lambda1) (* lambda2 (- (* 1/36 (pow lambda1 2)) 1/6))))))))))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) #s(hole binary64 (* -1/2 lambda1)))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) #s(hole binary64 (+ (* -1/2 lambda1) (* -1/6 (* (pow lambda1 2) lambda2)))))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ (* -1/6 (pow lambda1 2)) (* 1/4 (* lambda1 lambda2)))))))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ (* -1/6 (pow lambda1 2)) (* lambda2 (+ (* 1/36 (* (pow lambda1 2) lambda2)) (* 1/4 lambda1))))))))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) #s(hole binary64 -1/2))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) #s(hole binary64 (- (* -1/6 (* lambda1 lambda2)) 1/2)))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) #s(hole binary64 (- (* lambda2 (+ (* -1/6 lambda1) (* 1/4 lambda2))) 1/2)))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) #s(hole binary64 (- (* lambda2 (+ (* -1/6 lambda1) (* lambda2 (+ 1/4 (* 1/36 (* lambda1 lambda2)))))) 1/2)))
#s(approx (* -1/2 (cos lambda2)) #s(hole binary64 -1/2))
#s(approx (* -1/2 (cos lambda2)) #s(hole binary64 (- (* 1/4 (pow lambda2 2)) 1/2)))
#s(approx (* -1/2 (cos lambda2)) #s(hole binary64 (- (* (pow lambda2 2) (+ 1/4 (* -1/48 (pow lambda2 2)))) 1/2)))
#s(approx (* -1/2 (cos lambda2)) #s(hole binary64 (- (* (pow lambda2 2) (+ 1/4 (* (pow lambda2 2) (- (* 1/1440 (pow lambda2 2)) 1/48)))) 1/2)))
#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 phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/6 (* lambda2 (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))))) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/6 (* lambda2 (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))))) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (sin lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* 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)))))) (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/6 (* 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)))))) (* (cos 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)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos 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)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (* (sin lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* (cos 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)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* 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)))))) (* (cos 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)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/6 (* 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)))))) (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (/ (* (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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) (- (* 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 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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi1) (* (cos phi2) (sin lambda1)))) 2)) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2)))) 3))) (+ (/ (* (- (* 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) (- (* 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) 3) (* (pow (cos phi2) 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)) (/ (* (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))))))) (/ (* (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) (- (* 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 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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi1) (* (cos phi2) (sin lambda1)))) 2)) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (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 lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (* (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (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))))))) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2)))) 3))) (+ (/ (* (- (* 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))))) (+ (/ (* (- (* 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) (- (* 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) 3) (* (pow (cos phi2) 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))))) (- (+ (* (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) (- (* 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) 3) (* (pow (cos phi2) 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)) (/ (* (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))))))))) (/ (* (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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi1) (* (cos phi2) (sin lambda1)))) 2)) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2)))) 3))) (+ (/ (* (- (* 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) (- (* 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) 3) (* (pow (cos phi2) 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)) (/ (* (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))))))) (/ (* (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) (- (* 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 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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (pow (cos phi1) 3) (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2)))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* -1 (/ (* lambda2 (* (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 phi1) 3) (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* lambda2 (- (* -1 (* lambda2 (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi1) (* (cos phi2) (sin lambda1)))) 2)) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (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))))) (/ (* (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 phi1) 3) (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (+ (* -1 (/ (* (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi1) (* (cos phi2) (sin lambda1)))) 2)) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (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 lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (* (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (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))))))) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi1) (* (cos phi2) (sin lambda1)))) 2)) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (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))))) (/ (* (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 phi1) 3) (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2))))))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (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))) (* -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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (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))))) (* -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 (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #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))) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (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))) (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (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))))) (* -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))) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #s(hole binary64 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #s(hole binary64 (+ (* 2 (* lambda2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 lambda1) (* (cos phi1) (cos phi2)))))
#s(approx (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (* (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)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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) (- (* 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))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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))))) (+ (/ (* (- (* 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) (- (* 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) 3) (* (pow (cos phi2) 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))))) (/ (* (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) (- (* 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))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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))))) (+ (/ (* (- (* 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))))) (+ (/ (* (- (* 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) (- (* 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) 3) (* (pow (cos phi2) 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))))) (- (+ (* (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) (- (* 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) 3) (* (pow (cos phi2) 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)))))) (/ (* (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)))))) (+ (/ (* (- (* 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) (- (* 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) 3) (* (pow (cos phi2) 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))))) (/ (* (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) (- (* 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))))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) #s(hole binary64 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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)))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos lambda1) (cos phi2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (* (cos phi2) (sin lambda1))) (+ (* (cos lambda1) (cos phi2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (cos phi2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (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)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (/ (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda2 (- (* -1 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (/ (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -1 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* lambda2 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* -1 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* 1/2 (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (+ (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (/ (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -1 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* lambda2 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* -1 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (* 1/2 (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* lambda2 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (/ (* (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 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* 1/2 (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (* 1/6 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (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 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (+ (* 1/6 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1)))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (+ (/ (* (cos phi2) (* (sin lambda1) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (+ (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (/ (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (/ (* lambda2 (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1)))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda2 (- (* -1 (* lambda2 (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (+ (* 1/6 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1)))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (/ (* (cos phi2) (* (sin lambda1) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (/ (* (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 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* 1/2 (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))))) (* -1 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (+ (* lambda2 (- (/ (* (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) (- (/ (* (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 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* 1/2 (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (* 1/6 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (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 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))) (/ (* (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 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* 1/2 (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))))) (* -1 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (cos phi1) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (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 (/ (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (pow (cos phi1) 2) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #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 phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (sin lambda1)))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (+ (* -1 (pow lambda2 3)) (pow lambda1 3))))
#s(approx (pow lambda2 3) #s(hole binary64 (pow lambda2 3)))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 lambda2) (pow lambda1 2))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) #s(hole binary64 (* lambda2 (+ lambda1 lambda2))))
#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 (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (/ (+ (pow lambda1 3) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 3)) (- (+ (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)) (* lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (- (+ (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)) (* lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) #s(hole binary64 (- (pow lambda1 2) (* lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) #s(hole binary64 (/ (- (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)) (- lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1))))
#s(approx (cos lambda2) #s(hole binary64 (cos lambda2)))
#s(approx (neg (sin lambda2)) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (sin lambda2) #s(hole binary64 (sin lambda2)))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos lambda2) (cos phi2)))))
#s(approx (* -1/2 (cos lambda2)) #s(hole binary64 (* -1/2 (cos lambda2))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* lambda2 (- (* -1 (/ (+ (* -1 (pow lambda1 2)) (pow lambda1 2)) (pow lambda2 2))) (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* lambda2 (- (/ (* lambda1 (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) (pow lambda2 3)) (+ 1 (+ (* -1 (/ lambda1 lambda2)) (+ (* -1 (/ (pow lambda1 2) (pow lambda2 2))) (/ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (* (pow lambda2 3) (- (/ (pow lambda1 3) (pow lambda2 3)) 1))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (* (pow lambda2 2) (+ 1 (/ lambda1 lambda2)))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (* (pow lambda2 2) (+ 1 (+ (/ lambda1 lambda2) (/ (pow lambda1 2) (pow lambda2 2)))))))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) #s(hole binary64 (* (pow lambda2 2) (+ 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))) lambda1) 1) 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))) lambda1) 1) #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))) lambda1) #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))) #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 (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 (+ (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 (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (+ lambda1 (* -1 lambda2))) (* -1/2 (* (pow phi2 2) (sin (+ lambda1 (* -1 lambda2))))))))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI))))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (+ lambda1 (* -1 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)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (+ lambda1 (* -1 lambda2))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (/ (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (/ (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))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (/ (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (/ (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (/ (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (/ (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (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 phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 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 (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) #s(hole binary64 (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 3))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (/ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (/ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (/ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (pow (cos phi1) 2) (- (cos phi1) (* (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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 3)) (pow (cos phi1) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (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 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (sin (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ (- (+ (* -1 (/ (pow lambda1 2) lambda2)) (/ (pow lambda1 2) lambda2)) (* -1 lambda1)) lambda2)))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ (- (* -1 (/ (- (/ (* lambda1 (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) lambda2) (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) lambda2)) (* -1 lambda1)) lambda2)))))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (* -1 (* (pow lambda2 3) (+ 1 (* -1 (/ (pow lambda1 3) (pow lambda2 3))))))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (* (pow lambda2 2) (+ 1 (* -1 (/ (+ (* -1 lambda1) (* -1 (/ (pow lambda1 2) lambda2))) 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 (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (/ (+ (pow lambda1 3) (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 3)) (- (+ (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 2)) (* lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) #s(hole binary64 (+ (pow lambda1 3) (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 3))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 3)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (- (+ (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 2)) (* lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 2)))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) #s(hole binary64 (- (pow lambda1 2) (* 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))) lambda1) #s(hole binary64 (* lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) #s(hole binary64 (/ (- (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 2)) (- lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) #s(hole binary64 (- (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 2))))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) #s(hole binary64 (- lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#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 (cos phi1) #s(hole binary64 1))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* -1/2 (pow phi1 2)))))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))))
#s(approx phi1 #s(hole binary64 phi1))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (* (cos lambda1) (cos phi2)))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (* (cos lambda2) (cos phi2)))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos lambda2) (cos phi2))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos lambda2) (cos phi2)) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos lambda2) (cos phi2)) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos 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) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (/ 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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (+ (* -1 (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 1 (* -1/2 (* (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))))) (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* 1/24 (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 7/8 (/ 1 (- (+ 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) (pow (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* 1/3 (/ 1 (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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))))) (/ (* (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) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 1 (* -1/2 (* (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))))) (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* -1 (* (pow phi1 2) (+ (* -1 (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (- (+ (* 1/24 (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 7/8 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2))))))) (+ (* 1/3 (/ 1 (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (* (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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)))))) (+ (* -1 (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 2/45 (* -1/720 (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* -1 (/ (+ 2/45 (* -1/720 (* (cos phi2) (cos (- lambda1 lambda2))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 61/240 (/ 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 (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (pow (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (/ (* (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))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (- 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)))) 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))) (* 7/8 (/ 1 (- (+ 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) (pow (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* 1/3 (/ 1 (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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))))) (/ (* (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) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 1 (* -1/2 (* (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))))) (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* 1/24 (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 7/8 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2))))))) (+ (* 1/3 (/ 1 (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* -1 (* (pow phi1 2) (+ (* -1 (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (- (+ (* 1/24 (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 7/8 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2))))))) (+ (* 1/3 (/ 1 (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (* (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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)))))) (+ (* -1 (/ (+ 2/45 (* -1/720 (* (cos phi2) (cos (- lambda1 lambda2))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 61/240 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2))))))))))) (+ (* 1/24 (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 7/8 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))))))) (+ (* 1/3 (/ 1 (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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))))))))
#s(approx (pow (cos phi1) 3) #s(hole binary64 1))
#s(approx (pow (cos phi1) 3) #s(hole binary64 (+ 1 (* -3/2 (pow phi1 2)))))
#s(approx (pow (cos phi1) 3) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* 7/8 (pow phi1 2)) 3/2)))))
#s(approx (pow (cos phi1) 3) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 7/8 (* -61/240 (pow phi1 2)))) 3/2)))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* 1/2 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (* -1/24 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* -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 (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* 1/720 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/24 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (cos phi1) (* (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 (+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (* (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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (/ (* (pow phi1 2) (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (/ (* (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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* (pow phi1 2) (- (* -1 (* (pow phi1 2) (+ (* -1 (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (pow (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (/ (* (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) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (/ (* (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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* -1 (* (pow phi1 2) (+ (* -1 (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 2/45 (* -1/720 (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1 (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (pow (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (/ (* (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))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (- 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)))) 3)))))) (+ (* -1 (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (pow (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (/ (* (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) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (/ (* (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 (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (+ (* phi1 (cos (* 1/2 (PI)))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (+ (* phi1 (+ (cos (* 1/2 (PI))) (* -1/2 (* phi1 (sin (* 1/2 (PI))))))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (+ (* phi1 (+ (cos (* 1/2 (PI))) (* phi1 (+ (* -1/2 (sin (* 1/2 (PI)))) (* -1/6 (* phi1 (cos (* 1/2 (PI))))))))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi1 (cos (* 1/2 (PI)))))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi1 (+ (cos (* 1/2 (PI))) (* -1/2 (* phi1 (sin (* 1/2 (PI))))))))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi1 (+ (cos (* 1/2 (PI))) (* phi1 (+ (* -1/2 (sin (* 1/2 (PI)))) (* -1/6 (* phi1 (cos (* 1/2 (PI))))))))))))
#s(approx (sin phi1) #s(hole binary64 phi1))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* -1/6 (pow phi1 2))))))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* (pow phi1 2) (- (* 1/120 (pow phi1 2)) 1/6))))))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/120 (* -1/5040 (pow phi1 2)))) 1/6))))))
#s(approx (* (cos phi1) (sin (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (* (cos phi1) (sin (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* -1/2 (* (pow phi1 2) (sin (* 1/2 (PI))))))))
#s(approx (* (cos phi1) (sin (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* (pow phi1 2) (+ (* -1/2 (sin (* 1/2 (PI)))) (* 1/24 (* (pow phi1 2) (sin (* 1/2 (PI))))))))))
#s(approx (* (cos phi1) (sin (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* (pow phi1 2) (+ (* -1/2 (sin (* 1/2 (PI)))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin (* 1/2 (PI))))) (* 1/24 (sin (* 1/2 (PI)))))))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (/ 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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 1/2 (/ 1 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* (pow phi1 2) (- (+ (* -1/4 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 1/24 (/ 1 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* (pow phi1 2) (- (+ (* -1/4 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* (pow phi1 2) (- (+ (* -1/720 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/720 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/48 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (* 1/2 (/ (+ (* -1/4 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))) (+ (* -1/2 (/ (- (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 1/24 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* 1/24 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 2/45 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 1/24 (/ 1 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi1 2) (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi1 2) (- (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* (pow phi1 2) (- (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 1/24 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi1 2) (- (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* (pow phi1 2) (- (+ (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* (pow phi1 2) (- (* 1/720 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* -1/2 (/ (- (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 1/24 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* 1/24 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 2/45 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 1/24 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi1 2) (- (* -1 (* (pow phi1 2) (+ (* -1/4 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* -1 (* (pow phi1 2) (+ (* -1/720 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/48 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (* 1/2 (/ (+ (* -1/4 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))) (+ (* -1/4 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ 1 (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ 1 (+ (* -3/2 (pow phi1 2)) (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ 1 (+ (* (pow phi1 2) (- (* 7/8 (pow phi1 2)) 3/2)) (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ 1 (+ (* (pow phi1 2) (- (* (pow phi1 2) (+ 7/8 (* -61/240 (pow phi1 2)))) 3/2)) (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (+ 1 (* -1 (pow phi1 2))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #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 (cos phi1) #s(hole binary64 (cos phi1)))
#s(approx (pow (cos phi1) 3) #s(hole binary64 (pow (cos phi1) 3)))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))
#s(approx (sin phi1) #s(hole binary64 (sin phi1)))
#s(approx (* (cos phi1) (sin (/ (PI) 2))) #s(hole binary64 (* (cos phi1) (sin (* 1/2 (PI))))))
#s(approx (pow (cos phi1) 2) #s(hole binary64 (pow (cos phi1) 2)))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))))
#s(approx (cos phi2) #s(hole binary64 1))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))))
#s(approx phi2 #s(hole binary64 phi2))
#s(approx (+ (* (cos (- 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 (+ (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 (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (* (* phi2 phi2) -1/2) #s(hole binary64 (* -1/2 (pow phi2 2))))
#s(approx (* phi2 phi2) #s(hole binary64 (pow phi2 2)))
#s(approx (+ (* (* phi2 phi2) -1/2) 1) #s(hole binary64 1))
#s(approx (+ (* (* phi2 phi2) -1/2) 1) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (cos phi1))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* -1/2 (* (pow phi2 2) (cos lambda1)))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* 1/24 (* (pow phi2 2) (cos lambda1)))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda1))) (* 1/24 (cos lambda1))))))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda2) (cos phi1))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda2) (+ (cos phi1) (* -1/2 (* (pow phi2 2) (cos lambda2)))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda2) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* 1/24 (* (pow phi2 2) (cos lambda2)))))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda2) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda2))) (* 1/24 (cos lambda2))))))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (cos (- lambda1 lambda2)))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (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)) 1) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2)))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (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 phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (sin (+ phi2 (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ phi2 (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi2 (cos (* 1/2 (PI)))))))
#s(approx (sin (+ phi2 (/ (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 (/ (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 (+ phi2 (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ phi2 (/ (PI) 2)) #s(hole binary64 (+ phi2 (* 1/2 (PI)))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (/ (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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) (- (* -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 (- 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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) 2)) (pow (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))) 3))) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (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) (- (* 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)) (/ (* (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)))))))) (+ (/ (* (pow (cos phi1) 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 (- 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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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)))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) 2)) (pow (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))) 3))) (/ (* (pow (cos phi1) 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))) (- (* -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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (* (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) (- (* 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)))) 3))) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (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)))))) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (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 (- 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))))) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2))))) (+ (/ (* (pow (cos phi1) 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)) (/ (* (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)))))))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) 2)) (pow (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))) 3))) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (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) (- (* 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)) (/ (* (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)))))))) (+ (/ (* (pow (cos phi1) 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 (- 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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (pow (cos phi1) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* -1 (/ (* (pow phi2 2) (* (pow (cos phi1) 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))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* (pow phi2 2) (- (* -1 (* (pow phi2 2) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) 2)) (pow (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))) 3))) (/ (* (pow (cos phi1) 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))))) (/ (* (pow (cos phi1) 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))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* (pow phi2 2) (- (* (pow phi2 2) (- (* -1 (* (pow phi2 2) (+ (* -1 (/ (* (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) 2)) (pow (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))) 3))) (/ (* (pow (cos phi1) 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))) (- (* -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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (* (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) (- (* 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)))) 3))) (/ (* (pow (cos phi1) 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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) 2)) (pow (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))) 3))) (/ (* (pow (cos phi1) 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))))) (/ (* (pow (cos phi1) 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))))))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (pow (cos (- lambda1 lambda2)) 2) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))))) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #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 (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #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 (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #s(hole binary64 (pow (cos (- lambda1 lambda2)) 2)))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #s(hole binary64 (+ (* -1 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 (+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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 (- 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 (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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)))))) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (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 (- 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)))))) (/ (* (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 (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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)))))) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (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)))))) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (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 (- 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))))) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2))))) (/ (* (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 (- 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 (- 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)))))) (/ (* (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 (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2))))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) #s(hole binary64 (pow (cos (- lambda1 lambda2)) 3)))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) #s(hole binary64 (+ (* -3/2 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 3))) (pow (cos (- lambda1 lambda2)) 3))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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 (- lambda1 lambda2)) 3))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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 (- lambda1 lambda2)) 3))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2)))))))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (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 (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (/ (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* (pow phi2 2) (- (+ (* -1/24 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (+ (* -1/4 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3))) (+ (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* (pow phi2 2) (- (+ (* -1/24 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))) (* (pow phi2 2) (- (+ (* -1/24 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/720 (/ (pow (cos (- lambda1 lambda2)) 3) (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 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2)))))))) (- (cos phi1) (cos (- lambda1 lambda2))))))) (+ (* -1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -1/4 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3))) (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* -2/45 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/720 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/48 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3)))))))))) (+ (* -1/4 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3))) (+ (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow phi2 2) (* (pow (cos phi1) 2) (cos (- lambda1 lambda2)))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (- (* -1 (* (pow phi2 2) (+ (* -1/4 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3))) (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2)))))) (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (- (* (pow phi2 2) (- (* -1 (* (pow phi2 2) (+ (* -1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -1/4 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3))) (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/720 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/48 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3))))))) (+ (* -1/4 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3))) (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2)))))) (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (- (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* (pow phi2 2) (- (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* -1/24 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (- (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* (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)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/720 (/ (pow (cos (- lambda1 lambda2)) 3) (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 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2)))))))) (- (cos phi1) (cos (- lambda1 lambda2)))))))))) (+ (* -1/24 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ (pow (cos phi1) 3) (pow (cos (- lambda1 lambda2)) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (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 (/ (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #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 phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* -1/2 (* (pow phi2 2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* (pow phi2 2) (+ (* -1/2 (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* 1/24 (* (pow phi2 2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* (pow phi2 2) (+ (* -1/2 (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (* 1/24 (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))))
#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 (cos phi2) #s(hole binary64 (cos phi2)))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (/ (sin (- lambda1 lambda2)) (pow phi2 2))))))
#s(approx (+ (* (* phi2 phi2) -1/2) 1) #s(hole binary64 (* -1/2 (pow phi2 2))))
#s(approx (+ (* (* phi2 phi2) -1/2) 1) #s(hole binary64 (* (pow phi2 2) (- (/ 1 (pow phi2 2)) 1/2))))
#s(approx (sin (+ phi2 (/ (PI) 2))) #s(hole binary64 (sin (+ phi2 (* 1/2 (PI))))))
#s(approx (+ phi2 (/ (PI) 2)) #s(hole binary64 phi2))
#s(approx (+ phi2 (/ (PI) 2)) #s(hole binary64 (* phi2 (+ 1 (* 1/2 (/ (PI) phi2))))))
#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))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2))))))
#s(approx (sin (+ phi2 (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (* -1 phi2)))))
#s(approx (+ phi2 (/ (PI) 2)) #s(hole binary64 (* -1 (* phi2 (- (* -1/2 (/ (PI) phi2)) 1)))))

Calls

12 calls:

Time	Variable		Point	Expression
110.0ms	phi2	@	0	((+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1 (+ 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) lambda2 (cos phi2) phi2 (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (cos (- lambda1 lambda2)) (cos phi1) phi1 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (* (* phi2 phi2) -1/2) (* phi2 phi2) -1/2 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (+ (* (* phi2 phi2) -1/2) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (cos lambda2) (neg (sin lambda2)) (sin lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (* (- (/ lambda1 lambda2) 1) lambda2) (- (/ lambda1 lambda2) 1) (/ lambda1 lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (cos lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (cos phi1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (neg lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) (* (* (cos lambda2) lambda1) -1/2) (* (cos lambda2) lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) (* 1/6 lambda1) 1/6 (* -1/2 (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (* (sin lambda1) (sin lambda2)) (sin lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (sin (+ phi2 (/ (PI) 2))) (+ phi2 (/ (PI) 2)) (/ (PI) 2) (PI) 2 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin phi2) (cos (/ (PI) 2)) (* (cos phi2) (sin (/ (PI) 2))) (sin (/ (PI) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (pow (cos phi1) 3) 3 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin phi1) (* (cos phi1) (sin (/ (PI) 2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (- (pow lambda1 3) (pow lambda2 3)) (pow lambda1 3) (pow lambda2 3) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (+ (* lambda2 lambda2) (* lambda1 lambda2)) (* lambda1 lambda2) (+ 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))) (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))
77.0ms	lambda2	@	0	((+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1 (+ 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) lambda2 (cos phi2) phi2 (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (cos (- lambda1 lambda2)) (cos phi1) phi1 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (* (* phi2 phi2) -1/2) (* phi2 phi2) -1/2 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (+ (* (* phi2 phi2) -1/2) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (cos lambda2) (neg (sin lambda2)) (sin lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (* (- (/ lambda1 lambda2) 1) lambda2) (- (/ lambda1 lambda2) 1) (/ lambda1 lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (cos lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (cos phi1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (neg lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) (* (* (cos lambda2) lambda1) -1/2) (* (cos lambda2) lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) (* 1/6 lambda1) 1/6 (* -1/2 (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (* (sin lambda1) (sin lambda2)) (sin lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (sin (+ phi2 (/ (PI) 2))) (+ phi2 (/ (PI) 2)) (/ (PI) 2) (PI) 2 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin phi2) (cos (/ (PI) 2)) (* (cos phi2) (sin (/ (PI) 2))) (sin (/ (PI) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (pow (cos phi1) 3) 3 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin phi1) (* (cos phi1) (sin (/ (PI) 2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (- (pow lambda1 3) (pow lambda2 3)) (pow lambda1 3) (pow lambda2 3) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (+ (* lambda2 lambda2) (* lambda1 lambda2)) (* lambda1 lambda2) (+ 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))) (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))
50.0ms	lambda1	@	0	((+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1 (+ 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) lambda2 (cos phi2) phi2 (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (cos (- lambda1 lambda2)) (cos phi1) phi1 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (* (* phi2 phi2) -1/2) (* phi2 phi2) -1/2 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (+ (* (* phi2 phi2) -1/2) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (cos lambda2) (neg (sin lambda2)) (sin lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (* (- (/ lambda1 lambda2) 1) lambda2) (- (/ lambda1 lambda2) 1) (/ lambda1 lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (cos lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (cos phi1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (neg lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) (* (* (cos lambda2) lambda1) -1/2) (* (cos lambda2) lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) (* 1/6 lambda1) 1/6 (* -1/2 (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (* (sin lambda1) (sin lambda2)) (sin lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (sin (+ phi2 (/ (PI) 2))) (+ phi2 (/ (PI) 2)) (/ (PI) 2) (PI) 2 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin phi2) (cos (/ (PI) 2)) (* (cos phi2) (sin (/ (PI) 2))) (sin (/ (PI) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (pow (cos phi1) 3) 3 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin phi1) (* (cos phi1) (sin (/ (PI) 2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (- (pow lambda1 3) (pow lambda2 3)) (pow lambda1 3) (pow lambda2 3) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (+ (* lambda2 lambda2) (* lambda1 lambda2)) (* lambda1 lambda2) (+ 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))) (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))
50.0ms	lambda1	@	inf	((+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1 (+ 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) lambda2 (cos phi2) phi2 (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (cos (- lambda1 lambda2)) (cos phi1) phi1 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (* (* phi2 phi2) -1/2) (* phi2 phi2) -1/2 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (+ (* (* phi2 phi2) -1/2) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (cos lambda2) (neg (sin lambda2)) (sin lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (* (- (/ lambda1 lambda2) 1) lambda2) (- (/ lambda1 lambda2) 1) (/ lambda1 lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (cos lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (cos phi1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (neg lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) (* (* (cos lambda2) lambda1) -1/2) (* (cos lambda2) lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) (* 1/6 lambda1) 1/6 (* -1/2 (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (* (sin lambda1) (sin lambda2)) (sin lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (sin (+ phi2 (/ (PI) 2))) (+ phi2 (/ (PI) 2)) (/ (PI) 2) (PI) 2 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin phi2) (cos (/ (PI) 2)) (* (cos phi2) (sin (/ (PI) 2))) (sin (/ (PI) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (pow (cos phi1) 3) 3 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin phi1) (* (cos phi1) (sin (/ (PI) 2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (- (pow lambda1 3) (pow lambda2 3)) (pow lambda1 3) (pow lambda2 3) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (+ (* lambda2 lambda2) (* lambda1 lambda2)) (* lambda1 lambda2) (+ 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))) (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))
43.0ms	lambda2	@	inf	((+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1 (+ 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) lambda2 (cos phi2) phi2 (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (cos (- lambda1 lambda2)) (cos phi1) phi1 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (* (* phi2 phi2) -1/2) (* phi2 phi2) -1/2 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (+ (* (* phi2 phi2) -1/2) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (cos lambda2) (neg (sin lambda2)) (sin lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (* (- (/ lambda1 lambda2) 1) lambda2) (- (/ lambda1 lambda2) 1) (/ lambda1 lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (cos lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (cos phi1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (neg lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) (* (* (cos lambda2) lambda1) -1/2) (* (cos lambda2) lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) (* 1/6 lambda1) 1/6 (* -1/2 (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (* (sin lambda1) (sin lambda2)) (sin lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (sin (+ phi2 (/ (PI) 2))) (+ phi2 (/ (PI) 2)) (/ (PI) 2) (PI) 2 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin phi2) (cos (/ (PI) 2)) (* (cos phi2) (sin (/ (PI) 2))) (sin (/ (PI) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (pow (cos phi1) 3) 3 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin phi1) (* (cos phi1) (sin (/ (PI) 2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (- (pow lambda1 3) (pow lambda2 3)) (pow lambda1 3) (pow lambda2 3) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (+ (* lambda2 lambda2) (* lambda1 lambda2)) (* lambda1 lambda2) (+ 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))) (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))

rewrite606.0ms (1.9%)

Memory

-12.3MiB live, 1 170.3MiB allocated; 93ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	4799	86752
0	5244	78412
0	10187	76897

Stop Event

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

Counts

1 346 → 1 503

Calls

Call 1

Inputs
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
lambda1
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1))
(.f64 (+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1)
(+.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 (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))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda2
(cos.f64 phi2)
phi2
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 phi1)
phi1
#s(literal 1 binary64)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 lambda1 (atan2.f64 #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)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 #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)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.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))))
(fma.f64 (.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
(.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64))
(*.f64 phi2 phi2)
#s(literal -1/2 binary64)
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))
(fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))
(cos.f64 lambda2)
(neg.f64 (sin.f64 lambda2))
(sin.f64 lambda2)
(+.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))))))
(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 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2))))
(sin.f64 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)))
#s(approx (- lambda1 lambda2) (*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))
(/.f64 lambda1 lambda2)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (cos phi1) #s(literal 1 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (cos.f64 phi1) #s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))
(*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2))))))
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))))
(*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2))))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))
(fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2))
(neg.f64 lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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)))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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))))))
(+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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)))))
(.f64 (cos.f64 phi2) #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 (.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64)) (neg.f64 (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)))
(fma.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64)) (neg.f64 (sin.f64 lambda2))) lambda1 (cos.f64 lambda2))
(-.f64 (.f64 (.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64)) (neg.f64 (sin.f64 lambda2)))
(.f64 (.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64))
(*.f64 (cos.f64 lambda2) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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)))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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))))))
(+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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)))))
(.f64 (cos.f64 phi2) #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 (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)))
(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))
(-.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)))
(.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)
(fma.f64 (.f64 #s(literal 1/6 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))
(*.f64 #s(literal 1/6 binary64) lambda1)
#s(literal 1/6 binary64)
(*.f64 #s(literal -1/2 binary64) (cos.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 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))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(sin.f64 lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (sin.f64 (+.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (sin.f64 (+.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (cos.f64 phi1) (*.f64 (sin.f64 (+.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (sin.f64 (+.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (+.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.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))))) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.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))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (cos.f64 phi1) (.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))))) (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))))) (cos.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 (cos.f64 phi2) (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 3 binary64)) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (.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 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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 3 binary64)) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (.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 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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 3 binary64)) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (.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 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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 3 binary64)) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(pow.f64 (cos.f64 phi1) #s(literal 3 binary64))
#s(literal 3 binary64)
(fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (.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 2 binary64)) (.f64 (cos.f64 phi1) (*.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 (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 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(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 phi1)
(*.f64 (cos.f64 phi1) (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 (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 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)) (-.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 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 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(-.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 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 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (+.f64 (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)) (.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 (+.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))) (+.f64 (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)) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))))
(/.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))) (+.f64 (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)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))))
(+.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)))
(+.f64 (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)) (.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 (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 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 (cos.f64 phi2) (sin.f64 (/.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))))))
(sin.f64 (/.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 (-.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 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))
(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)))
(fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda2))
(*.f64 lambda1 lambda2)
(+.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)))
(/.f64 (+.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)) (pow.f64 lambda1 #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))))
(+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))
(pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64))
(+.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) 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 2 binary64))
(-.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 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 (-.f64 (.f64 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 2 binary64))) (-.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 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 2 binary64)))
(-.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))))
#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 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) 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))) lambda1) 1) 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))) lambda1) 1) #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))) lambda1) 1) #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))) lambda1) #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))) #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 (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 (+ (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 (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (neg lambda2)) (* -1/2 (* (pow phi2 2) (sin (neg lambda2)))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (neg lambda2)) (+ (* -1/2 (* (pow phi2 2) (sin (neg lambda2)))) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* (pow phi2 2) (cos (neg lambda2))))))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (neg lambda2)) (+ (* -1/2 (* (pow phi2 2) (sin (neg lambda2)))) (* lambda1 (+ (cos (neg lambda2)) (+ (* -1/2 (* (pow phi2 2) (cos (neg lambda2)))) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* 1/4 (* (pow phi2 2) (sin (neg lambda2)))))))))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (neg lambda2)) (+ (* -1/2 (* (pow phi2 2) (sin (neg lambda2)))) (* lambda1 (+ (cos (neg lambda2)) (+ (* -1/2 (* (pow phi2 2) (cos (neg lambda2)))) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (+ (* 1/4 (* (pow phi2 2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/6 (cos (neg lambda2))) (* 1/12 (* (pow phi2 2) (cos (neg lambda2))))))))))))))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (- (* lambda1 (cos lambda2)) (sin lambda2))))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) #s(hole binary64 (* -1 lambda2)))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) #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 lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (cos phi2))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* -1/2 (* (pow lambda1 2) (cos phi2)))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda1 2) (cos phi2)))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (cos phi2))) (* 1/24 (cos phi2))))))))))
#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 (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (cos (neg lambda2))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* 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)) 1) #s(hole binary64 (+ 1 (+ (* 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 (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (cos lambda2)))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (neg lambda1) #s(hole binary64 (* -1 lambda1)))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (cos lambda2)))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (sin lambda2)))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
#s(approx (* (* (cos lambda2) lambda1) -1/2) #s(hole binary64 (* -1/2 (* lambda1 (cos lambda2)))))
#s(approx (* (cos lambda2) lambda1) #s(hole binary64 (* lambda1 (cos lambda2))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (cos lambda2)))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))))))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (sin lambda2)))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ (sin lambda2) (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))))))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) #s(hole binary64 (* -1/2 (* lambda1 (cos lambda2)))))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) #s(hole binary64 (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2)))))))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) #s(hole binary64 (* -1/2 (cos lambda2))))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) #s(hole binary64 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))))
#s(approx (* 1/6 lambda1) #s(hole binary64 (* 1/6 lambda1)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (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 (+ (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 (sin lambda1) #s(hole binary64 lambda1))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* -1/6 (pow lambda1 2))))))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* (pow lambda1 2) (- (* 1/120 (pow lambda1 2)) 1/6))))))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/120 (* -1/5040 (pow lambda1 2)))) 1/6))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* -1 (* lambda1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* 1/6 (* lambda1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* 1/6 (* lambda1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* -1 (* 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))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/2 (* 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))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* 1/6 (* 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))))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (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)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* 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)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/2 (* 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)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* 1/6 (* 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)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (/ (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))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (/ (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))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (/ (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (/ (* (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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 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) (- (* -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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) 2)) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) 3))) (+ (/ (* (- (* -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) (- (* -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 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)) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 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))))))) (/ (* (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 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) (- (* -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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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)))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) 2)) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (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) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (* (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (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)))))))) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) 3))) (+ (/ (* (- (* -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)))))) (+ (/ (* (- (* -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) (- (* -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) (* (pow (cos (neg lambda2)) 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))))) (- (+ (* (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) (- (* -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 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)) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 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))))))))) (/ (* (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))))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) 2)) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) 3))) (+ (/ (* (- (* -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) (- (* -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 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)) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 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))))))) (/ (* (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 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) (- (* -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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* -1 (/ (* lambda1 (* (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 phi1) 3) (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) 2)) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (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))))) (/ (* (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 phi1) 3) (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (/ (* (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) 2)) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (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) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (* (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (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)))))))) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) 2)) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (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))))) (/ (* (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 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 phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (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))) (* -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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (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))))) (* 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 (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #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))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (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))) (* -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))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (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))))) (* 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))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (* (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))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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) (- (* -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)))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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)))))) (+ (/ (* (- (* -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) (- (* -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) (* (pow (cos (neg lambda2)) 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))))) (/ (* (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) (- (* -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)))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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)))))) (+ (/ (* (- (* -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)))))) (+ (/ (* (- (* -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) (- (* -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) (* (pow (cos (neg lambda2)) 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))))) (- (+ (* (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) (- (* -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) (* (pow (cos (neg lambda2)) 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)))))) (/ (* (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))))))) (+ (/ (* (- (* -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) (- (* -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) (* (pow (cos (neg lambda2)) 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))))) (/ (* (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) (- (* -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)))))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) #s(hole binary64 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (neg lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (neg lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (neg lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (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 phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (neg lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (/ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (/ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (/ (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda1 (- (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* lambda1 (- (+ (* 1/2 (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (+ (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* lambda1 (- (+ (* 1/2 (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* lambda1 (- (+ (* -1/6 (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (+ (* 1/2 (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (* -1/2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (+ (* -1/6 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (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)))))))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (+ (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* -1 (/ (* lambda1 (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (* -1/2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (* -1/6 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (+ (* 1/2 (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (+ (* lambda1 (- (/ (* (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 (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (+ (* 1/2 (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (* 1/2 (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (pow (cos phi1) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (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 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))))
#s(approx (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #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 (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (sin (* -1 lambda2)))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda1 (* (cos phi2) (cos (* -1 lambda2)))) (* (cos phi2) (sin (* -1 lambda2))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (* -1 lambda2))))) (* (cos phi2) (cos (* -1 lambda2))))) (* (cos phi2) (sin (* -1 lambda2))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (* -1 lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (* -1 lambda2))))))) (* (cos phi2) (cos (* -1 lambda2))))) (* (cos phi2) (sin (* -1 lambda2))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (sin (* -1 lambda2))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (sin (* -1 lambda2)) (* lambda1 (cos (* -1 lambda2))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (sin (* -1 lambda2)) (* lambda1 (+ (cos (* -1 lambda2)) (* -1/2 (* lambda1 (sin (* -1 lambda2)))))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (sin (* -1 lambda2)) (* lambda1 (+ (cos (* -1 lambda2)) (* lambda1 (+ (* -1/2 (sin (* -1 lambda2))) (* -1/6 (* lambda1 (cos (* -1 lambda2)))))))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* -1 lambda2)))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (* -1 (pow lambda2 3))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (- (pow lambda1 3) (pow lambda2 3))))
#s(approx (pow lambda1 3) #s(hole binary64 (pow lambda1 3)))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (pow lambda2 2)))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 lambda2) (pow lambda2 2))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ lambda1 lambda2)) (pow lambda2 2))))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) #s(hole binary64 (pow lambda2 2)))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) #s(hole binary64 (+ (* lambda1 lambda2) (pow lambda2 2))))
#s(approx (* lambda1 lambda2) #s(hole binary64 (* 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 (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 (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 3)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) #s(hole binary64 (+ (pow lambda1 3) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 3))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 3)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (+ (* -1 (* lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (+ (* lambda1 (- lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) #s(hole binary64 (* -1 (* lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) #s(hole binary64 (* lambda1 (- lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (* lambda1 lambda1) #s(hole binary64 (pow lambda1 2)))
#s(approx (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) #s(hole binary64 (* lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (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 (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) #s(hole binary64 (* -1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2))))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) #s(hole binary64 (- (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2))))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) #s(hole binary64 (* -1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) #s(hole binary64 (- lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #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))) lambda1) 1) lambda1) #s(hole binary64 lambda1))
#s(approx (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) 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))) lambda1) 1) #s(hole binary64 1))
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) #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 (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (- lambda1 lambda2)))))
#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 (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (* lambda1 (cos lambda2))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (* lambda1 (+ (cos lambda2) (* -1 (/ (sin lambda2) lambda1))))))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) #s(hole binary64 lambda1))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) #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 lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (cos phi2)))))
#s(approx (cos lambda1) #s(hole binary64 (cos lambda1)))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (* lambda1 (sin lambda2))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1)))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* -1/2 (* (pow lambda1 2) (cos lambda2)))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (/ (sin lambda2) lambda1)))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (+ (/ (cos lambda2) (pow lambda1 2)) (/ (sin lambda2) lambda1))))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (* -1/2 (* lambda1 (cos lambda2)))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (* lambda1 (+ (* -1/2 (cos lambda2)) (/ (sin lambda2) lambda1)))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* -1/6 (* (pow lambda1 3) (sin lambda2)))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* (pow lambda1 3) (+ (* -1/2 (/ (cos lambda2) lambda1)) (* -1/6 (sin lambda2))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* (pow lambda1 3) (+ (* -1/2 (/ (cos lambda2) lambda1)) (+ (* -1/6 (sin lambda2)) (/ (sin lambda2) (pow lambda1 2)))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* (pow lambda1 3) (+ (* -1/2 (/ (cos lambda2) lambda1)) (+ (* -1/6 (sin lambda2)) (+ (/ (cos lambda2) (pow lambda1 3)) (/ (sin lambda2) (pow lambda1 2))))))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (* -1/6 (* (pow lambda1 2) (sin lambda2)))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1/2 (/ (cos lambda2) lambda1)) (* -1/6 (sin lambda2))))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1/2 (/ (cos lambda2) lambda1)) (+ (* -1/6 (sin lambda2)) (/ (sin lambda2) (pow lambda1 2)))))))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) #s(hole binary64 (* -1/6 (* (pow lambda1 2) (sin lambda2)))))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) #s(hole binary64 (* (pow lambda1 2) (+ (* -1/2 (/ (cos lambda2) lambda1)) (* -1/6 (sin lambda2))))))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) #s(hole binary64 (* -1/6 (* lambda1 (sin lambda2)))))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) #s(hole binary64 (* lambda1 (+ (* -1/2 (/ (cos lambda2) lambda1)) (* -1/6 (sin lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 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 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) 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 (sin lambda1) #s(hole binary64 (sin lambda1)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) lambda1)))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))) lambda1)))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (- lambda1 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)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (/ (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (/ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (/ (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (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 phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) #s(hole binary64 (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))) lambda1)))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) lambda1)))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (pow (cos phi1) 2) (- (cos phi1) (* (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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (* (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 (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (pow (cos phi1) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (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 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 lambda1))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* lambda1 (- (+ 1 (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda2 2)) (pow lambda1 2)))) (/ lambda2 lambda1)))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* lambda1 (- (+ 1 (/ (* lambda2 (+ (* -1 (pow lambda2 2)) (pow lambda2 2))) (pow lambda1 3))) (+ (* -1 (/ (pow lambda2 2) (pow lambda1 2))) (+ (/ lambda2 lambda1) (/ (pow lambda2 2) (pow lambda1 2))))))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (pow lambda1 3)))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (* (pow lambda1 3) (+ 1 (* -1 (/ (pow lambda2 3) (pow lambda1 3)))))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (pow lambda1 2)))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (* (pow lambda1 2) (+ 1 (/ lambda2 lambda1)))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (* (pow lambda1 2) (+ 1 (+ (/ lambda2 lambda1) (/ (pow lambda2 2) (pow lambda1 2)))))))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) #s(hole binary64 (* lambda1 lambda2)))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) #s(hole binary64 (* lambda1 (+ lambda2 (/ (pow lambda2 2) 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))
#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 (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 lambda1))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (* lambda1 (- (+ 1 (* -1 (/ (+ (* -1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)) (pow lambda1 2)))) (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (* lambda1 (- (+ 1 (* -1 (/ (* (+ (* -1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (pow lambda1 3)))) (+ (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) (+ (* -1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2))) (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2))))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) #s(hole binary64 (pow lambda1 3)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) #s(hole binary64 (* (pow lambda1 3) (+ 1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 3) (pow lambda1 3))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (pow lambda1 2)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (* (pow lambda1 2) (- (+ 1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2))) (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) #s(hole binary64 (pow lambda1 2)))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))))))
#s(approx (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) #s(hole binary64 lambda1))
#s(approx (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) #s(hole binary64 (pow lambda1 2)))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)))))))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) #s(hole binary64 lambda1))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #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))) lambda1) 1) 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))) lambda1) 1) #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))) lambda1) #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))) #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 (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 (+ (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 (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (neg (+ lambda2 (* -1 lambda1)))) (* -1/2 (* (pow phi2 2) (sin (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (cos lambda2)) (/ (sin lambda2) lambda1))))))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) #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 (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1)))))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (/ (sin lambda2) lambda1)) (* 1/2 (cos lambda2)))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* -1 (* (pow lambda1 3) (+ (* 1/6 (sin lambda2)) (* 1/2 (/ (cos lambda2) lambda1)))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* -1 (* (pow lambda1 3) (+ (* -1 (/ (+ (* -1/2 (cos lambda2)) (/ (sin lambda2) lambda1)) lambda1)) (* 1/6 (sin lambda2)))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* -1 (* (pow lambda1 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) lambda1)) (* 1/6 (sin lambda2)))))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (/ (sin lambda2) lambda1)) (* 1/2 (cos lambda2))) lambda1)) (* -1/6 (sin lambda2))))))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) #s(hole binary64 (* -1 (* lambda1 (+ (* 1/6 (sin lambda2)) (* 1/2 (/ (cos lambda2) lambda1)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI))))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 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)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) #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 phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))) (/ (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))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (/ (* (pow (cos phi2) 3) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 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)))))))) (/ (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (/ (* (pow (cos phi2) 3) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 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)))))))) (/ (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (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 phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (* (pow (cos phi2) 3) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 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 (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) #s(hole binary64 (* (pow (cos phi2) 3) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 3))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (* (cos (* 1/2 (PI))) (sin phi1))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (/ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (/ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (/ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (pow (cos phi1) 2) (- (cos phi1) (* (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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ (* (pow (cos phi2) 3) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 3)) (pow (cos phi1) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (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 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (sin (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (sin (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (+ (* -1 lambda2) (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda2 2)) lambda1))) lambda1)) 1)))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (+ (* -1 lambda2) (* -1 (/ (+ (* -1 (/ (* lambda2 (+ (* -1 (pow lambda2 2)) (pow lambda2 2))) lambda1)) (+ (* -1 (pow lambda2 2)) (pow lambda2 2))) lambda1))) lambda1)) 1)))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (* -1 (* (pow lambda1 3) (- (/ (pow lambda2 3) (pow lambda1 3)) 1)))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -1 (/ (+ (* -1 lambda2) (* -1 (/ (pow lambda2 2) lambda1))) lambda1))))))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 lambda2) (* -1 (/ (pow lambda2 2) 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 (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 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 (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (- (+ (* -1 (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2) lambda1)) (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2) lambda1)) (* -1 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))) lambda1)) 1)))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (- (* -1 (/ (- (* -1 (/ (* (+ (* -1 (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2)) (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2)) (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))) lambda1)) (+ (* -1 (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2)) (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2))) lambda1)) (* -1 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))) lambda1)) 1)))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) #s(hole binary64 (* -1 (* (pow lambda1 3) (- (* -1 (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 3) (pow lambda1 3))) 1)))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 3)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -1 (/ (- (* -1 (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2) lambda1)) (* -1 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))) lambda1))))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2)))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -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))) lambda1) #s(hole binary64 (* lambda1 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))))
#s(approx (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -1 (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2) (pow lambda1 2)))))))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) #s(hole binary64 (* -1 (* lambda1 (- (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1) 1)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin lambda1)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx lambda2 #s(hole binary64 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 (+ (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 (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin lambda1) (* -1/2 (* (pow phi2 2) (sin lambda1))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin lambda1) (+ (* -1/2 (* (pow phi2 2) (sin lambda1))) (* lambda2 (+ (* -1 (cos lambda1)) (* 1/2 (* (pow phi2 2) (cos lambda1)))))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin lambda1) (+ (* -1/2 (* (pow phi2 2) (sin lambda1))) (* lambda2 (+ (* -1 (cos lambda1)) (+ (* 1/2 (* (pow phi2 2) (cos lambda1))) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/4 (* (pow phi2 2) (sin lambda1))))))))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin lambda1) (+ (* -1/2 (* (pow phi2 2) (sin lambda1))) (* lambda2 (+ (* -1 (cos lambda1)) (+ (* 1/2 (* (pow phi2 2) (cos lambda1))) (* lambda2 (+ (* -1/2 (sin lambda1)) (+ (* 1/4 (* (pow phi2 2) (sin lambda1))) (* lambda2 (+ (* -1/12 (* (pow phi2 2) (cos lambda1))) (* 1/6 (cos lambda1))))))))))))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 lambda1))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ lambda1 (* lambda2 (- (* -1/2 (* lambda1 lambda2)) 1)))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)))))
#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 (neg (sin lambda2)) #s(hole binary64 (* -1 lambda2)))
#s(approx (neg (sin lambda2)) #s(hole binary64 (* lambda2 (- (* 1/6 (pow lambda2 2)) 1))))
#s(approx (neg (sin lambda2)) #s(hole binary64 (* lambda2 (- (* (pow lambda2 2) (+ 1/6 (* -1/120 (pow lambda2 2)))) 1))))
#s(approx (neg (sin lambda2)) #s(hole binary64 (* lambda2 (- (* (pow lambda2 2) (+ 1/6 (* (pow lambda2 2) (- (* 1/5040 (pow lambda2 2)) 1/120)))) 1))))
#s(approx (sin lambda2) #s(hole binary64 lambda2))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* -1/6 (pow lambda2 2))))))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* (pow lambda2 2) (- (* 1/120 (pow lambda2 2)) 1/6))))))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/120 (* -1/5040 (pow lambda2 2)))) 1/6))))))
#s(approx (- (/ lambda1 lambda2) 1) #s(hole binary64 (/ (+ lambda1 (* -1 lambda2)) lambda2)))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (cos phi2))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* -1/2 (* (pow lambda2 2) (cos phi2)))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda2 2) (cos phi2)))))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (cos phi2))) (* 1/24 (cos phi2))))))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos lambda1) (cos phi2)))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* 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 (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 1))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (+ 1 (* lambda1 lambda2))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2))))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (+ 1 (* lambda2 (+ lambda1 (* lambda2 (- (* -1/6 (* lambda1 lambda2)) 1/2)))))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ 1 (* -1/2 (pow lambda1 2)))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda1 lambda2)))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ lambda1 (* lambda2 (- (* 1/4 (pow lambda1 2)) 1/2))))))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ lambda1 (* lambda2 (- (+ (* -1/6 (* lambda1 lambda2)) (* 1/4 (pow lambda1 2))) 1/2))))))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (* -1/2 lambda1)))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (+ lambda2 (* -1/2 lambda1))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ 1 (* 1/4 (* lambda1 lambda2)))))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ 1 (* lambda2 (+ (* -1/6 lambda2) (* 1/4 lambda1))))))))
#s(approx (* (* (cos lambda2) lambda1) -1/2) #s(hole binary64 (* -1/2 lambda1)))
#s(approx (* (* (cos lambda2) lambda1) -1/2) #s(hole binary64 (+ (* -1/2 lambda1) (* 1/4 (* lambda1 (pow lambda2 2))))))
#s(approx (* (* (cos lambda2) lambda1) -1/2) #s(hole binary64 (+ (* -1/2 lambda1) (* (pow lambda2 2) (+ (* -1/48 (* lambda1 (pow lambda2 2))) (* 1/4 lambda1))))))
#s(approx (* (* (cos lambda2) lambda1) -1/2) #s(hole binary64 (+ (* -1/2 lambda1) (* (pow lambda2 2) (+ (* 1/4 lambda1) (* (pow lambda2 2) (+ (* -1/48 lambda1) (* 1/1440 (* lambda1 (pow lambda2 2))))))))))
#s(approx (* (cos lambda2) lambda1) #s(hole binary64 lambda1))
#s(approx (* (cos lambda2) lambda1) #s(hole binary64 (+ lambda1 (* -1/2 (* lambda1 (pow lambda2 2))))))
#s(approx (* (cos lambda2) lambda1) #s(hole binary64 (+ lambda1 (* (pow lambda2 2) (+ (* -1/2 lambda1) (* 1/24 (* lambda1 (pow lambda2 2))))))))
#s(approx (* (cos lambda2) lambda1) #s(hole binary64 (+ lambda1 (* (pow lambda2 2) (+ (* -1/2 lambda1) (* (pow lambda2 2) (+ (* -1/720 (* lambda1 (pow lambda2 2))) (* 1/24 lambda1))))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ 1 (* -1/2 (pow lambda1 2)))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda1 (* lambda2 (+ 1 (* -1/6 (pow lambda1 2)))))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ (* lambda1 (+ 1 (* -1/6 (pow lambda1 2)))) (* lambda2 (- (* 1/4 (pow lambda1 2)) 1/2))))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ (* lambda1 (+ 1 (* -1/6 (pow lambda1 2)))) (* lambda2 (- (+ (* 1/4 (pow lambda1 2)) (* lambda1 (* lambda2 (- (* 1/36 (pow lambda1 2)) 1/6)))) 1/2))))))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (* -1/2 lambda1)))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ 1 (* -1/6 (pow lambda1 2)))))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ 1 (+ (* -1/6 (pow lambda1 2)) (* 1/4 (* lambda1 lambda2))))))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ 1 (+ (* -1/6 (pow lambda1 2)) (* lambda2 (+ (* 1/4 lambda1) (* lambda2 (- (* 1/36 (pow lambda1 2)) 1/6))))))))))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) #s(hole binary64 (* -1/2 lambda1)))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) #s(hole binary64 (+ (* -1/2 lambda1) (* -1/6 (* (pow lambda1 2) lambda2)))))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ (* -1/6 (pow lambda1 2)) (* 1/4 (* lambda1 lambda2)))))))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ (* -1/6 (pow lambda1 2)) (* lambda2 (+ (* 1/36 (* (pow lambda1 2) lambda2)) (* 1/4 lambda1))))))))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) #s(hole binary64 -1/2))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) #s(hole binary64 (- (* -1/6 (* lambda1 lambda2)) 1/2)))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) #s(hole binary64 (- (* lambda2 (+ (* -1/6 lambda1) (* 1/4 lambda2))) 1/2)))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) #s(hole binary64 (- (* lambda2 (+ (* -1/6 lambda1) (* lambda2 (+ 1/4 (* 1/36 (* lambda1 lambda2)))))) 1/2)))
#s(approx (* -1/2 (cos lambda2)) #s(hole binary64 -1/2))
#s(approx (* -1/2 (cos lambda2)) #s(hole binary64 (- (* 1/4 (pow lambda2 2)) 1/2)))
#s(approx (* -1/2 (cos lambda2)) #s(hole binary64 (- (* (pow lambda2 2) (+ 1/4 (* -1/48 (pow lambda2 2)))) 1/2)))
#s(approx (* -1/2 (cos lambda2)) #s(hole binary64 (- (* (pow lambda2 2) (+ 1/4 (* (pow lambda2 2) (- (* 1/1440 (pow lambda2 2)) 1/48)))) 1/2)))
#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 phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/6 (* lambda2 (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))))) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/6 (* lambda2 (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))))) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (sin lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* 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)))))) (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/6 (* 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)))))) (* (cos 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)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos 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)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (* (sin lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* (cos 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)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* 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)))))) (* (cos 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)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/6 (* 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)))))) (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (/ (* (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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) (- (* 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 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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi1) (* (cos phi2) (sin lambda1)))) 2)) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2)))) 3))) (+ (/ (* (- (* 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) (- (* 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) 3) (* (pow (cos phi2) 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)) (/ (* (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))))))) (/ (* (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) (- (* 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 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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi1) (* (cos phi2) (sin lambda1)))) 2)) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (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 lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (* (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (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))))))) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2)))) 3))) (+ (/ (* (- (* 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))))) (+ (/ (* (- (* 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) (- (* 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) 3) (* (pow (cos phi2) 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))))) (- (+ (* (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) (- (* 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) 3) (* (pow (cos phi2) 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)) (/ (* (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))))))))) (/ (* (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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi1) (* (cos phi2) (sin lambda1)))) 2)) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2)))) 3))) (+ (/ (* (- (* 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) (- (* 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) 3) (* (pow (cos phi2) 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)) (/ (* (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))))))) (/ (* (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) (- (* 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 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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (pow (cos phi1) 3) (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2)))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* -1 (/ (* lambda2 (* (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 phi1) 3) (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* lambda2 (- (* -1 (* lambda2 (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi1) (* (cos phi2) (sin lambda1)))) 2)) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (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))))) (/ (* (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 phi1) 3) (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (+ (* -1 (/ (* (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi1) (* (cos phi2) (sin lambda1)))) 2)) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (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 lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (* (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (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))))))) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi1) (* (cos phi2) (sin lambda1)))) 2)) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (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))))) (/ (* (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 phi1) 3) (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2))))))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (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))) (* -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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (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))))) (* -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 (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #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))) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (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))) (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (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))))) (* -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))) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #s(hole binary64 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #s(hole binary64 (+ (* 2 (* lambda2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 lambda1) (* (cos phi1) (cos phi2)))))
#s(approx (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (* (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)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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) (- (* 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))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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))))) (+ (/ (* (- (* 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) (- (* 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) 3) (* (pow (cos phi2) 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))))) (/ (* (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) (- (* 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))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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))))) (+ (/ (* (- (* 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))))) (+ (/ (* (- (* 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) (- (* 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) 3) (* (pow (cos phi2) 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))))) (- (+ (* (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) (- (* 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) 3) (* (pow (cos phi2) 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)))))) (/ (* (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)))))) (+ (/ (* (- (* 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) (- (* 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) 3) (* (pow (cos phi2) 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))))) (/ (* (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) (- (* 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))))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) #s(hole binary64 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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)))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos lambda1) (cos phi2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (* (cos phi2) (sin lambda1))) (+ (* (cos lambda1) (cos phi2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (cos phi2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (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)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (/ (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda2 (- (* -1 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (/ (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -1 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* lambda2 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* -1 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* 1/2 (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (+ (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (/ (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -1 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* lambda2 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* -1 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (* 1/2 (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* lambda2 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (/ (* (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 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* 1/2 (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (* 1/6 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (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 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (+ (* 1/6 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1)))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (+ (/ (* (cos phi2) (* (sin lambda1) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (+ (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (/ (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (/ (* lambda2 (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1)))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda2 (- (* -1 (* lambda2 (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (+ (* 1/6 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1)))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (/ (* (cos phi2) (* (sin lambda1) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (/ (* (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 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* 1/2 (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))))) (* -1 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (+ (* lambda2 (- (/ (* (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) (- (/ (* (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 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* 1/2 (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (* 1/6 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (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 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))) (/ (* (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 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* 1/2 (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))))) (* -1 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (cos phi1) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (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 (/ (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (pow (cos phi1) 2) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #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 phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (sin lambda1)))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (+ (* -1 (pow lambda2 3)) (pow lambda1 3))))
#s(approx (pow lambda2 3) #s(hole binary64 (pow lambda2 3)))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 lambda2) (pow lambda1 2))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) #s(hole binary64 (* lambda2 (+ lambda1 lambda2))))
#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 (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (/ (+ (pow lambda1 3) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 3)) (- (+ (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)) (* lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (- (+ (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)) (* lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) #s(hole binary64 (- (pow lambda1 2) (* lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) #s(hole binary64 (/ (- (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)) (- lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1))))
#s(approx (cos lambda2) #s(hole binary64 (cos lambda2)))
#s(approx (neg (sin lambda2)) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (sin lambda2) #s(hole binary64 (sin lambda2)))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos lambda2) (cos phi2)))))
#s(approx (* -1/2 (cos lambda2)) #s(hole binary64 (* -1/2 (cos lambda2))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* lambda2 (- (* -1 (/ (+ (* -1 (pow lambda1 2)) (pow lambda1 2)) (pow lambda2 2))) (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* lambda2 (- (/ (* lambda1 (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) (pow lambda2 3)) (+ 1 (+ (* -1 (/ lambda1 lambda2)) (+ (* -1 (/ (pow lambda1 2) (pow lambda2 2))) (/ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (* (pow lambda2 3) (- (/ (pow lambda1 3) (pow lambda2 3)) 1))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (* (pow lambda2 2) (+ 1 (/ lambda1 lambda2)))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (* (pow lambda2 2) (+ 1 (+ (/ lambda1 lambda2) (/ (pow lambda1 2) (pow lambda2 2)))))))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) #s(hole binary64 (* (pow lambda2 2) (+ 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))) lambda1) 1) 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))) lambda1) 1) #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))) lambda1) #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))) #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 (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 (+ (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 (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (+ lambda1 (* -1 lambda2))) (* -1/2 (* (pow phi2 2) (sin (+ lambda1 (* -1 lambda2))))))))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI))))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (+ lambda1 (* -1 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)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (+ lambda1 (* -1 lambda2))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (/ (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (/ (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))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (/ (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (/ (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (/ (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (/ (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (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 phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 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 (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) #s(hole binary64 (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 3))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (/ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (/ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (/ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (pow (cos phi1) 2) (- (cos phi1) (* (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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 3)) (pow (cos phi1) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (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 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (sin (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ (- (+ (* -1 (/ (pow lambda1 2) lambda2)) (/ (pow lambda1 2) lambda2)) (* -1 lambda1)) lambda2)))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ (- (* -1 (/ (- (/ (* lambda1 (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) lambda2) (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) lambda2)) (* -1 lambda1)) lambda2)))))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (* -1 (* (pow lambda2 3) (+ 1 (* -1 (/ (pow lambda1 3) (pow lambda2 3))))))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (* (pow lambda2 2) (+ 1 (* -1 (/ (+ (* -1 lambda1) (* -1 (/ (pow lambda1 2) lambda2))) 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 (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (/ (+ (pow lambda1 3) (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 3)) (- (+ (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 2)) (* lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) #s(hole binary64 (+ (pow lambda1 3) (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 3))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 3)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (- (+ (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 2)) (* lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 2)))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) #s(hole binary64 (- (pow lambda1 2) (* 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))) lambda1) #s(hole binary64 (* lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) #s(hole binary64 (/ (- (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 2)) (- lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) #s(hole binary64 (- (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 2))))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) #s(hole binary64 (- lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#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 (cos phi1) #s(hole binary64 1))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* -1/2 (pow phi1 2)))))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))))
#s(approx phi1 #s(hole binary64 phi1))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (* (cos lambda1) (cos phi2)))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (* (cos lambda2) (cos phi2)))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos lambda2) (cos phi2))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos lambda2) (cos phi2)) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos lambda2) (cos phi2)) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos 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) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (/ 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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (+ (* -1 (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 1 (* -1/2 (* (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))))) (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* 1/24 (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 7/8 (/ 1 (- (+ 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) (pow (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* 1/3 (/ 1 (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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))))) (/ (* (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) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 1 (* -1/2 (* (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))))) (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* -1 (* (pow phi1 2) (+ (* -1 (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (- (+ (* 1/24 (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 7/8 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2))))))) (+ (* 1/3 (/ 1 (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (* (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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)))))) (+ (* -1 (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 2/45 (* -1/720 (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* -1 (/ (+ 2/45 (* -1/720 (* (cos phi2) (cos (- lambda1 lambda2))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 61/240 (/ 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 (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (pow (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (/ (* (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))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (- 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)))) 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))) (* 7/8 (/ 1 (- (+ 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) (pow (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* 1/3 (/ 1 (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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))))) (/ (* (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) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 1 (* -1/2 (* (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))))) (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* 1/24 (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 7/8 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2))))))) (+ (* 1/3 (/ 1 (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* -1 (* (pow phi1 2) (+ (* -1 (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (- (+ (* 1/24 (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 7/8 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2))))))) (+ (* 1/3 (/ 1 (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (* (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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)))))) (+ (* -1 (/ (+ 2/45 (* -1/720 (* (cos phi2) (cos (- lambda1 lambda2))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 61/240 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2))))))))))) (+ (* 1/24 (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 7/8 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))))))) (+ (* 1/3 (/ 1 (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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))))))))
#s(approx (pow (cos phi1) 3) #s(hole binary64 1))
#s(approx (pow (cos phi1) 3) #s(hole binary64 (+ 1 (* -3/2 (pow phi1 2)))))
#s(approx (pow (cos phi1) 3) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* 7/8 (pow phi1 2)) 3/2)))))
#s(approx (pow (cos phi1) 3) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 7/8 (* -61/240 (pow phi1 2)))) 3/2)))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* 1/2 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (* -1/24 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* -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 (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* 1/720 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/24 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (cos phi1) (* (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 (+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (* (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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (/ (* (pow phi1 2) (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (/ (* (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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* (pow phi1 2) (- (* -1 (* (pow phi1 2) (+ (* -1 (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (pow (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (/ (* (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) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (/ (* (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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* -1 (* (pow phi1 2) (+ (* -1 (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 2/45 (* -1/720 (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1 (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (pow (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (/ (* (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))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (- 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)))) 3)))))) (+ (* -1 (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (pow (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (/ (* (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) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (/ (* (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 (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (+ (* phi1 (cos (* 1/2 (PI)))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (+ (* phi1 (+ (cos (* 1/2 (PI))) (* -1/2 (* phi1 (sin (* 1/2 (PI))))))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (+ (* phi1 (+ (cos (* 1/2 (PI))) (* phi1 (+ (* -1/2 (sin (* 1/2 (PI)))) (* -1/6 (* phi1 (cos (* 1/2 (PI))))))))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi1 (cos (* 1/2 (PI)))))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi1 (+ (cos (* 1/2 (PI))) (* -1/2 (* phi1 (sin (* 1/2 (PI))))))))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi1 (+ (cos (* 1/2 (PI))) (* phi1 (+ (* -1/2 (sin (* 1/2 (PI)))) (* -1/6 (* phi1 (cos (* 1/2 (PI))))))))))))
#s(approx (sin phi1) #s(hole binary64 phi1))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* -1/6 (pow phi1 2))))))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* (pow phi1 2) (- (* 1/120 (pow phi1 2)) 1/6))))))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/120 (* -1/5040 (pow phi1 2)))) 1/6))))))
#s(approx (* (cos phi1) (sin (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (* (cos phi1) (sin (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* -1/2 (* (pow phi1 2) (sin (* 1/2 (PI))))))))
#s(approx (* (cos phi1) (sin (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* (pow phi1 2) (+ (* -1/2 (sin (* 1/2 (PI)))) (* 1/24 (* (pow phi1 2) (sin (* 1/2 (PI))))))))))
#s(approx (* (cos phi1) (sin (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* (pow phi1 2) (+ (* -1/2 (sin (* 1/2 (PI)))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin (* 1/2 (PI))))) (* 1/24 (sin (* 1/2 (PI)))))))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (/ 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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 1/2 (/ 1 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* (pow phi1 2) (- (+ (* -1/4 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 1/24 (/ 1 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* (pow phi1 2) (- (+ (* -1/4 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* (pow phi1 2) (- (+ (* -1/720 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/720 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/48 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (* 1/2 (/ (+ (* -1/4 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))) (+ (* -1/2 (/ (- (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 1/24 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* 1/24 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 2/45 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 1/24 (/ 1 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi1 2) (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi1 2) (- (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* (pow phi1 2) (- (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 1/24 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi1 2) (- (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* (pow phi1 2) (- (+ (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* (pow phi1 2) (- (* 1/720 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* -1/2 (/ (- (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 1/24 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* 1/24 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 2/45 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 1/24 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi1 2) (- (* -1 (* (pow phi1 2) (+ (* -1/4 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* -1 (* (pow phi1 2) (+ (* -1/720 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/48 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (* 1/2 (/ (+ (* -1/4 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))) (+ (* -1/4 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ 1 (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ 1 (+ (* -3/2 (pow phi1 2)) (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ 1 (+ (* (pow phi1 2) (- (* 7/8 (pow phi1 2)) 3/2)) (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ 1 (+ (* (pow phi1 2) (- (* (pow phi1 2) (+ 7/8 (* -61/240 (pow phi1 2)))) 3/2)) (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (+ 1 (* -1 (pow phi1 2))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #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 (cos phi1) #s(hole binary64 (cos phi1)))
#s(approx (pow (cos phi1) 3) #s(hole binary64 (pow (cos phi1) 3)))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))
#s(approx (sin phi1) #s(hole binary64 (sin phi1)))
#s(approx (* (cos phi1) (sin (/ (PI) 2))) #s(hole binary64 (* (cos phi1) (sin (* 1/2 (PI))))))
#s(approx (pow (cos phi1) 2) #s(hole binary64 (pow (cos phi1) 2)))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))))
#s(approx (cos phi2) #s(hole binary64 1))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))))
#s(approx phi2 #s(hole binary64 phi2))
#s(approx (+ (* (cos (- 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 (+ (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 (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (* (* phi2 phi2) -1/2) #s(hole binary64 (* -1/2 (pow phi2 2))))
#s(approx (* phi2 phi2) #s(hole binary64 (pow phi2 2)))
#s(approx (+ (* (* phi2 phi2) -1/2) 1) #s(hole binary64 1))
#s(approx (+ (* (* phi2 phi2) -1/2) 1) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (cos phi1))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* -1/2 (* (pow phi2 2) (cos lambda1)))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* 1/24 (* (pow phi2 2) (cos lambda1)))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda1))) (* 1/24 (cos lambda1))))))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda2) (cos phi1))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda2) (+ (cos phi1) (* -1/2 (* (pow phi2 2) (cos lambda2)))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda2) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* 1/24 (* (pow phi2 2) (cos lambda2)))))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda2) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda2))) (* 1/24 (cos lambda2))))))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (cos (- lambda1 lambda2)))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (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)) 1) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2)))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (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 phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (sin (+ phi2 (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ phi2 (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi2 (cos (* 1/2 (PI)))))))
#s(approx (sin (+ phi2 (/ (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 (/ (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 (+ phi2 (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ phi2 (/ (PI) 2)) #s(hole binary64 (+ phi2 (* 1/2 (PI)))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (/ (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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) (- (* -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 (- 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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) 2)) (pow (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))) 3))) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (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) (- (* 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)) (/ (* (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)))))))) (+ (/ (* (pow (cos phi1) 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 (- 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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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)))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) 2)) (pow (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))) 3))) (/ (* (pow (cos phi1) 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))) (- (* -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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (* (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) (- (* 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)))) 3))) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (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)))))) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (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 (- 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))))) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2))))) (+ (/ (* (pow (cos phi1) 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)) (/ (* (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)))))))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) 2)) (pow (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))) 3))) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (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) (- (* 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)) (/ (* (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)))))))) (+ (/ (* (pow (cos phi1) 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 (- 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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (pow (cos phi1) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* -1 (/ (* (pow phi2 2) (* (pow (cos phi1) 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))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* (pow phi2 2) (- (* -1 (* (pow phi2 2) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) 2)) (pow (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))) 3))) (/ (* (pow (cos phi1) 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))))) (/ (* (pow (cos phi1) 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))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* (pow phi2 2) (- (* (pow phi2 2) (- (* -1 (* (pow phi2 2) (+ (* -1 (/ (* (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) 2)) (pow (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))) 3))) (/ (* (pow (cos phi1) 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))) (- (* -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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (* (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) (- (* 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)))) 3))) (/ (* (pow (cos phi1) 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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) 2)) (pow (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))) 3))) (/ (* (pow (cos phi1) 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))))) (/ (* (pow (cos phi1) 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))))))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (pow (cos (- lambda1 lambda2)) 2) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))))) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #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 (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #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 (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #s(hole binary64 (pow (cos (- lambda1 lambda2)) 2)))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #s(hole binary64 (+ (* -1 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 (+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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 (- 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 (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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)))))) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (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 (- 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)))))) (/ (* (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 (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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)))))) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (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)))))) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (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 (- 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))))) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2))))) (/ (* (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 (- 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 (- 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)))))) (/ (* (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 (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2))))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) #s(hole binary64 (pow (cos (- lambda1 lambda2)) 3)))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) #s(hole binary64 (+ (* -3/2 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 3))) (pow (cos (- lambda1 lambda2)) 3))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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 (- lambda1 lambda2)) 3))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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 (- lambda1 lambda2)) 3))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2)))))))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (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 (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (/ (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* (pow phi2 2) (- (+ (* -1/24 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (+ (* -1/4 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3))) (+ (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* (pow phi2 2) (- (+ (* -1/24 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))) (* (pow phi2 2) (- (+ (* -1/24 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/720 (/ (pow (cos (- lambda1 lambda2)) 3) (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 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2)))))))) (- (cos phi1) (cos (- lambda1 lambda2))))))) (+ (* -1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -1/4 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3))) (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* -2/45 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/720 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/48 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3)))))))))) (+ (* -1/4 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3))) (+ (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow phi2 2) (* (pow (cos phi1) 2) (cos (- lambda1 lambda2)))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (- (* -1 (* (pow phi2 2) (+ (* -1/4 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3))) (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2)))))) (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (- (* (pow phi2 2) (- (* -1 (* (pow phi2 2) (+ (* -1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -1/4 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3))) (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/720 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/48 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3))))))) (+ (* -1/4 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3))) (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2)))))) (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (- (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* (pow phi2 2) (- (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* -1/24 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (- (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* (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)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/720 (/ (pow (cos (- lambda1 lambda2)) 3) (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 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2)))))))) (- (cos phi1) (cos (- lambda1 lambda2)))))))))) (+ (* -1/24 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ (pow (cos phi1) 3) (pow (cos (- lambda1 lambda2)) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (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 (/ (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #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 phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* -1/2 (* (pow phi2 2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* (pow phi2 2) (+ (* -1/2 (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* 1/24 (* (pow phi2 2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* (pow phi2 2) (+ (* -1/2 (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (* 1/24 (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))))
#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 (cos phi2) #s(hole binary64 (cos phi2)))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (/ (sin (- lambda1 lambda2)) (pow phi2 2))))))
#s(approx (+ (* (* phi2 phi2) -1/2) 1) #s(hole binary64 (* -1/2 (pow phi2 2))))
#s(approx (+ (* (* phi2 phi2) -1/2) 1) #s(hole binary64 (* (pow phi2 2) (- (/ 1 (pow phi2 2)) 1/2))))
#s(approx (sin (+ phi2 (/ (PI) 2))) #s(hole binary64 (sin (+ phi2 (* 1/2 (PI))))))
#s(approx (+ phi2 (/ (PI) 2)) #s(hole binary64 phi2))
#s(approx (+ phi2 (/ (PI) 2)) #s(hole binary64 (* phi2 (+ 1 (* 1/2 (/ (PI) phi2))))))
#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))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2))))))
#s(approx (sin (+ phi2 (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (* -1 phi2)))))
#s(approx (+ phi2 (/ (PI) 2)) #s(hole binary64 (* -1 (* phi2 (- (* -1/2 (/ (PI) phi2)) 1)))))

Outputs
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) lambda1)
lambda1
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (.f64 (+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1))
(.f64 (+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1)
(+.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 (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 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)
(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 (neg.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) (neg.f64 (fma.f64 lambda1 lambda1 (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda2)))))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda2))))
(-.f64 (/.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
(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
(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))
(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)))
(fma.f64 (sin.f64 phi1) #s(literal 0 binary64) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(sin.f64 (+.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 phi1))
(cos.f64 phi1)
(+.f64 (.f64 (sin.f64 phi1) #s(literal 0 binary64)) (.f64 (cos.f64 phi1) #s(literal 1 binary64)))
phi1
#s(literal 1 binary64)
(+.f64 lambda1 (atan2.f64 #s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 #s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (sin.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 (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 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(+.f64 lambda1 (atan2.f64 #s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (fma.f64 (.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 #s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (fma.f64 (.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (fma.f64 (.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
(+.f64 (.f64 (.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64))
(*.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/2 binary64)
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (+ ( (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 #s(approx (+ ( (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 #s(approx (+ ( (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))
(fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))
(+.f64 (.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 lambda2) lambda1) (neg.f64 (sin.f64 lambda2)))
(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)
(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))))
(sin.f64 lambda2)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* 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))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (cos.f64 phi2) (sin.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2))))
(sin.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(/.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)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))
(sin.f64 (+.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 lambda1))
(cos.f64 lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))
(+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 1 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(approx (+ ( (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(approx (+ ( (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 #s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) #s(literal 1 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (cos.f64 phi1) #s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (cos.f64 phi1) (.f64 #s(approx (+ ( (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 #s(approx (+ ( (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (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) #s(approx (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (+ ( (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2))))
(.f64 (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))) (cos.f64 lambda2))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2))))))
(+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (+ ( (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))))
(.f64 (cos.f64 phi2) #s(approx (+ ( (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2))))
#s(approx (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))
(fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2))
(+.f64 (*.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 lambda2))
(neg.f64 lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64)) (neg.f64 (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64)) (neg.f64 (sin.f64 lambda2))) lambda1 (cos.f64 lambda2))))))
(+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (+ ( (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64)) (neg.f64 (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)))))
(.f64 (cos.f64 phi2) #s(approx (+ ( (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64)) (neg.f64 (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)))
(fma.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64)) (neg.f64 (sin.f64 lambda2))) lambda1 (cos.f64 lambda2))
(+.f64 (.f64 (-.f64 (.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64)) (neg.f64 (sin.f64 lambda2))) lambda1) (cos.f64 lambda2))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (sin.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64)) (.f64 (.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64)) (+.f64 (pow.f64 (neg.f64 (sin.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64)) (neg.f64 (sin.f64 lambda2))))))
(-.f64 (.f64 (.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64)) (neg.f64 (sin.f64 lambda2)))
(.f64 (.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64))
(*.f64 (cos.f64 lambda2) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin 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)))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin 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))))))
(+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (+ ( (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin 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)))))
(.f64 (cos.f64 phi2) #s(approx (+ ( (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin 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 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin 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)))
(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))
(+.f64 (.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))
(/.f64 (-.f64 (pow.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) #s(literal 3 binary64)) (pow.f64 (neg.f64 (sin.f64 lambda2)) #s(literal 3 binary64))) (fma.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) (.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1) (+.f64 (pow.f64 (neg.f64 (sin.f64 lambda2)) #s(literal 2 binary64)) (.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))))))
(-.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)))
(.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)
(fma.f64 (.f64 #s(literal 1/6 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))
(+.f64 (.f64 (.f64 #s(literal 1/6 binary64) lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))
(*.f64 #s(literal 1/6 binary64) lambda1)
#s(literal 1/6 binary64)
(*.f64 #s(literal -1/2 binary64) (cos.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))))))
(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 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(/.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 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2)))) #s(literal 2 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 (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))
(sin.f64 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))))))
(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 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(/.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 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2)))) #s(literal 2 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)))
(+.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
(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) (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 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(/.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 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2)))) #s(literal 2 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 (cos.f64 phi2) #s(literal 1 binary64))
#s(literal 1 binary64)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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 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) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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 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) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) (.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)))) (.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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 3 binary64)) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (.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 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))))
(/.f64 (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (neg.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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 3 binary64)) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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)) (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)
(fma.f64 (neg.f64 (cos.f64 phi1)) (neg.f64 (cos.f64 phi1)) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(fma.f64 (fabs.f64 (cos.f64 phi1)) (fabs.f64 (cos.f64 phi1)) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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)) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 3 binary64))) (fma.f64 (pow.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)) (fma.f64 (.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))) (.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (.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 2 binary64)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #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 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))
(exp.f64 (.f64 (log.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 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(/.f64 (neg.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64))) (neg.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (.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 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))
(.f64 (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 lambda1 lambda2)) (cos.f64 phi2)) (pow.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 3 binary64))
(exp.f64 (.f64 (log.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 3 binary64)))
(+.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 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (sin.f64 phi1) #s(literal 0 binary64) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(sin.f64 (+.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 phi1))
(cos.f64 phi1)
(+.f64 (.f64 (sin.f64 phi1) #s(literal 0 binary64)) (.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(sin.f64 phi1)
(*.f64 (cos.f64 phi1) #s(literal 1 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)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (fma.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.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 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 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.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)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(/.f64 (-.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 (cos.f64 phi1) (.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 (-.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)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(/.f64 (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(*.f64 (neg.f64 (cos.f64 phi1)) (neg.f64 (cos.f64 phi1)))
(*.f64 (fabs.f64 (cos.f64 phi1)) (fabs.f64 (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) (cos.f64 (-.f64 phi1 phi1))) #s(literal 2 binary64))
(-.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi1)))
(exp.f64 (*.f64 (log.f64 (cos.f64 phi1)) #s(literal 2 binary64)))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))
(/.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) (+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (.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)))
(/.f64 (neg.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))) (neg.f64 (-.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 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 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (+.f64 (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)) (.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 (+.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))) (+.f64 (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)) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))))
(/.f64 (neg.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)))) (neg.f64 (+.f64 (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)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))))
(/.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))) (+.f64 (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)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))))
(+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (+.f64 (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)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (+.f64 (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)) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))))
(.f64 (+.f64 (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)) (.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)))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))
(fma.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))
(+.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 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.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 (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)) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(/.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)) (cos.f64 phi1)) #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)) (cos.f64 phi1)) (.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 (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 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (fma.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.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 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 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.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)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(/.f64 (-.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 (cos.f64 phi1) (.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 (-.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)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.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 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) #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 (pow.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)) (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)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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) (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)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(/.f64 (neg.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) (neg.f64 (fma.f64 lambda1 lambda1 (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda2)))))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda2))))
(-.f64 (/.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)
(.f64 (fma.f64 lambda1 lambda1 (fma.f64 lambda2 lambda2 (.f64 lambda1 lambda2))) (-.f64 lambda1 lambda2))
(/.f64 (-.f64 (pow.f64 (pow.f64 lambda1 #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 lambda2 #s(literal 3 binary64)) #s(literal 3 binary64))) (fma.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)) (*.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))))))
(-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))
(.f64 (.f64 lambda1 lambda1) lambda1)
(.f64 lambda1 (.f64 lambda1 lambda1))
(pow.f64 lambda1 #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 lambda1) #s(literal 3 binary64)))
(.f64 (.f64 lambda2 lambda2) lambda2)
(.f64 lambda2 (.f64 lambda2 lambda2))
(pow.f64 lambda2 #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 lambda2) #s(literal 3 binary64)))
(fma.f64 (fabs.f64 lambda1) (fabs.f64 lambda1) (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda2)))
(fma.f64 (neg.f64 lambda1) (neg.f64 lambda1) (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda2)))
(fma.f64 lambda1 lambda1 (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda2)))
(+.f64 (.f64 lambda1 lambda1) (fma.f64 lambda2 lambda2 (.f64 lambda1 lambda2)))
(fma.f64 (fabs.f64 lambda2) (fabs.f64 lambda2) (*.f64 lambda1 lambda2))
(fma.f64 (neg.f64 lambda2) (neg.f64 lambda2) (*.f64 lambda1 lambda2))
(fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda2))
(+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 lambda2))
(*.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 (neg.f64 (+.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)) (pow.f64 lambda1 #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))))
(+.f64 (/.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (+.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)))) (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (+.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)))))
(.f64 (+.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) 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))
(fma.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 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))) (pow.f64 lambda1 #s(literal 3 binary64)))
(fma.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (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 2 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))
(+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))
(.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (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 (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 (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)))
(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))
(exp.f64 (.f64 (log.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 (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 (.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 (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 2 binary64)) (-.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 (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 (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))
(exp.f64 (.f64 (log.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 (pow.f64 (.f64 lambda1 lambda1) #s(literal 3 binary64)) (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))) lambda1) #s(literal 3 binary64))) (fma.f64 (.f64 lambda1 lambda1) (.f64 lambda1 lambda1) (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) (.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 (.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 (.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 (fabs.f64 lambda1) (fabs.f64 lambda1))
(*.f64 (neg.f64 lambda1) (neg.f64 lambda1))
(*.f64 lambda1 lambda1)
(pow.f64 lambda1 #s(literal 2 binary64))
(exp.f64 (*.f64 (log.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))) lambda1)
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (-.f64 (.f64 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 2 binary64))) (-.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 (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 2 binary64)) (-.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 (.f64 lambda1 lambda1) #s(literal 3 binary64)) (pow.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 2 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 lambda1 lambda1) (.f64 lambda1 lambda1) (fma.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 2 binary64)) (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 2 binary64)) (.f64 (.f64 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 2 binary64))))))
(-.f64 (.f64 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 2 binary64)))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (+.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 2 binary64)) (.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 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))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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 lambda1 lambda1)
#s(approx (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) 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))) lambda1) 1) 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))) lambda1) 1) (/.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))) lambda1) 1) (/.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))) lambda1) (/.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))) (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 (fma.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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (neg.f64 (sin.f64 lambda2)))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (*.f64 lambda1 (cos.f64 lambda2))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) lambda2))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (-.f64 lambda1 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 (fma.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 (fma.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 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (fma.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 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 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 lambda1 (fma.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 (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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 #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) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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 (fma.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 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.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 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))) (.f64 lambda1 (fma.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 (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (+.f64 (neg.f64 (sin.f64 lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 phi2 phi2) (neg.f64 (sin.f64 lambda2))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (+.f64 (neg.f64 (sin.f64 lambda2)) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 phi2) (neg.f64 (sin.f64 lambda2))) (.f64 lambda1 (+.f64 (cos.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda2))))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (+.f64 (neg.f64 (sin.f64 lambda2)) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 phi2) (neg.f64 (sin.f64 lambda2))) (.f64 lambda1 (+.f64 (cos.f64 lambda2) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda2)) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (neg.f64 (sin.f64 lambda2)) (.f64 #s(literal 1/4 binary64) (.f64 (*.f64 phi2 phi2) (neg.f64 (sin.f64 lambda2))))))))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (+.f64 (neg.f64 (sin.f64 lambda2)) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 phi2) (neg.f64 (sin.f64 lambda2))) (.f64 lambda1 (+.f64 (cos.f64 lambda2) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda2)) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (neg.f64 (sin.f64 lambda2)) (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 phi2 phi2) (neg.f64 (sin.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/6 binary64) (cos.f64 lambda2) (.f64 #s(literal 1/12 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda2))))))))))))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2)))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2)))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) (*.f64 #s(literal -1 binary64) lambda2))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) (+.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 lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 phi2) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 lambda1 lambda1) (cos.f64 phi2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 phi2) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 lambda1 lambda1) (cos.f64 phi2))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 phi2) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 lambda1 lambda1) (cos.f64 phi2)) (*.f64 #s(literal 1/24 binary64) (cos.f64 phi2)))))))))
#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 (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (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)) 1) (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (fma.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)) 1) (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))) (.f64 lambda1 (fma.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 (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (cos.f64 lambda2))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
#s(approx (neg lambda1) (*.f64 #s(literal -1 binary64) lambda1))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (cos.f64 lambda2))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos 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 lambda2) lambda1) -1/2) (neg (sin lambda2))) (sin.f64 lambda2))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))
#s(approx (* (* (cos lambda2) lambda1) -1/2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))))
#s(approx (* (cos lambda2) lambda1) (*.f64 lambda1 (cos.f64 lambda2)))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) (cos.f64 lambda2))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2)))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos 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 (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) (sin.f64 lambda2))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) (+.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 (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (.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 (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (sin.f64 lambda2)))))
#s(approx (* 1/6 lambda1) (*.f64 #s(literal 1/6 binary64) lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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 phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 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) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 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) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 lambda1 (fma.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 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 phi2))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 lambda1 (fma.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 (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 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda2) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (cos.f64 lambda2) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 lambda2) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (cos.f64 lambda2) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) (sin.f64 (+.f64 phi2 (.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 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (.f64 (cos.f64 lambda2) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (.f64 (cos.f64 lambda2) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (cos.f64 lambda2) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 lambda2) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (cos.f64 lambda2) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) (sin.f64 (+.f64 phi2 (.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 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (.f64 (cos.f64 lambda2) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda2) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 #s(literal -1 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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 lambda2) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (sin.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 lambda2) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))) (.f64 (cos.f64 lambda2) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (sin.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal 1/6 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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))))) (.f64 (cos.f64 lambda2) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (.f64 (cos.f64 lambda2) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (fma.f64 #s(literal -1 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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 lambda2) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (sin.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 lambda2) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))) (.f64 (cos.f64 lambda2) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (sin.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal 1/6 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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))))) (.f64 (cos.f64 lambda2) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (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))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (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))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (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 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 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 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #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))))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (fma.f64 lambda1 (-.f64 (fma.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 lambda2) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda2) (pow.f64 (neg.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 (neg.f64 (sin.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.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)))))) #s(literal 2 binary64))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 3 binary64))) (+.f64 (/.f64 (.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 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (pow.f64 (cos.f64 lambda2) #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)))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 2 binary64))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 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 (neg.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 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #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 (neg.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)))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 2 binary64)))))) (/.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 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 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 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #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))))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (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 (neg.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 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.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)))))) #s(literal 2 binary64))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 3 binary64))) (/.f64 (.f64 (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 (neg.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)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(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 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (.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 (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 (neg.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))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 3 binary64))) (+.f64 (/.f64 (.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 -1/2 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda2) (pow.f64 (neg.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 (neg.f64 (sin.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (.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 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (pow.f64 (cos.f64 lambda2) #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)))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 2 binary64))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (pow.f64 (cos.f64 lambda2) #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 (neg.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))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 2 binary64)))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (.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 (neg.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 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (pow.f64 (cos.f64 lambda2) #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)))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 2 binary64))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 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 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #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))))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 2 binary64)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (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) (pow.f64 (neg.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 (neg.f64 (sin.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.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)))))) #s(literal 2 binary64))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 3 binary64))) (+.f64 (/.f64 (.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 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (pow.f64 (cos.f64 lambda2) #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)))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 2 binary64))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 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 (neg.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 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #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 (neg.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)))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 2 binary64)))))) (/.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 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 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 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #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))))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 lambda1 (.f64 (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)))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.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)))))) #s(literal 2 binary64))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 3 binary64))) (/.f64 (.f64 (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 (neg.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)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 2 binary64)))))) (/.f64 (.f64 (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))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 lambda1 (-.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.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)))))) #s(literal 2 binary64))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 3 binary64))) (/.f64 (.f64 (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 (neg.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)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(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 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (.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 (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 (neg.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))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 3 binary64))) (/.f64 (.f64 (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))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.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)))))) #s(literal 2 binary64))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 3 binary64))) (/.f64 (.f64 (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 (neg.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)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 2 binary64)))))) (/.f64 (.f64 (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))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.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)))))) (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.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 (.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 (neg.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)))))) (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.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 (neg.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)))))) (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.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)))))) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.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 (.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 (neg.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)))))) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.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 (neg.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)))))) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 2 binary64)))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (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 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 2 binary64))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (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 (neg.f64 (sin.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 2 binary64))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (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 (neg.f64 (sin.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (.f64 (cos.f64 phi2) (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 (fma.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 (fma.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))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 lambda1 (fma.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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (.f64 lambda1 (fma.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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (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 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (pow.f64 (cos.f64 lambda2) #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)))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 lambda1 (-.f64 (fma.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 lambda2) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda2) (pow.f64 (neg.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 (neg.f64 (sin.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (.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 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (pow.f64 (cos.f64 lambda2) #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)))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 2 binary64))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (pow.f64 (cos.f64 lambda2) #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 (neg.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))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 2 binary64))))) (/.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 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (pow.f64 (cos.f64 lambda2) #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)))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (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 (neg.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 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (.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 -1/2 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda2) (pow.f64 (neg.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 (neg.f64 (sin.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (.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 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (pow.f64 (cos.f64 lambda2) #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)))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 2 binary64))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (pow.f64 (cos.f64 lambda2) #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 (neg.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))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 2 binary64)))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (.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 (neg.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 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (pow.f64 (cos.f64 lambda2) #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)))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 2 binary64))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (pow.f64 (cos.f64 lambda2) #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)))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 2 binary64)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (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) (pow.f64 (neg.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 (neg.f64 (sin.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (.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 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (pow.f64 (cos.f64 lambda2) #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)))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 2 binary64))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (pow.f64 (cos.f64 lambda2) #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 (neg.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))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 2 binary64))))) (/.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 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (pow.f64 (cos.f64 lambda2) #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)))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 3 binary64)))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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)))))) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 3 binary64))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (fma.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (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) (pow.f64 (neg.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 (neg.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))))))) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 3 binary64))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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 (neg.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)) (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) (pow.f64 (neg.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 (neg.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))))))) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 3 binary64))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (fma.f64 lambda1 (fma.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))))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))) (.f64 lambda1 (fma.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)))))))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 lambda1 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64))) (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 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64))) (/.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 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 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 (neg.f64 (sin.f64 lambda2)) #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 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64)))) (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 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64))) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64))) (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 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (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 (neg.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 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64))) (/.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 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64)))))) (-.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 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.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 (pow.f64 (cos.f64 phi1) #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 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 3 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 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)))))))) (/.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 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 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 (neg.f64 (sin.f64 lambda2)) #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 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64)))) (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 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64))) (/.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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64)))) (/.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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 lambda1 (-.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.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 (pow.f64 (cos.f64 phi1) #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 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 3 binary64))) (.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (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 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (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 (.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 (neg.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 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64))) (/.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 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #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 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (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 lambda1 (-.f64 (/.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 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64))) (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 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (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 (neg.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 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64))) (/.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 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.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 (neg.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 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64))) (/.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 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #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 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (.f64 (cos.f64 phi2) (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))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (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) (pow.f64 (neg.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 (neg.f64 (sin.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (pow.f64 (.f64 (cos.f64 phi2) (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 (neg.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)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 2 binary64))) (/.f64 (.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 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (.f64 (cos.f64 phi2) (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))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 2 binary64))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (.f64 (cos.f64 phi2) (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))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (neg.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 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (pow.f64 (.f64 (cos.f64 phi2) (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))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 2 binary64))) (/.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)) (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) (pow.f64 (neg.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 (neg.f64 (sin.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (pow.f64 (.f64 (cos.f64 phi2) (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 (neg.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)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 2 binary64))) (/.f64 (.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 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (.f64 (cos.f64 phi2) (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))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 2 binary64))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (neg.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 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (.f64 (cos.f64 phi2) (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))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 2 binary64)))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 -1/2 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda2) (pow.f64 (neg.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 (neg.f64 (sin.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (pow.f64 (.f64 (cos.f64 phi2) (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 (neg.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)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 2 binary64))) (/.f64 (.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 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (.f64 (cos.f64 phi2) (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))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 2 binary64))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (.f64 (cos.f64 phi2) (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))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+.f64 (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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)))))) (+.f64 (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (fma.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (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) (pow.f64 (neg.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 (neg.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))))))) (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (neg.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)) (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) (pow.f64 (neg.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 (neg.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))))))) (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)))))) (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (.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 (neg.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)))))) (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (neg.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)))))) (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (- (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 (fma.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 (fma.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 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (neg.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)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64))) (/.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)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64)))))) (-.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)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (neg.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)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64))) (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)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64)))))) (-.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 (neg.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)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64))) (/.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)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64)))))) (-.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)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64))) (/.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)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64)))))) (-.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)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 2 binary64))))
#s(approx (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (-.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))) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 2 binary64))))
#s(approx (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (-.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 (neg.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))) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 2 binary64))))
#s(approx (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (-.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 (neg.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))) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 2 binary64))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (fma.f64 lambda1 lambda1 (.f64 lambda2 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) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (fma.f64 lambda1 lambda1 (.f64 lambda2 lambda2)))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (fma.f64 lambda1 lambda1 (.f64 lambda2 lambda2)))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) lambda2))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (fma.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) lambda2))) (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) lambda2)))) (.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) lambda2))) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) lambda2)))))) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) lambda2)))) (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (sin.f64 (*.f64 #s(literal -1 binary64) lambda2)))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (sin.f64 (.f64 #s(literal -1 binary64) lambda2)) (.f64 lambda1 (cos.f64 (*.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (sin.f64 (.f64 #s(literal -1 binary64) lambda2)) (.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal -1 binary64) lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (sin.f64 (.f64 #s(literal -1 binary64) lambda2))))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (sin.f64 (.f64 #s(literal -1 binary64) lambda2)) (.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal -1 binary64) lambda2)) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal -1 binary64) lambda2)) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (cos.f64 (.f64 #s(literal -1 binary64) lambda2))))))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) lambda2))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) (*.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))))
#s(approx (pow lambda1 3) (pow.f64 lambda1 #s(literal 3 binary64)))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (*.f64 lambda2 lambda2))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (fma.f64 lambda1 lambda2 (*.f64 lambda2 lambda2)))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2)))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) (*.f64 lambda2 lambda2))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) (fma.f64 lambda1 lambda2 (*.f64 lambda2 lambda2)))
#s(approx (* lambda1 lambda2) (*.f64 lambda1 lambda2))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 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) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (.f64 (neg.f64 (sin.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (fma.f64 lambda1 (.f64 (cos.f64 lambda2) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 lambda2) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))) (.f64 (cos.f64 lambda2) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 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 (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 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 (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (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)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+.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))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (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)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 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 2 binary64)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) (fma.f64 #s(literal -1 binary64) (.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)))))) (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 2 binary64))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) (fma.f64 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)))))) (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 2 binary64))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (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 2 binary64)))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) (.f64 #s(literal -1 binary64) (.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 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) (.f64 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 (* lambda1 lambda1) (*.f64 lambda1 lambda1))
#s(approx (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 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 (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (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 (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+.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 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (.f64 #s(literal -1 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 2 binary64))))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (-.f64 (.f64 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 2 binary64))))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (.f64 #s(literal -1 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 (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.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) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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))) lambda1) 1) lambda1) lambda1)
#s(approx (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) 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))) lambda1) 1) #s(literal 1 binary64))
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (+.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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 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 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 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 lambda2) lambda1) (neg (sin lambda2))) (*.f64 lambda1 (cos.f64 lambda2)))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (.f64 lambda1 (+.f64 (cos.f64 lambda2) (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 lambda2) lambda1)))))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) lambda1)
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) (.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 lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (cos lambda1) (cos.f64 lambda1))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 (sin.f64 lambda2)))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 lambda1 lambda1) (cos.f64 lambda2))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (/.f64 (sin.f64 lambda2) lambda1))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (+.f64 (/.f64 (cos.f64 lambda2) (*.f64 lambda1 lambda1)) (/.f64 (sin.f64 lambda2) lambda1)))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) (*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (/.f64 (sin.f64 lambda2) lambda1))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 #s(literal -1/6 binary64) (.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (sin.f64 lambda2))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 lambda2) lambda1) (.f64 #s(literal -1/6 binary64) (sin.f64 lambda2)))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 lambda2) lambda1) (fma.f64 #s(literal -1/6 binary64) (sin.f64 lambda2) (/.f64 (sin.f64 lambda2) (.f64 lambda1 lambda1))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 lambda2) lambda1) (fma.f64 #s(literal -1/6 binary64) (sin.f64 lambda2) (+.f64 (/.f64 (cos.f64 lambda2) (pow.f64 lambda1 #s(literal 3 binary64))) (/.f64 (sin.f64 lambda2) (.f64 lambda1 lambda1)))))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) (.f64 #s(literal -1/6 binary64) (.f64 (*.f64 lambda1 lambda1) (sin.f64 lambda2))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 lambda2) lambda1) (*.f64 #s(literal -1/6 binary64) (sin.f64 lambda2)))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 lambda2) lambda1) (fma.f64 #s(literal -1/6 binary64) (sin.f64 lambda2) (/.f64 (sin.f64 lambda2) (*.f64 lambda1 lambda1))))))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (.f64 #s(literal -1/6 binary64) (.f64 (*.f64 lambda1 lambda1) (sin.f64 lambda2))))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 lambda2) lambda1) (*.f64 #s(literal -1/6 binary64) (sin.f64 lambda2)))))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (sin.f64 lambda2))))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 lambda2) lambda1) (.f64 #s(literal -1/6 binary64) (sin.f64 lambda2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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 (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 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 (sin lambda1) (sin.f64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) lambda1))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))) lambda1))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (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 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (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 phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.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 (- lambda1 lambda2)) (cos phi2)) 2) (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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))) lambda1))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.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))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.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 (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+.f64 (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #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 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 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.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))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (-.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 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (fma.f64 lambda1 lambda1 (.f64 lambda2 lambda2)))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) lambda1))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (fma.f64 lambda1 lambda1 (.f64 lambda2 lambda2)))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (fma.f64 lambda1 lambda1 (*.f64 lambda2 lambda2))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 lambda2 lambda1)))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (.f64 lambda1 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 lambda2 lambda2) (.f64 lambda2 lambda2)) (*.f64 lambda1 lambda1)))) (/.f64 lambda2 lambda1))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (.f64 lambda1 (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 lambda2 lambda2) (.f64 lambda2 lambda2))) (pow.f64 lambda1 #s(literal 3 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 lambda2 lambda2) (.f64 lambda1 lambda1)) (+.f64 (/.f64 lambda2 lambda1) (/.f64 (.f64 lambda2 lambda2) (.f64 lambda1 lambda1)))))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) (pow.f64 lambda1 #s(literal 3 binary64)))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) (.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (pow.f64 (/.f64 lambda2 lambda1) #s(literal 3 binary64))))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (*.f64 lambda1 lambda1))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (.f64 (.f64 lambda1 lambda1) (+.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (.f64 (.f64 lambda1 lambda1) (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 lambda2 lambda1) (/.f64 (.f64 lambda2 lambda2) (.f64 lambda1 lambda1))))))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) (*.f64 lambda1 lambda2))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) (.f64 lambda1 (+.f64 lambda2 (/.f64 (.f64 lambda2 lambda2) lambda1))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) lambda1))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) lambda1)
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 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 (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) (.f64 lambda1 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 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 2 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 2 binary64))) (.f64 lambda1 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 (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) (.f64 lambda1 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 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 2 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 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)))))) (pow.f64 lambda1 #s(literal 3 binary64))))) (fma.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) (fma.f64 #s(literal -1 binary64) (/.f64 (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 2 binary64)) (.f64 lambda1 lambda1)) (/.f64 (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 2 binary64)) (*.f64 lambda1 lambda1)))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (pow.f64 lambda1 #s(literal 3 binary64)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (pow.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))))) lambda1) #s(literal 3 binary64)))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) (*.f64 lambda1 lambda1))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) (.f64 (.f64 lambda1 lambda1) (+.f64 #s(literal 1 binary64) (.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 (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) (.f64 (.f64 lambda1 lambda1) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (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 2 binary64)) (.f64 lambda1 lambda1))) (/.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 (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) (*.f64 lambda1 lambda1))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) (.f64 (.f64 lambda1 lambda1) (+.f64 #s(literal 1 binary64) (.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 (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) lambda1)
#s(approx (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) lambda1))))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (*.f64 lambda1 lambda1))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (.f64 (.f64 lambda1 lambda1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (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 2 binary64)) (.f64 lambda1 lambda1))))))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) lambda1)
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.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 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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))) lambda1) 1) 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))) lambda1) 1) (+.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))) lambda1) (/.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))) (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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (neg.f64 (sin.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 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 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (+.f64 (neg.f64 (sin.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 phi2) (neg.f64 (sin.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda2) (/.f64 (sin.f64 lambda2) lambda1)))))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) (.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 (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 lambda2) lambda1) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 #s(literal 1/6 binary64) (sin.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 lambda2) lambda1))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (/.f64 (sin.f64 lambda2) lambda1)) lambda1) (*.f64 #s(literal 1/6 binary64) (sin.f64 lambda2))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1) (*.f64 #s(literal 1/6 binary64) (sin.f64 lambda2))))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 lambda2) lambda1) (.f64 #s(literal 1/2 binary64) (cos.f64 lambda2))) lambda1) (.f64 #s(literal -1/6 binary64) (sin.f64 lambda2)))))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal 1/6 binary64) (sin.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 lambda2) lambda1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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 lambda1 lambda2))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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 lambda1 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (.f64 (cos.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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (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 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (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))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (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 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (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 phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (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 (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.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 (- lambda1 lambda2)) (cos phi2)) 2) (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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (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 (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 3 binary64)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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))))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.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))) (-.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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.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 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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.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 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (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 (- (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 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.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))) (-.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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (-.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 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (fma.f64 lambda1 lambda1 (.f64 lambda2 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) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (fma.f64 lambda1 lambda1 (.f64 lambda2 lambda2))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (fma.f64 lambda1 lambda1 (*.f64 lambda2 lambda2))))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (sin.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (fma.f64 lambda1 lambda1 (.f64 lambda2 lambda2)))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) lambda2 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 lambda2 lambda2) (.f64 lambda2 lambda2)) lambda1))) lambda1)) #s(literal 1 binary64)))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) lambda2 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 lambda2 lambda2) (.f64 lambda2 lambda2))) lambda1) (fma.f64 #s(literal -1 binary64) (.f64 lambda2 lambda2) (*.f64 lambda2 lambda2))) lambda1))) lambda1)) #s(literal 1 binary64)))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (-.f64 (pow.f64 (/.f64 lambda2 lambda1) #s(literal 3 binary64)) #s(literal 1 binary64)))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (.f64 (.f64 lambda1 lambda1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) lambda2 (.f64 #s(literal -1 binary64) (/.f64 (*.f64 lambda2 lambda2) lambda1))) lambda1)))))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) lambda2 (.f64 #s(literal -1 binary64) (/.f64 (.f64 lambda2 lambda2) lambda1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (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 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 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 (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.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)))))) #s(literal 2 binary64)) lambda1) (/.f64 (pow.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)))))) #s(literal 2 binary64)) lambda1)) (.f64 #s(literal -1 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)))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (pow.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)))))) #s(literal 2 binary64)) (pow.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)))))) #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))))))) lambda1)) (fma.f64 #s(literal -1 binary64) (pow.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)))))) #s(literal 2 binary64)) (pow.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)))))) #s(literal 2 binary64)))) lambda1)) (.f64 #s(literal -1 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)))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (/.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 3 binary64))) #s(literal 1 binary64)))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow.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)))))) #s(literal 3 binary64)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) (.f64 (.f64 lambda1 lambda1) (+.f64 #s(literal 1 binary64) (.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 (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) (.f64 (.f64 lambda1 lambda1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.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)))))) #s(literal 2 binary64)) lambda1)) (.f64 #s(literal -1 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)))))))) lambda1)))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (pow.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)))))) #s(literal 2 binary64)))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) (.f64 (.f64 lambda1 lambda1) (+.f64 #s(literal 1 binary64) (.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))) lambda1) (.f64 lambda1 (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 (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (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 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (.f64 (.f64 lambda1 lambda1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (pow.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)))))) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (/.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 (* (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 (fma.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 (fma.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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (sin.f64 lambda1))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (sin.f64 lambda1) (.f64 #s(literal -1 binary64) (.f64 lambda2 (cos.f64 lambda1)))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))
#s(approx lambda2 lambda2)
#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 (fma.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 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 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 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (fma.f64 lambda2 (fma.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 phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (.f64 lambda2 (fma.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 (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 lambda2 (fma.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 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.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 (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (+.f64 (sin.f64 lambda1) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 phi2 phi2) (sin.f64 lambda1)))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (+.f64 (sin.f64 lambda1) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 phi2) (sin.f64 lambda1)) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda1))))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (+.f64 (sin.f64 lambda1) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 phi2) (sin.f64 lambda1)) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda1)) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (.f64 #s(literal 1/4 binary64) (.f64 (*.f64 phi2 phi2) (sin.f64 lambda1)))))))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (+.f64 (sin.f64 lambda1) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 phi2) (sin.f64 lambda1)) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda1)) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 phi2 phi2) (sin.f64 lambda1)) (.f64 lambda2 (fma.f64 #s(literal -1/12 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda1)) (.f64 #s(literal 1/6 binary64) (cos.f64 lambda1)))))))))))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) lambda1)
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (+.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda2)) #s(literal 1 binary64)))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (+.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) lambda1 (*.f64 #s(literal 1/6 binary64) lambda2))) #s(literal 1 binary64)))))
#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 (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 (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 (- (/ lambda1 lambda2) 1) (/.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)) lambda2))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 phi2) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 lambda2 lambda2) (cos.f64 phi2))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 phi2) (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 lambda2 lambda2) (cos.f64 phi2))))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 phi2) (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 lambda2 lambda2) (cos.f64 phi2)) (*.f64 #s(literal 1/24 binary64) (cos.f64 phi2)))))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (fma.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (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)) 1) (+.f64 #s(literal 1 binary64) (fma.f64 lambda2 (fma.f64 lambda2 (fma.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 (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(literal 1 binary64))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2)))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (+.f64 #s(literal 1 binary64) (.f64 lambda2 (+.f64 lambda1 (.f64 #s(literal -1/2 binary64) lambda2)))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (+.f64 #s(literal 1 binary64) (.f64 lambda2 (+.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1) (.f64 lambda1 lambda2))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda1)) #s(literal 1/2 binary64))))))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 (.f64 lambda2 (-.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 lambda1 lambda2) (.f64 #s(literal 1/4 binary64) (.f64 lambda1 lambda1))) #s(literal 1/2 binary64))))))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) (*.f64 #s(literal -1/2 binary64) lambda1))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) (+.f64 lambda2 (*.f64 #s(literal -1/2 binary64) lambda1)))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda2))))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 lambda2 (fma.f64 #s(literal -1/6 binary64) lambda2 (*.f64 #s(literal 1/4 binary64) lambda1)))))))
#s(approx (* (* (cos lambda2) lambda1) -1/2) (*.f64 #s(literal -1/2 binary64) lambda1))
#s(approx (* (* (cos lambda2) lambda1) -1/2) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 #s(literal 1/4 binary64) (.f64 lambda1 (*.f64 lambda2 lambda2)))))
#s(approx (* (* (cos lambda2) lambda1) -1/2) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -1/48 binary64) (.f64 lambda1 (.f64 lambda2 lambda2)) (*.f64 #s(literal 1/4 binary64) lambda1)))))
#s(approx (* (* (cos lambda2) lambda1) -1/2) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal 1/4 binary64) lambda1 (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -1/48 binary64) lambda1 (.f64 #s(literal 1/1440 binary64) (.f64 lambda1 (*.f64 lambda2 lambda2)))))))))
#s(approx (* (cos lambda2) lambda1) lambda1)
#s(approx (* (cos lambda2) lambda1) (+.f64 lambda1 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (*.f64 lambda2 lambda2)))))
#s(approx (* (cos lambda2) lambda1) (+.f64 lambda1 (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 #s(literal 1/24 binary64) (.f64 lambda1 (*.f64 lambda2 lambda2)))))))
#s(approx (* (cos lambda2) lambda1) (+.f64 lambda1 (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -1/720 binary64) (.f64 lambda1 (.f64 lambda2 lambda2)) (*.f64 #s(literal 1/24 binary64) lambda1)))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1) (.f64 lambda1 (.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (*.f64 lambda1 lambda1))))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1) (.f64 lambda2 (fma.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 lambda1))) (.f64 lambda2 (-.f64 (.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda1)) #s(literal 1/2 binary64))))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1) (.f64 lambda2 (fma.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 lambda1))) (.f64 lambda2 (-.f64 (fma.f64 #s(literal 1/4 binary64) (.f64 lambda1 lambda1) (.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 #s(literal 1/36 binary64) (.f64 lambda1 lambda1)) #s(literal 1/6 binary64))))) #s(literal 1/2 binary64))))))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) (*.f64 #s(literal -1/2 binary64) lambda1))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (*.f64 lambda1 lambda1))))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 lambda2 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/6 binary64) (.f64 lambda1 lambda1) (.f64 #s(literal 1/4 binary64) (.f64 lambda1 lambda2)))))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 lambda2 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/6 binary64) (.f64 lambda1 lambda1) (.f64 lambda2 (fma.f64 #s(literal 1/4 binary64) lambda1 (.f64 lambda2 (-.f64 (.f64 #s(literal 1/36 binary64) (.f64 lambda1 lambda1)) #s(literal 1/6 binary64))))))))))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (*.f64 #s(literal -1/2 binary64) lambda1))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 #s(literal -1/6 binary64) (.f64 (*.f64 lambda1 lambda1) lambda2))))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 lambda2 (fma.f64 #s(literal -1/6 binary64) (.f64 lambda1 lambda1) (.f64 #s(literal 1/4 binary64) (.f64 lambda1 lambda2))))))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 lambda2 (fma.f64 #s(literal -1/6 binary64) (.f64 lambda1 lambda1) (.f64 lambda2 (fma.f64 #s(literal 1/36 binary64) (.f64 (.f64 lambda1 lambda1) lambda2) (.f64 #s(literal 1/4 binary64) lambda1)))))))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) #s(literal -1/2 binary64))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) (-.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) (-.f64 (.f64 lambda2 (fma.f64 #s(literal -1/6 binary64) lambda1 (.f64 #s(literal 1/4 binary64) lambda2))) #s(literal 1/2 binary64)))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) (-.f64 (.f64 lambda2 (fma.f64 #s(literal -1/6 binary64) lambda1 (.f64 lambda2 (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/36 binary64) (.f64 lambda1 lambda2)))))) #s(literal 1/2 binary64)))
#s(approx (* -1/2 (cos lambda2)) #s(literal -1/2 binary64))
#s(approx (* -1/2 (cos lambda2)) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 lambda2 lambda2)) #s(literal 1/2 binary64)))
#s(approx (* -1/2 (cos lambda2)) (-.f64 (.f64 (.f64 lambda2 lambda2) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal -1/48 binary64) (.f64 lambda2 lambda2)))) #s(literal 1/2 binary64)))
#s(approx (* -1/2 (cos lambda2)) (-.f64 (.f64 (.f64 lambda2 lambda2) (+.f64 #s(literal 1/4 binary64) (.f64 (.f64 lambda2 lambda2) (-.f64 (.f64 #s(literal 1/1440 binary64) (.f64 lambda2 lambda2)) #s(literal 1/48 binary64))))) #s(literal 1/2 binary64)))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 lambda2 (fma.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 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.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 (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (.f64 (sin.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (sin.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (.f64 (sin.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (sin.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (.f64 (sin.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (sin.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (.f64 (sin.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (sin.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))) (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))) (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (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 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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)) (.f64 (pow.f64 (cos.f64 phi2) #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 (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)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (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 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.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)))) #s(literal 2 binary64))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 3 binary64))) (+.f64 (/.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 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 2 binary64))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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)) (.f64 (pow.f64 (cos.f64 phi2) #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 (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))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 2 binary64)))))) (/.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 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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)) (.f64 (pow.f64 (cos.f64 phi2) #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 (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)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (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 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.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)))) #s(literal 2 binary64))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 3 binary64))) (/.f64 (.f64 (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)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 2 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 (pow.f64 (.f64 (cos.f64 lambda1) (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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (.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 (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))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 3 binary64))) (+.f64 (/.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 -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 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 (.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 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 2 binary64))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 2 binary64)))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 (.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 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 2 binary64))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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)) (.f64 (pow.f64 (cos.f64 phi2) #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 (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))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 2 binary64)))))))) (/.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 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.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)))) #s(literal 2 binary64))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 3 binary64))) (+.f64 (/.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 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 2 binary64))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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)) (.f64 (pow.f64 (cos.f64 phi2) #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 (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))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 2 binary64)))))) (/.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 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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)) (.f64 (pow.f64 (cos.f64 phi2) #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 (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)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 lambda2 (.f64 (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)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.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)))) #s(literal 2 binary64))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 3 binary64))) (/.f64 (.f64 (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)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 2 binary64)))))) (/.f64 (.f64 (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))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 lambda2 (-.f64 (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.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)))) #s(literal 2 binary64))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 3 binary64))) (/.f64 (.f64 (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)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 2 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 (pow.f64 (.f64 (cos.f64 lambda1) (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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (.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 (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))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 3 binary64))) (/.f64 (.f64 (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)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.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)))) #s(literal 2 binary64))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 3 binary64))) (/.f64 (.f64 (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)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 2 binary64)))))) (/.f64 (.f64 (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))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.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)))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.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 (.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)))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.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)))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.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)))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.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 (.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)))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.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)))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64)))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (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 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (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)))))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (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))))))) (pow.f64 (*.f64 (cos.f64 lambda1) (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 (fma.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 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))))
#s(approx (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (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 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (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 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 (.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 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 2 binary64))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 2 binary64))))) (/.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 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (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 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 (.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 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 (.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 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 2 binary64))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 2 binary64)))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 (.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 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 2 binary64))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 2 binary64)))))) (/.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 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 (.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 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 2 binary64))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 2 binary64))))) (/.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 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 3 binary64)))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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)))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 3 binary64))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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))))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 3 binary64))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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))))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 3 binary64))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (fma.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.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))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.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 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.f64 lambda2 (-.f64 (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 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi2))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 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 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.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 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.f64 lambda2 (-.f64 (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 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.f64 lambda2 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.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 (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 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.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 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (/.f64 (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi2))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.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 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi2))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 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 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.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 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (+.f64 (/.f64 (.f64 lambda2 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi2))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 lambda2 (-.f64 (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda2 (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi2))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi2))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (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 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (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 (.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 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (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 lambda2 (-.f64 (/.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 (.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 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.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 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (/.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 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 (.f64 (cos.f64 lambda1) (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))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 (pow.f64 (.f64 (cos.f64 lambda1) (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)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 2 binary64))) (/.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 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 (.f64 (cos.f64 lambda1) (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))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 2 binary64))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 (.f64 (cos.f64 lambda1) (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))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 (pow.f64 (.f64 (cos.f64 lambda1) (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)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 2 binary64))) (/.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 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 (pow.f64 (.f64 (cos.f64 lambda1) (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)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 2 binary64))) (/.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 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 (.f64 (cos.f64 lambda1) (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))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 2 binary64))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 (.f64 (cos.f64 lambda1) (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))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 2 binary64)))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 (pow.f64 (.f64 (cos.f64 lambda1) (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)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 2 binary64))) (/.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 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 (.f64 (cos.f64 lambda1) (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))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 2 binary64))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 (.f64 (cos.f64 lambda1) (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))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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)))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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))))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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))))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (.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)))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 (- (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 (fma.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 (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.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)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.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)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (-.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)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.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)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #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)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.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)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64))))
#s(approx (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (-.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))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64))))
#s(approx (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (-.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))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64))))
#s(approx (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (-.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))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 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 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (fma.f64 lambda2 (fma.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 phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (.f64 lambda2 (fma.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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (sin.f64 lambda1))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (sin.f64 lambda1) (.f64 #s(literal -1 binary64) (.f64 lambda2 (cos.f64 lambda1)))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 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 (- (pow lambda1 3) (pow lambda2 3)) (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))))
#s(approx (pow lambda2 3) (pow.f64 lambda2 #s(literal 3 binary64)))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (fma.f64 lambda1 lambda2 (*.f64 lambda1 lambda1)))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) (*.f64 lambda2 (+.f64 lambda1 lambda2)))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))) (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 lambda2 (fma.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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))))) (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) (/.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))) (-.f64 (fma.f64 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 2 binary64))) (.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 (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) (-.f64 (fma.f64 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 2 binary64))) (.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 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) (-.f64 (.f64 lambda1 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 (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (/.f64 (-.f64 (.f64 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 2 binary64))) (-.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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))
#s(approx (cos lambda2) (cos.f64 lambda2))
#s(approx (neg (sin lambda2)) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2)))
#s(approx (sin lambda2) (sin.f64 lambda2))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))
#s(approx (* -1/2 (cos lambda2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 lambda1 lambda1) (.f64 lambda1 lambda1)) (.f64 lambda2 lambda2))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (.f64 lambda2 (-.f64 (/.f64 (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 lambda1 lambda1) (.f64 lambda1 lambda1))) (pow.f64 lambda2 #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (/.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))))))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) (*.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (.f64 (.f64 lambda2 lambda2) (+.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (.f64 (.f64 lambda2 lambda2) (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 lambda1 lambda2) (/.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))))))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) (.f64 (.f64 lambda2 lambda2) (+.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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))) lambda1) 1) 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))) lambda1) 1) (+.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))) lambda1) (/.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))) (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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (sin.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 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 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (+.f64 (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 phi2) (sin.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))))))
#s(approx (* (- (/ lambda1 lambda2) 1) 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)) 1) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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 lambda2)))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (.f64 (cos.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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (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 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) #s(literal 2 binary64)) (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))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (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 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) #s(literal 2 binary64)) (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) #s(literal 2 binary64)) (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) #s(literal 2 binary64)) (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 phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) #s(literal 2 binary64)) (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 (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.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 (- lambda1 lambda2)) (cos phi2)) 2) (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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) #s(literal 2 binary64)) (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 (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) #s(literal 3 binary64)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.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))) (-.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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.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 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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.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 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) #s(literal 2 binary64)) (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) #s(literal 2 binary64)) (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) #s(literal 2 binary64)) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) #s(literal 2 binary64)) (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 (- (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 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.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))) (-.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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (-.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 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (fma.f64 lambda1 lambda1 (.f64 lambda2 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) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (fma.f64 lambda1 lambda1 (.f64 lambda2 lambda2)))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (fma.f64 lambda1 lambda1 (.f64 lambda2 lambda2)))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (fma.f64 lambda1 lambda1 (*.f64 lambda2 lambda2))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (.f64 #s(literal -1 binary64) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (.f64 #s(literal -1 binary64) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 lambda1 lambda1) lambda2) (/.f64 (.f64 lambda1 lambda1) lambda2)) (.f64 #s(literal -1 binary64) lambda1)) lambda2))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (.f64 #s(literal -1 binary64) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 lambda1 lambda1) (.f64 lambda1 lambda1))) lambda2) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 lambda1) (.f64 lambda1 lambda1))) lambda2)) (.f64 #s(literal -1 binary64) lambda1)) lambda2))))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)))))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (.f64 (.f64 lambda2 lambda2) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) lambda1 (.f64 #s(literal -1 binary64) (/.f64 (*.f64 lambda1 lambda1) lambda2))) lambda2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (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 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.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)))))) #s(literal 3 binary64))) (-.f64 (fma.f64 lambda1 lambda1 (pow.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)))))) #s(literal 2 binary64))) (.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 (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.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)))))) #s(literal 3 binary64))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow.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)))))) #s(literal 3 binary64)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) (-.f64 (fma.f64 lambda1 lambda1 (pow.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)))))) #s(literal 2 binary64))) (.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 (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (pow.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)))))) #s(literal 2 binary64)))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) (-.f64 (.f64 lambda1 lambda1) (.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))) lambda1) (.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 (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (/.f64 (-.f64 (.f64 lambda1 lambda1) (pow.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)))))) #s(literal 2 binary64))) (-.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 (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (-.f64 (.f64 lambda1 lambda1) (pow.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)))))) #s(literal 2 binary64))))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (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 (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 #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 (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) #s(literal 1 binary64))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (+.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 (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (+.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) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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 lambda1) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (.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 lambda2) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) (.f64 (cos.f64 lambda2) (cos.f64 phi2)))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (.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) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 phi2 (.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) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 phi2 (.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 (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))) (.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) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (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 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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 phi1 phi1) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (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 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (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 2 binary64))) (.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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (fma.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (-.f64 (fma.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (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 2 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)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 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 3 binary64))) (fma.f64 #s(literal 1/3 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 -2 binary64)) (+.f64 (/.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 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (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 2 binary64))) (.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 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (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))))))) (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 2 binary64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (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 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (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 2 binary64))) (.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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (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 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (fma.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (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 2 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)))) (fma.f64 #s(literal 1/3 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 -2 binary64)) (/.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 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (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 2 binary64))) (.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 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 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (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 2 binary64))) (.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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (+.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/720 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (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 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/720 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (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 2 binary64))) (fma.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 (/.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 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 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 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (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))))))) (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 2 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))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.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/3 binary64) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (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 3 binary64)))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (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 2 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 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 3 binary64))) (fma.f64 #s(literal 1/3 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 -2 binary64)) (+.f64 (/.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 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (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 2 binary64))) (.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 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (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))))))) (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 2 binary64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (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 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (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 2 binary64))) (.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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (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)))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 phi1 phi1) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (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 2 binary64))) (.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))))) (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))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (-.f64 (fma.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (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 2 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)))) (fma.f64 #s(literal 1/3 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 -2 binary64)) (/.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 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (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 2 binary64))) (.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 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (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 2 binary64))) (.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))))) (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))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (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 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (fma.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (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 2 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)))) (fma.f64 #s(literal 1/3 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 -2 binary64)) (/.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 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (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 2 binary64))) (.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 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 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (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 2 binary64))) (.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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/720 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (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 2 binary64))) (.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))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (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 2 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))))) (fma.f64 #s(literal 1/3 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 -2 binary64)) (/.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 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (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 2 binary64))) (.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 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (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 2 binary64))) (.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))))) (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))))
#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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (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 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.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 (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (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 (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi1 phi1) (.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 (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (.f64 phi1 phi1) (-.f64 (.f64 #s(literal -1/24 binary64) (.f64 (.f64 phi1 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (.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 (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (-.f64 (.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)))))) (.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 (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (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 (.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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/.f64 (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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (+.f64 (/.f64 (.f64 (.f64 phi1 phi1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (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 2 binary64))) (/.f64 (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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 (.f64 phi1 phi1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (.f64 phi1 phi1) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 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 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (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))))))) (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 2 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (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 2 binary64))))) (/.f64 (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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (.f64 phi1 phi1) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (+.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/720 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (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 2 binary64))) (+.f64 (/.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 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 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 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (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))))))) (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 2 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))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.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/3 binary64) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (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 3 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 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 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (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))))))) (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 2 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (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 2 binary64))))) (/.f64 (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 phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 phi1 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 phi1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (.f64 phi1 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 phi1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/6 binary64) (.f64 phi1 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (.f64 phi1 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/6 binary64) (.f64 phi1 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (sin phi1) phi1)
#s(approx (sin phi1) (.f64 phi1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)))))
#s(approx (sin phi1) (.f64 phi1 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1)) #s(literal 1/6 binary64))))))
#s(approx (sin phi1) (.f64 phi1 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (*.f64 phi1 phi1)))) #s(literal 1/6 binary64))))))
#s(approx (* (cos phi1) (sin (/ (PI) 2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (* (cos phi1) (sin (/ (PI) 2))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi1 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (cos phi1) (sin (/ (PI) 2))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (.f64 phi1 phi1) (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 phi1 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* (cos phi1) (sin (/ (PI) 2))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (.f64 phi1 phi1) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (.f64 phi1 phi1) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi1 phi1) (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 (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (.f64 phi1 phi1) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -2 binary64)))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (.f64 phi1 phi1) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -2 binary64)) (.f64 (.f64 phi1 phi1) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 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))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -2 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 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/24 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -2 binary64)))))))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (.f64 phi1 phi1) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -2 binary64)) (.f64 (.f64 phi1 phi1) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.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 phi1 phi1) (-.f64 (fma.f64 #s(literal -1/720 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -2 binary64)) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.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))))))))) (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))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -2 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 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/24 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.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))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -2 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 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)))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -2 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 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/24 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -2 binary64)))))))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64)))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 (.f64 phi1 phi1) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -2 binary64))) (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))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 (.f64 phi1 phi1) (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -2 binary64)) (.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))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -2 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 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/24 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -2 binary64))))))) (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))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 (.f64 phi1 phi1) (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -2 binary64)) (.f64 (.f64 phi1 phi1) (-.f64 (fma.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 phi1 phi1) (-.f64 (.f64 #s(literal 1/720 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -2 binary64))) (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))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -2 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 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/24 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.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))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -2 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 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)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -2 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 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/24 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -2 binary64))))))) (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))))
#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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.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 (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 phi1 phi1) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 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 (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 (.f64 phi1 phi1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (.f64 phi1 phi1) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 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 (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (.f64 phi1 phi1) (fma.f64 #s(literal -1/720 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.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)))))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 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 (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)))) (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 2 binary64))) (.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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/.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)))) (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 2 binary64))) (.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 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 3 binary64))) (-.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (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 2 binary64)))))) (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)))) (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 2 binary64))) (.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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)))) (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 2 binary64))) (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 (/.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)))) (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 2 binary64))) (.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 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 3 binary64))) (-.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (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 2 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))))) (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)))) (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 2 binary64))) (.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 (/.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)))) (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 2 binary64))) (.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 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 3 binary64))) (-.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (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 2 binary64)))))) (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)))) (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 2 binary64))) (.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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+.f64 #s(literal 1 binary64) (fma.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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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) (fma.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 (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))) (fma.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))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.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))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 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 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))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))) (fma.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))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.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))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 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 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))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 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 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))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.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)))) (fma.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))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.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))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 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 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))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (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) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (-.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) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (-.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) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (-.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) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (-.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 (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (cos.f64 phi1))
#s(approx (pow (cos phi1) 3) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))
#s(approx (sin phi1) (sin.f64 phi1))
#s(approx (* (cos phi1) (sin (/ (PI) 2))) (.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (pow (cos phi1) 2) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
#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) (fma.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 (+ (* (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 (- 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) (fma.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)))) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 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 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 phi2 phi2) (fma.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) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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 (.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 (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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 (.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) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (* (* phi2 phi2) -1/2) (.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2)))
#s(approx (* phi2 phi2) (*.f64 phi2 phi2))
#s(approx (+ (* (* phi2 phi2) -1/2) 1) #s(literal 1 binary64))
#s(approx (+ (* (* phi2 phi2) -1/2) 1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1)))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi1) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 phi2 phi2) (cos.f64 lambda1))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi1) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 phi2 phi2) (cos.f64 lambda1))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi1) (.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 lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda2) (cos.f64 phi1)))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda2) (+.f64 (cos.f64 phi1) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 phi2 phi2) (cos.f64 lambda2))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda2) (+.f64 (cos.f64 phi1) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 phi2 phi2) (cos.f64 lambda2))))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda2) (+.f64 (cos.f64 phi1) (.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 (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (+.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)) 1) (+.f64 #s(literal 1 binary64) (+.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)) 1) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 phi2 phi2) (fma.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) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 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) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 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) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 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 (.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 (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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) (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) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/6 binary64) (.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (fma.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/6 binary64) (.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#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 (cos.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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/6 binary64) (.f64 phi2 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (+ phi2 (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (+ phi2 (/ (PI) 2)) (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/6 binary64) (.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (fma.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/6 binary64) (.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#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 (cos.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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/6 binary64) (.f64 phi2 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#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) (fma.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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (/.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (fma.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (fma.f64 (.f64 phi2 phi2) (-.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (fma.f64 (.f64 phi2 phi2) (-.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (.f64 phi2 phi2) (-.f64 (fma.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal -61/240 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/720 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/720 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 phi2 phi2) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 (.f64 phi2 phi2) (-.f64 (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/720 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (.f64 phi2 phi2) (-.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.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) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (.f64 phi2 phi2) (-.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 phi2 phi2) (-.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.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) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (.f64 phi2 phi2) (-.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.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 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (.f64 phi2 phi2) (-.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 phi2 phi2) (-.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.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))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 phi2 (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (fma.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 phi2 (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (fma.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -2/45 binary64) (pow.f64 (.f64 phi2 (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#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) (fma.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))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (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 (.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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 (.f64 phi2 phi2) (-.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 (.f64 phi2 phi2) (-.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (.f64 phi2 phi2) (-.f64 (fma.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal -61/240 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/720 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (fma.f64 #s(literal -3/2 binary64) (.f64 (.f64 phi2 phi2) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (fma.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 #s(literal 7/8 binary64) (.f64 (.f64 phi2 phi2) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (fma.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -61/240 binary64) (.f64 (.f64 phi2 phi2) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (.f64 #s(literal 7/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1) (.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) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1) (.f64 (.f64 phi2 phi2) (fma.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 (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (.f64 phi2 phi2) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (.f64 phi2 phi2) (-.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (.f64 phi2 phi2) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (.f64 phi2 phi2) (-.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (.f64 phi2 phi2) (-.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -2/45 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))))))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 (.f64 phi2 phi2) (-.f64 (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 (.f64 phi2 phi2) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 (.f64 phi2 phi2) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (.f64 phi2 phi2) (-.f64 (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal -2/45 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.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 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (/.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (.f64 phi2 phi2) (-.f64 (fma.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal -61/240 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/720 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 (fma.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))) (+.f64 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (fma.f64 #s(literal -3/2 binary64) (.f64 (.f64 phi2 phi2) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (fma.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 #s(literal 7/8 binary64) (.f64 (.f64 phi2 phi2) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (fma.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -61/240 binary64) (.f64 (.f64 phi2 phi2) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (.f64 #s(literal 7/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (fma.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (fma.f64 (.f64 phi2 phi2) (-.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.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) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (fma.f64 (.f64 phi2 phi2) (-.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 phi2 phi2) (-.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.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) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #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 (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) (fma.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 (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (.f64 phi2 phi2) (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal 2/45 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.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)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.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)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (-.f64 (+.f64 (pow.f64 (*.f64 phi2 (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (-.f64 (fma.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal -1/3 binary64) (pow.f64 (.f64 phi2 (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (- (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (-.f64 (fma.f64 (.f64 phi2 phi2) (-.f64 (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal 2/45 binary64) (pow.f64 (.f64 phi2 (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (fma.f64 lambda1 lambda1 (*.f64 lambda2 lambda2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (fma.f64 lambda1 lambda1 (.f64 lambda2 lambda2))))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 phi2) (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (fma.f64 lambda1 lambda1 (*.f64 lambda2 lambda2)))))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (fma.f64 lambda1 lambda1 (.f64 lambda2 lambda2))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (fma.f64 lambda1 lambda1 (.f64 lambda2 lambda2))))) (.f64 #s(literal 1/24 binary64) (.f64 (.f64 phi2 phi2) (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (fma.f64 lambda1 lambda1 (.f64 lambda2 lambda2)))))))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (fma.f64 lambda1 lambda1 (.f64 lambda2 lambda2))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (fma.f64 lambda1 lambda1 (.f64 lambda2 lambda2))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (fma.f64 lambda1 lambda1 (.f64 lambda2 lambda2)))))) (.f64 #s(literal 1/24 binary64) (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (fma.f64 lambda1 lambda1 (*.f64 lambda2 lambda2))))))))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- 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 (- lambda1 lambda2))) (fma.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (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 (- lambda1 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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (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 (- lambda1 lambda2))) (fma.f64 phi2 (fma.f64 phi2 (fma.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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (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)))) (cos.f64 phi2))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (/.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))))
#s(approx (+ (* (* phi2 phi2) -1/2) 1) (.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2)))
#s(approx (+ (* (* phi2 phi2) -1/2) 1) (.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64))))
#s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (+ phi2 (/ (PI) 2)) phi2)
#s(approx (+ phi2 (/ (PI) 2)) (.f64 phi2 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) phi2)))))
#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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (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)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (.f64 #s(literal -1 binary64) phi2))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (.f64 #s(literal -1 binary64) phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) phi2)))))
#s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (.f64 #s(literal -1 binary64) phi2))))
#s(approx (+ phi2 (/ (PI) 2)) (.f64 #s(literal -1 binary64) (.f64 phi2 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) phi2)) #s(literal 1 binary64)))))

eval959.0ms (3.1%)

Memory: 38.4MiB live, 2 358.4MiB allocated; 245ms collecting garbage
Compiler: Compiled 365 281 to 21 195 computations (94.2% saved)

prune217.0ms (0.7%)

Memory

38.3MiB live, 608.3MiB allocated; 26ms collecting garbage

Pruning

83 alts after pruning (82 fresh and 1 done)

	Pruned	Kept	Total
New	5 581	82	5 663
Fresh	0	0	0
Picked	28	1	29
Done	0	0	0
Total	5 609	83	5 692

Accuracy

99.9%

Counts

5 692 → 83

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	51.0%	(/.f64 (-.f64 (.f64 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 2 binary64))) (-.f64 lambda1 (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))))
▶	66.6%	(/.f64 (-.f64 (.f64 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 2 binary64))) #s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.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))))))
▶	49.8%	(/.f64 (+.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)) (pow.f64 lambda1 #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))))
▶	98.8%	(+.f64 lambda1 (atan2.f64 (.f64 (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	78.6%	(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 (+.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	99.6%	(+.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)))))))
▶	20.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.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)))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
▶	18.5%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.f64 #s(approx (- (pow lambda1 3) (pow lambda2 3)) (.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64)))) (fma.f64 lambda1 lambda1 (fma.f64 lambda2 lambda2 (.f64 lambda1 lambda2)))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	91.5%	(+.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 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) #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 (pow.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)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (-.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)) (exp.f64 (.f64 (log.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
▶	91.5%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
▶	91.5%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (.f64 (-.f64 (cos.f64 phi1) (.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 (-.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)))))))
▶	98.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 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 (.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)))))))
▶	82.2%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 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))) (+.f64 (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)) (.f64 #s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1)))))))
▶	70.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (exp.f64 (.f64 (log.f64 (cos.f64 phi1)) #s(literal 3 binary64)))) (+.f64 (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)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))))))
▶	74.0%	(+.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)))) #s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))
▶	69.2%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (/ (pow (cos phi1) 2) (- (cos phi1) ( (cos (- lambda1 lambda2)) (cos phi2)))) (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 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))))
▶	98.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) #s(literal 1 binary64))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	98.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	98.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
▶	73.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))))))
▶	98.3%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)))))))))
▶	80.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))))))
▶	51.7%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	81.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
▶	70.2%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1))))))
▶	77.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(approx (/ (pow (cos phi1) 3) (+ ( (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (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 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))))))
▶	67.5%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(approx (+ ( (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1)))) #s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	77.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
▶	77.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (/ (+ (pow ( (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))))))))
▶	72.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) ( (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
▶	68.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) ( (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))))))))
▶	98.3%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))))
▶	80.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))))
▶	77.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))))
▶	69.7%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2) #s(literal 1 binary64)))))
▶	68.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 (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
▶	78.7%	(+.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(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))))) (cos.f64 phi2) (cos.f64 phi1)))))
▶	78.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #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))))) (cos.f64 phi2) (cos.f64 phi1)))))
▶	78.5%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1)))) (cos.f64 phi2) (cos.f64 phi1)))))
▶	67.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
▶	78.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
▶	80.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda2) (cos.f64 phi1))))))
▶	68.2%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
▶	89.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
▶	63.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
▶	63.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 (/.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))))) lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	87.2%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 #s(approx (- (/ lambda1 lambda2) 1) (.f64 lambda1 (-.f64 (pow.f64 lambda2 #s(literal -1 binary64)) (pow.f64 lambda1 #s(literal -1 binary64))))) lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	98.7%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 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))))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
▶	98.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 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))))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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)))))))
▶	98.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 (cos.f64 lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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)))))))
▶	98.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 (cos.f64 lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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)))))))
▶	98.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 (cos.f64 lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))))))
▶	77.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 (cos.f64 lambda2))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
▶	87.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (neg.f64 (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
▶	71.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
▶	87.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
▶	98.3%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (sin.f64 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) lambda1 (neg.f64 (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) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (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.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) #s(approx ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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)))))))
▶	80.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	98.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 #s(approx (cos lambda2) #s(literal 1 binary64)) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	63.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (cos lambda2) lambda1) (neg (sin lambda2))) lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	78.9%	(+.f64 lambda1 (atan2.f64 (.f64 #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))))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	78.4%	(+.f64 lambda1 (atan2.f64 (.f64 #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))))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	77.6%	(+.f64 lambda1 (atan2.f64 (.f64 #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)))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	77.9%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #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))))) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	77.5%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	49.7%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) #s(approx (+ ( (* phi2 phi2) -1/2) 1) (.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64))))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	77.6%	(+.f64 lambda1 (atan2.f64 #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)))) (+.f64 (cos.f64 phi1) (.f64 #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)))) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	71.1%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (/.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)))))
▶	80.3%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (sin.f64 (+.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	70.3%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1))))))
▶	79.0%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #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)))) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	79.8%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	66.4%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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))))))))
▶	66.8%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
▶	78.9%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1))
▶	80.9%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) lambda1) #s(literal 1 binary64)) lambda1))
▶	77.6%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) lambda1) #s(literal 1 binary64)) lambda1))
▶	80.9%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (+.f64 (/.f64 (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1))
▶	98.8%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 #s(approx (+ (/ (atan2 ( (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/.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)) lambda1))
✓	52.3%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)

Compiler

Compiled 4 029 to 2 457 computations (39% saved)

series1.7s (5.6%)

Memory

53.9MiB live, 3 950.5MiB allocated; 429ms collecting garbage

Counts

571 → 2 853

Calls

Call 1

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

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 (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) 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))) lambda1) 1) 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))) lambda1) 1) #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))) lambda1) 1) #s(hole binary64 (/ (+ 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)))))) lambda1) #s(hole binary64 (/ (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)))))) lambda1) #s(hole binary64 (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)))
#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 (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) #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))) #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 (+ (* (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 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos phi2) (cos (neg lambda2))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* 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))) #s(hole binary64 (+ (cos phi1) (cos (neg lambda2)))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos phi1) (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos phi1) (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos phi1) (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))))))
#s(approx (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) lambda1) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) lambda1) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) #s(hole binary64 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))) lambda1)))
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) #s(hole binary64 (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))) lambda1)))
#s(approx (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) #s(hole binary64 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))) lambda1)))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (* -1 lambda2))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (* -1 lambda2))))) (* (cos phi2) (cos (* -1 lambda2)))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (* -1 lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (* -1 lambda2))))))) (* (cos phi2) (cos (* -1 lambda2)))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (* -1 lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (* -1 lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (* -1 lambda2))))))))) (* (cos phi2) (cos (* -1 lambda2)))))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (cos (* -1 lambda2))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (cos (* -1 lambda2)) (* -1 (* lambda1 (sin (* -1 lambda2)))))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (cos (* -1 lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (* -1 lambda2)))) (sin (* -1 lambda2)))))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (cos (* -1 lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (* -1 lambda2))) (* 1/6 (* lambda1 (sin (* -1 lambda2)))))) (sin (* -1 lambda2)))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* -1 lambda2)))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* -1 (* 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))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/2 (* 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))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* 1/6 (* 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))))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (+ (* 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 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1/2 (pow phi1 2)) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1/2 (pow phi1 2)) (+ (* 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 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (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)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* 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)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/2 (* 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)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* 1/6 (* 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)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (* -1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (* -1 lambda2))))) (* (cos phi2) (cos (* -1 lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (* -1 lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (* -1 lambda2))))))) (* (cos phi2) (cos (* -1 lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (* -1 lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (* -1 lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (* -1 lambda2))))))))) (* (cos phi2) (cos (* -1 lambda2)))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (cos (* -1 lambda2)))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi2) (sin (* -1 lambda2))))) (* (cos phi2) (cos (* -1 lambda2))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (* -1 lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (* -1 lambda2))))))) (* (cos phi2) (cos (* -1 lambda2))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (* -1 lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (* -1 lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (* -1 lambda2))))))))) (* (cos phi2) (cos (* -1 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* -1 (* lambda1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* 1/6 (* lambda1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* 1/6 (* lambda1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* 1/2 (+ (sin (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2)) (sin (- (+ lambda2 (+ phi2 (* 1/2 (PI)))) lambda1))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* 1/2 (+ (sin (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2)) (sin (- (+ lambda2 (+ phi2 (* 1/2 (PI)))) lambda1)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* 1/2 (+ (sin (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2)) (sin (- (+ lambda2 (+ phi2 (* 1/2 (PI)))) lambda1))))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (cos phi1) (* 1/2 (+ (sin (+ lambda2 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (cos phi1) (+ (* 1/2 (* lambda1 (+ (cos (- (+ phi2 (* 1/2 (PI))) lambda2)) (* -1 (cos (+ lambda2 (+ phi2 (* 1/2 (PI))))))))) (* 1/2 (+ (sin (+ lambda2 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) lambda2))))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (cos phi1) (+ (* 1/2 (+ (sin (+ lambda2 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))) (* lambda1 (+ (* 1/2 (* lambda1 (+ (* -1/2 (sin (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* -1/2 (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))))) (* 1/2 (+ (cos (- (+ phi2 (* 1/2 (PI))) lambda2)) (* -1 (cos (+ lambda2 (+ phi2 (* 1/2 (PI))))))))))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (cos phi1) (+ (* 1/2 (+ (sin (+ lambda2 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))) (* lambda1 (+ (* 1/2 (+ (cos (- (+ phi2 (* 1/2 (PI))) lambda2)) (* -1 (cos (+ lambda2 (+ phi2 (* 1/2 (PI)))))))) (* lambda1 (+ (* 1/2 (* lambda1 (+ (* -1/6 (cos (- (+ phi2 (* 1/2 (PI))) lambda2))) (* 1/6 (cos (+ lambda2 (+ phi2 (* 1/2 (PI))))))))) (* 1/2 (+ (* -1/2 (sin (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* -1/2 (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))))))))))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) #s(hole binary64 (* 1/2 (+ (sin (+ lambda2 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) lambda2))))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) #s(hole binary64 (+ (* 1/2 (* lambda1 (+ (cos (- (+ phi2 (* 1/2 (PI))) lambda2)) (* -1 (cos (+ lambda2 (+ phi2 (* 1/2 (PI))))))))) (* 1/2 (+ (sin (+ lambda2 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) #s(hole binary64 (+ (* 1/2 (+ (sin (+ lambda2 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))) (* lambda1 (+ (* 1/2 (* lambda1 (+ (* -1/2 (sin (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* -1/2 (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))))) (* 1/2 (+ (cos (- (+ phi2 (* 1/2 (PI))) lambda2)) (* -1 (cos (+ lambda2 (+ phi2 (* 1/2 (PI)))))))))))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) #s(hole binary64 (+ (* 1/2 (+ (sin (+ lambda2 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))) (* lambda1 (+ (* 1/2 (+ (cos (- (+ phi2 (* 1/2 (PI))) lambda2)) (* -1 (cos (+ lambda2 (+ phi2 (* 1/2 (PI)))))))) (* lambda1 (+ (* 1/2 (* lambda1 (+ (* -1/6 (cos (- (+ phi2 (* 1/2 (PI))) lambda2))) (* 1/6 (cos (+ lambda2 (+ phi2 (* 1/2 (PI))))))))) (* 1/2 (+ (* -1/2 (sin (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* -1/2 (sin (- (+ phi2 (* 1/2 (PI))) lambda2))))))))))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (+ lambda2 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (+ lambda2 (+ phi2 (* 1/2 (PI))))) (+ (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (* lambda1 (+ (cos (- (+ phi2 (* 1/2 (PI))) lambda2)) (* -1 (cos (+ lambda2 (+ phi2 (* 1/2 (PI))))))))))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (+ lambda2 (+ phi2 (* 1/2 (PI))))) (+ (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (* lambda1 (+ (cos (- (+ phi2 (* 1/2 (PI))) lambda2)) (+ (* -1 (cos (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* lambda1 (+ (* -1/2 (sin (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* -1/2 (sin (- (+ phi2 (* 1/2 (PI))) lambda2))))))))))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (+ lambda2 (+ phi2 (* 1/2 (PI))))) (+ (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (* lambda1 (+ (cos (- (+ phi2 (* 1/2 (PI))) lambda2)) (+ (* -1 (cos (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* lambda1 (+ (* -1/2 (sin (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (+ (* -1/2 (sin (- (+ phi2 (* 1/2 (PI))) lambda2))) (* lambda1 (+ (* -1/6 (cos (- (+ phi2 (* 1/2 (PI))) lambda2))) (* 1/6 (cos (+ lambda2 (+ phi2 (* 1/2 (PI))))))))))))))))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (sin (+ lambda2 (+ phi2 (* 1/2 (PI)))))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (+ (sin (+ lambda2 (+ phi2 (* 1/2 (PI))))) (* -1 (* lambda1 (cos (+ lambda2 (+ phi2 (* 1/2 (PI))))))))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (+ (sin (+ lambda2 (+ phi2 (* 1/2 (PI))))) (* lambda1 (+ (* -1 (cos (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* -1/2 (* lambda1 (sin (+ lambda2 (+ phi2 (* 1/2 (PI))))))))))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (+ (sin (+ lambda2 (+ phi2 (* 1/2 (PI))))) (* lambda1 (+ (* -1 (cos (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* lambda1 (+ (* -1/2 (sin (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* 1/6 (* lambda1 (cos (+ lambda2 (+ phi2 (* 1/2 (PI))))))))))))))
#s(approx (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (+ lambda2 (+ phi2 (* 1/2 (PI))))))
#s(approx (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (+ lambda2 (+ phi2 (+ (* -1 lambda1) (* 1/2 (PI)))))))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (sin (- (+ phi2 (* 1/2 (PI))) lambda2))))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (* lambda1 (cos (- (+ phi2 (* 1/2 (PI))) lambda2))))))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (* lambda1 (+ (cos (- (+ phi2 (* 1/2 (PI))) lambda2)) (* -1/2 (* lambda1 (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))))))))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (* lambda1 (+ (cos (- (+ phi2 (* 1/2 (PI))) lambda2)) (* lambda1 (+ (* -1/2 (sin (- (+ phi2 (* 1/2 (PI))) lambda2))) (* -1/6 (* lambda1 (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))))))))))
#s(approx (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (- (+ phi2 (* 1/2 (PI))) lambda2)))
#s(approx (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2)))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (neg lambda2)) (* -1/2 (* (pow phi2 2) (sin (neg lambda2)))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (neg lambda2)) (+ (* -1/2 (* (pow phi2 2) (sin (neg lambda2)))) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* (pow phi2 2) (cos (neg lambda2))))))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (neg lambda2)) (+ (* -1/2 (* (pow phi2 2) (sin (neg lambda2)))) (* lambda1 (+ (cos (neg lambda2)) (+ (* -1/2 (* (pow phi2 2) (cos (neg lambda2)))) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* 1/4 (* (pow phi2 2) (sin (neg lambda2)))))))))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (neg lambda2)) (+ (* -1/2 (* (pow phi2 2) (sin (neg lambda2)))) (* lambda1 (+ (cos (neg lambda2)) (+ (* -1/2 (* (pow phi2 2) (cos (neg lambda2)))) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (+ (* 1/4 (* (pow phi2 2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/6 (cos (neg lambda2))) (* 1/12 (* (pow phi2 2) (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 lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (- (* lambda1 (cos lambda2)) (sin lambda2))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (* (cos lambda2) (cos phi2))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2)))))
#s(approx (* lambda1 (* (cos phi2) (neg (sin lambda2)))) #s(hole binary64 (* -1 (* lambda1 (* (cos phi2) (sin lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (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 (+ (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 (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 (* (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 (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 (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (- (* lambda1 (sin (+ lambda2 (* 1/2 (PI))))) (sin lambda2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (sin (* -1 lambda2)))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda1 (* (cos phi2) (cos (* -1 lambda2)))) (* (cos phi2) (sin (* -1 lambda2))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (* -1 lambda2))))) (* (cos phi2) (cos (* -1 lambda2))))) (* (cos phi2) (sin (* -1 lambda2))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (* -1 lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (* -1 lambda2))))))) (* (cos phi2) (cos (* -1 lambda2))))) (* (cos phi2) (sin (* -1 lambda2))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (sin (* -1 lambda2))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (sin (* -1 lambda2)) (* lambda1 (cos (* -1 lambda2))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (sin (* -1 lambda2)) (* lambda1 (+ (cos (* -1 lambda2)) (* -1/2 (* lambda1 (sin (* -1 lambda2)))))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (sin (* -1 lambda2)) (* lambda1 (+ (cos (* -1 lambda2)) (* lambda1 (+ (* -1/2 (sin (* -1 lambda2))) (* -1/6 (* lambda1 (cos (* -1 lambda2)))))))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (cos (neg lambda2))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* 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)) 1) #s(hole binary64 (+ 1 (+ (* 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 (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) #s(hole binary64 (- (* lambda1 (cos lambda2)) (sin lambda2))))
#s(approx (* lambda1 (cos lambda2)) #s(hole binary64 (* lambda1 (cos lambda2))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (cos lambda2)))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (neg lambda1) #s(hole binary64 (* -1 lambda1)))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (cos lambda2)))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (sin lambda2)))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
#s(approx (* (* (cos lambda2) lambda1) -1/2) #s(hole binary64 (* -1/2 (* lambda1 (cos lambda2)))))
#s(approx (* (cos lambda2) lambda1) #s(hole binary64 (* lambda1 (cos lambda2))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (cos lambda2)))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))))))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (sin lambda2)))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ (sin lambda2) (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))))))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) #s(hole binary64 (* -1/2 (* lambda1 (cos lambda2)))))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) #s(hole binary64 (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2)))))))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) #s(hole binary64 (* -1/2 (cos lambda2))))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) #s(hole binary64 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))))
#s(approx (* 1/6 lambda1) #s(hole binary64 (* 1/6 lambda1)))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) #s(hole binary64 (- (* lambda1 (cos lambda2)) (sin lambda2))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) #s(hole binary64 (- (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))) (sin lambda2))))
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) #s(hole binary64 (* lambda1 (cos lambda2))))
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) #s(hole binary64 (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2)))))))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) #s(hole binary64 (cos lambda2)))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) #s(hole binary64 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))))
#s(approx (* -1/2 (* lambda1 (neg (sin lambda2)))) #s(hole binary64 (* 1/2 (* lambda1 (sin lambda2)))))
#s(approx (* lambda1 (neg (sin lambda2))) #s(hole binary64 (* -1 (* lambda1 (sin lambda2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) #s(hole binary64 (* -1 lambda2)))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) #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 (- (pow lambda2 -1) (pow lambda1 -1))) #s(hole binary64 -1))
#s(approx (* lambda1 (- (pow lambda2 -1) (pow lambda1 -1))) #s(hole binary64 (- (/ lambda1 lambda2) 1)))
#s(approx (- (pow lambda2 -1) (pow lambda1 -1)) #s(hole binary64 (/ -1 lambda1)))
#s(approx (- (pow lambda2 -1) (pow lambda1 -1)) #s(hole binary64 (/ (- (/ lambda1 lambda2) 1) lambda1)))
#s(approx (pow lambda1 -1) #s(hole binary64 (/ 1 lambda1)))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* -1 lambda2)))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 -1))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (- (/ lambda1 lambda2) 1)))
#s(approx (- (pow (/ lambda1 lambda2) 3) 1) #s(hole binary64 -1))
#s(approx (- (pow (/ lambda1 lambda2) 3) 1) #s(hole binary64 (- (/ (pow lambda1 3) (pow lambda2 3)) 1)))
#s(approx (pow (/ lambda1 lambda2) 3) #s(hole binary64 (/ (pow lambda1 3) (pow lambda2 3))))
#s(approx (/ lambda1 lambda2) #s(hole binary64 (/ lambda1 lambda2)))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) #s(hole binary64 1))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) #s(hole binary64 (+ 1 (/ lambda1 lambda2))))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) #s(hole binary64 (+ 1 (* lambda1 (+ (/ 1 lambda2) (/ lambda1 (pow lambda2 2)))))))
#s(approx (+ 1 (* (/ lambda1 lambda2) 1)) #s(hole binary64 1))
#s(approx (+ 1 (* (/ lambda1 lambda2) 1)) #s(hole binary64 (+ 1 (/ lambda1 lambda2))))
#s(approx (* (/ lambda1 lambda2) 1) #s(hole binary64 (/ lambda1 lambda2)))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (cos phi2))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* -1/2 (* (pow lambda1 2) (cos phi2)))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda1 2) (cos phi2)))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (cos phi2))) (* 1/24 (cos phi2))))))))))
#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 (+ 1 (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (cos (neg lambda2)))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))))))
#s(approx (+ 1 (* -1/2 (* lambda1 lambda1))) #s(hole binary64 1))
#s(approx (+ 1 (* -1/2 (* lambda1 lambda1))) #s(hole binary64 (+ 1 (* -1/2 (pow lambda1 2)))))
#s(approx (* -1/2 (* lambda1 lambda1)) #s(hole binary64 (* -1/2 (pow lambda1 2))))
#s(approx (* lambda1 lambda1) #s(hole binary64 (pow lambda1 2)))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) #s(hole binary64 1))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) #s(hole binary64 (+ 1 (* -1/2 (pow lambda1 2)))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) #s(hole binary64 (+ 1 (* (pow lambda1 2) (- (* 1/24 (pow lambda1 2)) 1/2)))))
#s(approx (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2)) #s(hole binary64 (* -1/2 (pow lambda1 2))))
#s(approx (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2)) #s(hole binary64 (* (pow lambda1 2) (- (* 1/24 (pow lambda1 2)) 1/2))))
#s(approx (- (* 1/24 (* lambda1 lambda1)) 1/2) #s(hole binary64 -1/2))
#s(approx (- (* 1/24 (* lambda1 lambda1)) 1/2) #s(hole binary64 (- (* 1/24 (pow lambda1 2)) 1/2)))
#s(approx (* 1/24 (* lambda1 lambda1)) #s(hole binary64 (* 1/24 (pow lambda1 2))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) #s(hole binary64 1))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) #s(hole binary64 (+ 1 (* -1/2 (pow lambda1 2)))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) #s(hole binary64 (+ 1 (* (pow lambda1 2) (- (* 1/24 (pow lambda1 2)) 1/2)))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) #s(hole binary64 (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/24 (* -1/720 (pow lambda1 2)))) 1/2)))))
#s(approx (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) #s(hole binary64 (* -1/2 (pow lambda1 2))))
#s(approx (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) #s(hole binary64 (* (pow lambda1 2) (- (* 1/24 (pow lambda1 2)) 1/2))))
#s(approx (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) #s(hole binary64 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/24 (* -1/720 (pow lambda1 2)))) 1/2))))
#s(approx (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) #s(hole binary64 -1/2))
#s(approx (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) #s(hole binary64 (- (* 1/24 (pow lambda1 2)) 1/2)))
#s(approx (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) #s(hole binary64 (- (* (pow lambda1 2) (+ 1/24 (* -1/720 (pow lambda1 2)))) 1/2)))
#s(approx (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) #s(hole binary64 (* 1/24 (pow lambda1 2))))
#s(approx (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) #s(hole binary64 (* (pow lambda1 2) (+ 1/24 (* -1/720 (pow lambda1 2))))))
#s(approx (+ 1/24 (* -1/720 (* lambda1 lambda1))) #s(hole binary64 1/24))
#s(approx (+ 1/24 (* -1/720 (* lambda1 lambda1))) #s(hole binary64 (+ 1/24 (* -1/720 (pow lambda1 2)))))
#s(approx (* -1/720 (* lambda1 lambda1)) #s(hole binary64 (* -1/720 (pow lambda1 2))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (cos (* -1 lambda2))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* -1 (* lambda1 (* (cos phi2) (sin (* -1 lambda2))))) (* (cos phi2) (cos (* -1 lambda2)))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (* -1 lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (* -1 lambda2))))))) (* (cos phi2) (cos (* -1 lambda2)))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (* -1 lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (* -1 lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (* -1 lambda2))))))))) (* (cos phi2) (cos (* -1 lambda2)))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (sin (- (* 1/2 (PI)) lambda2))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda1 (* (cos phi2) (cos (- (* 1/2 (PI)) lambda2)))) (* (cos phi2) (sin (- (* 1/2 (PI)) lambda2)))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (- (* 1/2 (PI)) lambda2))))) (* (cos phi2) (cos (- (* 1/2 (PI)) lambda2))))) (* (cos phi2) (sin (- (* 1/2 (PI)) lambda2)))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (- (* 1/2 (PI)) lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (- (* 1/2 (PI)) lambda2))))))) (* (cos phi2) (cos (- (* 1/2 (PI)) lambda2))))) (* (cos phi2) (sin (- (* 1/2 (PI)) lambda2)))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) lambda2))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) lambda2)) (* lambda1 (cos (- (* 1/2 (PI)) lambda2))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) lambda2)) (* lambda1 (+ (cos (- (* 1/2 (PI)) lambda2)) (* -1/2 (* lambda1 (sin (- (* 1/2 (PI)) lambda2)))))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) lambda2)) (* lambda1 (+ (cos (- (* 1/2 (PI)) lambda2)) (* lambda1 (+ (* -1/2 (sin (- (* 1/2 (PI)) lambda2))) (* -1/6 (* lambda1 (cos (- (* 1/2 (PI)) lambda2)))))))))))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) #s(hole binary64 (- (* 1/2 (PI)) lambda2)))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) #s(hole binary64 (- (+ lambda1 (* 1/2 (PI))) lambda2)))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (* (cos (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (+ (* -1 (* 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))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/2 (* 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))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* 1/6 (* 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))))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (* (cos (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (* -1 (* 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)))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/2 (* 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)))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* 1/6 (* 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)))))))
#s(approx (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos (neg lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos (neg lambda2)) (+ (* -1 (* lambda1 (sin (neg lambda2)))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos (neg lambda2)) (+ (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos (neg lambda2)) (+ (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (/ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (/ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (/ (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda1 (- (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* lambda1 (- (+ (* 1/2 (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (+ (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* lambda1 (- (+ (* 1/2 (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* lambda1 (- (+ (* -1/6 (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (+ (* 1/2 (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (* -1/2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (+ (* -1/6 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (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)))))))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (+ (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (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 (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (/ (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (- (+ (* lambda1 (- (* 2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ 1 (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* 2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* lambda1 (- (* -1 (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* 2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ 1 (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* 2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* lambda1 (- (+ (* -1 (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- 1 (* (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))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (+ (* -1/6 (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda2)) (- (* 2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (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))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* 2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* 2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ 1 (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- (+ 1 (* 2 (* lambda1 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- (+ 1 (* 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 phi2) 2) (pow (cos (neg lambda2)) 2)))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- (+ 1 (* 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 phi2) 2) (pow (cos (neg lambda2)) 2)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) #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 (* (cos phi2) (cos (- lambda1 lambda2))) 2) #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 (* (cos phi2) (cos (- lambda1 lambda2))) 2) #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 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- 1 (* (cos phi2) (cos (neg lambda2))))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* lambda1 (- (* 1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* 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) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2)) (- (cos phi1) (cos (neg lambda2))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda1 (- (* 2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (sin (neg lambda2)) (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos (neg lambda2))))) (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2)))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* 2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (* lambda1 (- (* -1 (/ (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (cos (neg lambda2))))) (+ (* 1/2 (/ (* (cos (neg lambda2)) (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2))) (/ (* (sin (neg lambda2)) (- (* 2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (sin (neg lambda2)) (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (- (cos phi1) (cos (neg lambda2)))))))) (/ (* (sin (neg lambda2)) (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos (neg lambda2))))) (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2)))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* 2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (* lambda1 (- (+ (* -1 (/ (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (cos (neg lambda2))))) (* lambda1 (- (* -1 (/ (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (cos (neg lambda2))))) (+ (* -1/6 (/ (* (sin (neg lambda2)) (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2))) (+ (* 1/2 (/ (* (cos (neg lambda2)) (- (* 2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (sin (neg lambda2)) (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (sin (neg lambda2)) (- (* -1 (/ (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (cos (neg lambda2))))) (+ (* 1/2 (/ (* (cos (neg lambda2)) (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2))) (/ (* (sin (neg lambda2)) (- (* 2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (sin (neg lambda2)) (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (- (cos phi1) (cos (neg lambda2))))))) (- (cos phi1) (cos (neg lambda2))))))))) (+ (* 1/2 (/ (* (cos (neg lambda2)) (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2))) (/ (* (sin (neg lambda2)) (- (* 2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (sin (neg lambda2)) (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (- (cos phi1) (cos (neg lambda2)))))))) (/ (* (sin (neg lambda2)) (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos (neg lambda2))))) (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2)))))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ (* 2 (* lambda1 (* (cos (neg lambda2)) (sin (neg lambda2))))) (pow (cos phi1) 2)) (pow (cos (neg lambda2)) 2))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* -2 (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (cos phi1) 2)) (pow (cos (neg lambda2)) 2))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* -2 (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (cos phi1) 2)) (pow (cos (neg lambda2)) 2))))
#s(approx (pow (cos (- lambda1 lambda2)) 2) #s(hole binary64 (pow (cos (neg lambda2)) 2)))
#s(approx (pow (cos (- lambda1 lambda2)) 2) #s(hole binary64 (+ (* -2 (* lambda1 (* (cos (neg lambda2)) (sin (neg lambda2))))) (pow (cos (neg lambda2)) 2))))
#s(approx (pow (cos (- lambda1 lambda2)) 2) #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 (pow (cos (- lambda1 lambda2)) 2) #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 phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (cos phi1) (cos (neg lambda2)))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ (cos phi1) (* lambda1 (sin (neg lambda2)))) (cos (neg lambda2)))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ (cos phi1) (* lambda1 (+ (sin (neg lambda2)) (* 1/2 (* lambda1 (cos (neg lambda2))))))) (cos (neg lambda2)))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ (cos phi1) (* lambda1 (+ (sin (neg lambda2)) (* lambda1 (- (* -1/6 (* lambda1 (sin (neg lambda2)))) (* -1/2 (cos (neg lambda2)))))))) (cos (neg lambda2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (/ (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #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)))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #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)))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (+ (/ (* (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* -1/2 (* (cos phi2) (cos (neg lambda2)))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)) (/ (* (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (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)))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (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)))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #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))))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (+ (/ (* (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* 1/6 (* (cos phi2) (sin (neg lambda2)))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)) (+ (/ (* (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (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)))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (+ (/ (* (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* -1/2 (* (cos phi2) (cos (neg lambda2)))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)) (/ (* (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (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)))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (- (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* -1/2 (* (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)))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (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)))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))))) (+ (/ (* (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* -1/2 (* (cos phi2) (cos (neg lambda2)))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)) (/ (* (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (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)))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (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)))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) #s(hole binary64 (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) #s(hole binary64 (+ 1 (+ (* 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))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) #s(hole binary64 (+ 1 (+ (* 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))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) #s(hole binary64 (+ 1 (+ (* 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))))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3) #s(hole binary64 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 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)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 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)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 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)))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* lambda1 (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* 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 phi2) (cos (neg lambda2))))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* 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 phi2) (sin (neg lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* -1/2 (* (cos phi2) (cos (neg lambda2))))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (+ (* -2 (* lambda1 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (+ (* 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 (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (+ (* 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 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (neg lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (neg lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (neg lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (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 phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (neg lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (/ (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))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (/ (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))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (/ (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (/ (* (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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 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) (- (* -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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) 2)) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) 3))) (+ (/ (* (- (* -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) (- (* -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 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)) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 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))))))) (/ (* (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 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) (- (* -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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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)))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) 2)) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (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) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (* (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (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)))))))) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) 3))) (+ (/ (* (- (* -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)))))) (+ (/ (* (- (* -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) (- (* -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) (* (pow (cos (neg lambda2)) 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))))) (- (+ (* (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) (- (* -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 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)) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 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))))))))) (/ (* (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))))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) 2)) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) 3))) (+ (/ (* (- (* -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) (- (* -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 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)) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 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))))))) (/ (* (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 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) (- (* -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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* -1 (/ (* lambda1 (* (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 phi1) 3) (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) 2)) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (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))))) (/ (* (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 phi1) 3) (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (/ (* (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) 2)) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (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) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (* (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (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)))))))) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) 2)) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (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))))) (/ (* (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 phi1) 3) (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* lambda1 (- (* -1 (/ (* (cos phi2) (sin (neg lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))) (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* lambda1 (- (+ (* -1 (/ (* (cos phi2) (sin (neg lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))) (* lambda1 (- (* -1/2 (/ (* (cos phi2) (cos (neg lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2))))) (- (* -1 (/ (* (cos phi2) (sin (neg lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))) (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* lambda1 (- (+ (* -1 (/ (* (cos phi2) (sin (neg lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))) (* lambda1 (- (+ (* -1/2 (/ (* (cos phi2) (cos (neg lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))) (* lambda1 (- (* 1/6 (/ (* (cos phi2) (sin (neg lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2))))) (- (* -1/2 (/ (* (cos phi2) (cos (neg lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2))))) (- (* -1 (/ (* (cos phi2) (sin (neg lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))) (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (+ (/ (* (- (* -1 (/ (* (cos phi2) (sin (neg lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))) (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)))) (- (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* -1/2 (* (cos phi2) (cos (neg lambda2)))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))))))) (+ (/ (* (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2))))) (- (* -1 (/ (* (cos phi2) (sin (neg lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))) (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (* (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))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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) (- (* -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)))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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)))))) (+ (/ (* (- (* -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) (- (* -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) (* (pow (cos (neg lambda2)) 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))))) (/ (* (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) (- (* -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)))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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)))))) (+ (/ (* (- (* -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)))))) (+ (/ (* (- (* -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) (- (* -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) (* (pow (cos (neg lambda2)) 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))))) (- (+ (* (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) (- (* -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) (* (pow (cos (neg lambda2)) 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)))))) (/ (* (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))))))) (+ (/ (* (- (* -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) (- (* -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) (* (pow (cos (neg lambda2)) 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))))) (/ (* (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) (- (* -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)))))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) #s(hole binary64 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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)))))
#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 phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (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))) (* -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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (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))))) (* 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 (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #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))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (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))) (* -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))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (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))))) (* 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))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 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 (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #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 (+ (sin lambda2) (/ (cos lambda2) lambda1))) #s(hole binary64 (cos lambda2)))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) #s(hole binary64 (/ (cos lambda2) lambda1)))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) #s(hole binary64 (/ (+ (cos lambda2) (* lambda1 (sin lambda2))) lambda1)))
#s(approx (/ (cos lambda2) lambda1) #s(hole binary64 (/ (cos lambda2) lambda1)))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) #s(hole binary64 (cos lambda2)))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) #s(hole binary64 (/ (cos lambda2) (pow lambda1 2))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) #s(hole binary64 (/ (+ (cos lambda2) (* lambda1 (sin lambda2))) (pow lambda1 2))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) #s(hole binary64 (/ (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))) (pow lambda1 2))))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) #s(hole binary64 (* -1 (/ (cos lambda2) (pow lambda1 2)))))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) #s(hole binary64 (/ (+ (* -1 (cos lambda2)) (* -1 (* lambda1 (sin lambda2)))) (pow lambda1 2))))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) #s(hole binary64 (* -1 (/ (cos lambda2) lambda1))))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) #s(hole binary64 (/ (+ (* -1 (cos lambda2)) (* -1 (* lambda1 (sin lambda2)))) lambda1)))
#s(approx (* -1 (/ (cos lambda2) lambda1)) #s(hole binary64 (* -1 (/ (cos lambda2) lambda1))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* -1 (* lambda1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* 1/6 (* lambda1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))))) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* 1/6 (* lambda1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))))) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* (cos phi2) (cos (neg lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (+ (* (cos phi2) (cos (neg lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (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))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (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))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* -1 (/ (* lambda1 (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (* -1/2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (* -1/6 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- 1 (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* -1 (/ (* lambda1 (* (cos phi2) (sin (neg lambda2)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (/ (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 3))) (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (/ (* (cos phi2) (sin (neg lambda2))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ 1 (- 1 (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -1 (/ (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 3))) (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (+ (* -1/2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 3))) (* -1/6 (/ (* (cos phi2) (sin (neg lambda2))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (+ (* -1 (/ (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 3))) (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (/ (* (cos phi2) (sin (neg lambda2))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ 1 (- 1 (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (+ (* 1/2 (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (+ (* lambda1 (- (/ (* (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 (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (+ (* 1/2 (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (* 1/2 (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- (cos phi1) (* (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 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (- (* -2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2)))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (- (+ (* -2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (* lambda1 (- (+ (* -1 (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2))))) (/ (pow (sin (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2))))) (+ (* 1/2 (/ (pow (cos (neg lambda2)) 3) (pow (- (cos phi1) (cos (neg lambda2))) 2))) (/ (* (sin (neg lambda2)) (- (* -2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (- (cos phi1) (cos (neg lambda2)))))))) (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2)))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (- (+ (* -2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (* lambda1 (- (+ (* -1 (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2))))) (+ (* lambda1 (- (+ (* 1/3 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (+ (* -1/6 (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (pow (- (cos phi1) (cos (neg lambda2))) 2))) (+ (* 1/2 (/ (* (cos (neg lambda2)) (- (* -2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (sin (neg lambda2)) (- (+ (* -1 (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2))))) (/ (pow (sin (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2))))) (+ (* 1/2 (/ (pow (cos (neg lambda2)) 3) (pow (- (cos phi1) (cos (neg lambda2))) 2))) (/ (* (sin (neg lambda2)) (- (* -2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (- (cos phi1) (cos (neg lambda2))))))) (- (cos phi1) (cos (neg lambda2)))))))) (/ (pow (sin (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2)))))) (+ (* 1/2 (/ (pow (cos (neg lambda2)) 3) (pow (- (cos phi1) (cos (neg lambda2))) 2))) (/ (* (sin (neg lambda2)) (- (* -2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (- (cos phi1) (cos (neg lambda2)))))))) (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) #s(hole binary64 (+ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (pow (cos phi1) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (pow (cos phi1) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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))) (- (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (/ (- (* (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))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda1 (- (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (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))))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* lambda1 (- (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (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))))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (/ (* (+ (* (cos phi2) (* (cos (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (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)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 4)) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (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))))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* lambda1 (- (+ (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (* lambda1 (- (* -1/6 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (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))))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (/ (* (+ (* (cos phi2) (* (cos (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (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)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 4)) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (/ (* (+ (* -1/3 (* (cos phi2) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (- (* (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)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 4)) (+ (/ (* (+ (* (cos phi2) (* (cos (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (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))))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/6 (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))))) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (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))))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (/ (* (+ (* (cos phi2) (* (cos (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (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)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 4)) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (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))))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ (* lambda1 (- (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* lambda1 (- (* 1/2 (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))) (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* lambda1 (- (+ (* 1/2 (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2))))) (* lambda1 (- (* -1/6 (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2))))) (* (pow (cos phi2) 2) (+ (* -1 (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/6 (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))) (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda1 (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2))))) (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda1 (+ (* 1/2 (* lambda1 (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))))) (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))))) (* 1/2 (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2))))))) (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))))) (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* -1 (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/6 (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* 2 (* lambda1 (* (cos phi2) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda1 (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* lambda1 (+ (* (cos phi2) (* (cos (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda1 (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* lambda1 (+ (* lambda1 (+ (* -1/3 (* (cos phi2) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (+ (* (cos phi2) (* (cos (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (* lambda1 (- (* 2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))) (* 1/2 (/ 1 (- (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 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (* 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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))) (* 1/2 (/ 1 (- (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 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (* 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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))) (* 1/2 (/ 1 (- (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 (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* 2 (* lambda1 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* 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 phi2) 2) (pow (cos (neg lambda2)) 2)))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* 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 phi2) 2) (pow (cos (neg lambda2)) 2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #s(hole binary64 (- (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))))
#s(approx (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #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 (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #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 (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #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 (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #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 (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (* 2 (log (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (+ (* -2 (/ (* lambda1 (sin (neg lambda2))) (cos (neg lambda2)))) (* 2 (log (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (+ (* 2 (log (* (cos phi2) (cos (neg lambda2))))) (* lambda1 (+ (* -2 (/ (sin (neg lambda2)) (cos (neg lambda2)))) (* lambda1 (- (* -1 (/ (pow (sin (neg lambda2)) 2) (pow (cos (neg lambda2)) 2))) 1)))))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (+ (* 2 (log (* (cos phi2) (cos (neg lambda2))))) (* lambda1 (+ (* -2 (/ (sin (neg lambda2)) (cos (neg lambda2)))) (* lambda1 (- (+ (* -1 (/ (pow (sin (neg lambda2)) 2) (pow (cos (neg lambda2)) 2))) (* 1/3 (* lambda1 (+ (* -3 (/ (sin (neg lambda2)) (cos (neg lambda2)))) (+ (* -2 (/ (pow (sin (neg lambda2)) 3) (pow (cos (neg lambda2)) 3))) (/ (sin (neg lambda2)) (cos (neg lambda2)))))))) 1)))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (log (* (cos phi2) (cos (neg lambda2))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (+ (log (* (cos phi2) (cos (neg lambda2)))) (* -1 (/ (* lambda1 (sin (neg lambda2))) (cos (neg lambda2)))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (+ (log (* (cos phi2) (cos (neg lambda2)))) (* lambda1 (+ (* -1 (/ (sin (neg lambda2)) (cos (neg lambda2)))) (* 1/2 (* lambda1 (- (* -1 (/ (pow (sin (neg lambda2)) 2) (pow (cos (neg lambda2)) 2))) 1))))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (+ (log (* (cos phi2) (cos (neg lambda2)))) (* lambda1 (+ (* -1 (/ (sin (neg lambda2)) (cos (neg lambda2)))) (* lambda1 (+ (* 1/6 (* lambda1 (+ (* -3 (/ (sin (neg lambda2)) (cos (neg lambda2)))) (+ (* -2 (/ (pow (sin (neg lambda2)) 3) (pow (cos (neg lambda2)) 3))) (/ (sin (neg lambda2)) (cos (neg lambda2))))))) (* 1/2 (- (* -1 (/ (pow (sin (neg lambda2)) 2) (pow (cos (neg lambda2)) 2))) 1)))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* lambda1 (- (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ (pow (cos phi1) 6) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* lambda1 (- (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4)))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (- (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ (pow (cos phi1) 6) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* lambda1 (- (+ (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* lambda1 (- (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -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))))))) (* 2 (* (pow (cos (neg lambda2)) 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 phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4)))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4)))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (- (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (- (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4)))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (- (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4)))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (- (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ (pow (cos phi1) 6) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) #s(hole binary64 (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) #s(hole binary64 (- (+ (* lambda1 (- (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (/ (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2)))) (/ (pow (cos phi1) 6) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (/ (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4)))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* lambda1 (- (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (+ (/ (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (/ (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2)))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4)))) (/ (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2)))))) (/ (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2)))) (/ (pow (cos phi1) 6) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (/ (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4)))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* lambda1 (- (+ (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* lambda1 (- (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -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))))))) (* 2 (* (pow (cos (neg lambda2)) 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 phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (+ (/ (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (+ (/ (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (/ (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2)))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4)))) (/ (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2))))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4)))) (+ (/ (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (/ (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2)))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4)))) (/ (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2))))))) (+ (/ (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (/ (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2)))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4)))) (/ (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2)))))) (/ (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2)))) (/ (pow (cos phi1) 6) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (/ (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4)))))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) #s(hole binary64 (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) #s(hole binary64 (- (+ (* -2 (* lambda1 (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))))) (pow (cos phi1) 6)) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) #s(hole binary64 (- (+ (* lambda1 (- (* -1 (* lambda1 (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))))) (* 2 (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))))) (pow (cos phi1) 6)) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) #s(hole binary64 (- (+ (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (* (pow (cos phi2) 6) (+ (* 2 (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -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))))))) (* 2 (* (pow (cos (neg lambda2)) 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) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))))) (* 2 (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))))) (pow (cos phi1) 6)) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))))
#s(approx (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) #s(hole binary64 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))
#s(approx (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) #s(hole binary64 (+ (* 2 (* lambda1 (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))))) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))))
#s(approx (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) #s(hole binary64 (+ (* lambda1 (+ (* 2 (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (* lambda1 (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))))) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))))
#s(approx (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) #s(hole binary64 (+ (* lambda1 (+ (* 2 (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 6) (+ (* 2 (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -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))))))) (* 2 (* (pow (cos (neg lambda2)) 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) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))))))) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) #s(hole binary64 (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4)))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) #s(hole binary64 (+ (* lambda1 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) #s(hole binary64 (+ (* lambda1 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (+ (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (* lambda1 (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) #s(hole binary64 (+ (* lambda1 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (+ (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (* lambda1 (+ (* lambda1 (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))))))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))))))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (+ (* lambda1 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (+ (* lambda1 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (+ (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (* lambda1 (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (+ (* lambda1 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (+ (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (* lambda1 (+ (* lambda1 (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))))))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))))))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* -2 (* lambda1 (* (pow (cos phi1) 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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* lambda1 (+ (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (* lambda1 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* lambda1 (+ (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (* -1 (pow lambda2 3))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (- (pow lambda1 3) (pow lambda2 3))))
#s(approx (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) #s(hole binary64 (* -1 (pow lambda2 3))))
#s(approx (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) #s(hole binary64 (+ (* -1 (pow lambda2 3)) (pow lambda1 3))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (pow lambda2 2)))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 lambda2) (pow lambda2 2))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ lambda1 lambda2)) (pow lambda2 2))))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) #s(hole binary64 (pow lambda2 2)))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) #s(hole binary64 (+ (* lambda1 lambda2) (pow lambda2 2))))
#s(approx (* lambda1 lambda2) #s(hole binary64 (* lambda1 lambda2)))
#s(approx (pow lambda1 3) #s(hole binary64 (pow lambda1 3)))
#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 (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 (* (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 (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (sin (+ phi2 (* 1/2 (PI)))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (sin (+ phi2 (* 1/2 (PI)))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (sin (+ phi2 (* 1/2 (PI)))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/6 (* lambda1 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) #s(hole binary64 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/6 (* lambda1 (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 3)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) #s(hole binary64 (+ (pow lambda1 3) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 3))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 3)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (+ (* -1 (* lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (+ (* lambda1 (- lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) #s(hole binary64 (* -1 (* lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) #s(hole binary64 (* lambda1 (- 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))) lambda1) #s(hole binary64 (* lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (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 (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) #s(hole binary64 (* -1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2))))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) #s(hole binary64 (- (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2))))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) #s(hole binary64 (* -1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) #s(hole binary64 (- lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) #s(hole binary64 (* -1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) #s(hole binary64 (+ lambda1 (* -1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) #s(hole binary64 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))))
#s(approx (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) #s(hole binary64 (/ (+ lambda1 (* -1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) lambda1)))
#s(approx (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) #s(hole binary64 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))))
#s(approx (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) #s(hole binary64 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#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))) lambda1) 1) lambda1) #s(hole binary64 lambda1))
#s(approx (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) 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))) lambda1) 1) #s(hole binary64 1))
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) #s(hole binary64 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))))
#s(approx (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1) #s(hole binary64 1))
#s(approx (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1) #s(hole binary64 (+ 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 (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (- lambda1 lambda2)))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos phi1) (cos (- lambda1 lambda2)))))
#s(approx (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) lambda1) #s(hole binary64 lambda1))
#s(approx (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) lambda1) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))) lambda1)))))
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) #s(hole binary64 1))
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) #s(hole binary64 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))) lambda1))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 lambda1))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* lambda1 (- (+ 1 (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda2 2)) (pow lambda1 2)))) (/ lambda2 lambda1)))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* lambda1 (- (+ 1 (/ (* lambda2 (+ (* -1 (pow lambda2 2)) (pow lambda2 2))) (pow lambda1 3))) (+ (* -1 (/ (pow lambda2 2) (pow lambda1 2))) (+ (/ lambda2 lambda1) (/ (pow lambda2 2) (pow lambda1 2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))) lambda1)))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))) lambda1)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) lambda1)))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* 1/2 (+ (sin (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2)) (sin (- (+ lambda2 (+ phi2 (* 1/2 (PI)))) lambda1)))))) lambda1)))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (cos phi1) (* 1/2 (+ (sin (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2)) (sin (- (+ lambda2 (+ phi2 (* 1/2 (PI)))) lambda1)))))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) #s(hole binary64 (* 1/2 (+ (sin (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2)) (sin (- (+ lambda2 (+ phi2 (* 1/2 (PI)))) lambda1))))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2)) (sin (- (+ lambda2 (+ phi2 (* 1/2 (PI)))) lambda1)))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (sin (- (+ lambda2 (+ phi2 (* 1/2 (PI)))) lambda1))))
#s(approx (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (* -1 lambda1)))
#s(approx (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (* lambda1 (- (+ (* 1/2 (/ (PI) lambda1)) (+ (/ lambda2 lambda1) (/ phi2 lambda1))) 1))))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (sin (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2))))
#s(approx (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 lambda1))
#s(approx (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (* lambda1 (- (+ 1 (+ (* 1/2 (/ (PI) lambda1)) (/ phi2 lambda1))) (/ lambda2 lambda1)))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- 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 lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (* lambda1 (cos lambda2))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (* lambda1 (+ (cos lambda2) (* -1 (/ (sin lambda2) lambda1))))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (* lambda1 (* (cos phi2) (sin lambda2)))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (* lambda1 (+ (* (cos phi2) (sin lambda2)) (/ (* (cos lambda2) (cos phi2)) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 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 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) 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 (cos lambda1) #s(hole binary64 (cos lambda1)))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* (sin lambda1) (sin lambda2))))
#s(approx (sin lambda1) #s(hole binary64 (sin lambda1)))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (* lambda1 (sin (+ lambda2 (* 1/2 (PI)))))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (* lambda1 (+ (sin (+ lambda2 (* 1/2 (PI)))) (* -1 (/ (sin lambda2) lambda1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) #s(hole binary64 (* lambda1 (cos lambda2))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) #s(hole binary64 (* lambda1 (+ (cos lambda2) (* -1 (/ (sin lambda2) lambda1))))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (* lambda1 (sin lambda2))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1)))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* -1/2 (* (pow lambda1 2) (cos lambda2)))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (/ (sin lambda2) lambda1)))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (+ (/ (cos lambda2) (pow lambda1 2)) (/ (sin lambda2) lambda1))))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (* -1/2 (* lambda1 (cos lambda2)))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (* lambda1 (+ (* -1/2 (cos lambda2)) (/ (sin lambda2) lambda1)))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* -1/6 (* (pow lambda1 3) (sin lambda2)))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* (pow lambda1 3) (+ (* -1/2 (/ (cos lambda2) lambda1)) (* -1/6 (sin lambda2))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* (pow lambda1 3) (+ (* -1/2 (/ (cos lambda2) lambda1)) (+ (* -1/6 (sin lambda2)) (/ (sin lambda2) (pow lambda1 2)))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* (pow lambda1 3) (+ (* -1/2 (/ (cos lambda2) lambda1)) (+ (* -1/6 (sin lambda2)) (+ (/ (cos lambda2) (pow lambda1 3)) (/ (sin lambda2) (pow lambda1 2))))))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (* -1/6 (* (pow lambda1 2) (sin lambda2)))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1/2 (/ (cos lambda2) lambda1)) (* -1/6 (sin lambda2))))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1/2 (/ (cos lambda2) lambda1)) (+ (* -1/6 (sin lambda2)) (/ (sin lambda2) (pow lambda1 2)))))))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) #s(hole binary64 (* -1/6 (* (pow lambda1 2) (sin lambda2)))))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) #s(hole binary64 (* (pow lambda1 2) (+ (* -1/2 (/ (cos lambda2) lambda1)) (* -1/6 (sin lambda2))))))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) #s(hole binary64 (* -1/6 (* lambda1 (sin lambda2)))))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) #s(hole binary64 (* lambda1 (+ (* -1/2 (/ (cos lambda2) lambda1)) (* -1/6 (sin lambda2))))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) #s(hole binary64 (* 1/2 (* (pow lambda1 2) (sin lambda2)))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) #s(hole binary64 (* (pow lambda1 2) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))))))
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) #s(hole binary64 (* 1/2 (* (pow lambda1 2) (sin lambda2)))))
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) #s(hole binary64 (* (pow lambda1 2) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) #s(hole binary64 (* 1/2 (* lambda1 (sin lambda2)))))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) #s(hole binary64 (* lambda1 (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) #s(hole binary64 lambda1))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) #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 (* lambda1 (- (pow lambda2 -1) (pow lambda1 -1))) #s(hole binary64 (/ lambda1 lambda2)))
#s(approx (* lambda1 (- (pow lambda2 -1) (pow lambda1 -1))) #s(hole binary64 (* lambda1 (- (/ 1 lambda2) (/ 1 lambda1)))))
#s(approx (- (pow lambda2 -1) (pow lambda1 -1)) #s(hole binary64 (/ 1 lambda2)))
#s(approx (- (pow lambda2 -1) (pow lambda1 -1)) #s(hole binary64 (- (/ 1 lambda2) (/ 1 lambda1))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 lambda1))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* lambda1 (- (+ 1 (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda2 2)) (pow lambda1 2)))) (/ lambda2 lambda1)))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* lambda1 (- (+ 1 (/ (* lambda2 (+ (* -1 (pow lambda2 2)) (pow lambda2 2))) (pow lambda1 3))) (+ (* -1 (/ (pow lambda2 2) (pow lambda1 2))) (+ (/ lambda2 lambda1) (/ (pow lambda2 2) (pow lambda1 2))))))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (/ lambda1 lambda2)))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (* lambda1 (- (/ 1 lambda2) (/ 1 lambda1)))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (* lambda1 (- (+ (* -1 (/ (+ lambda2 (* -1 lambda2)) (pow lambda1 2))) (/ 1 lambda2)) (/ 1 lambda1)))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (* lambda1 (- (+ (/ 1 lambda2) (/ (* lambda2 (+ lambda2 (* -1 lambda2))) (pow lambda1 3))) (+ (* -1 (/ lambda2 (pow lambda1 2))) (+ (/ 1 lambda1) (/ lambda2 (pow lambda1 2))))))))
#s(approx (- (pow (/ lambda1 lambda2) 3) 1) #s(hole binary64 (/ (pow lambda1 3) (pow lambda2 3))))
#s(approx (- (pow (/ lambda1 lambda2) 3) 1) #s(hole binary64 (* (pow lambda1 3) (- (/ 1 (pow lambda2 3)) (/ 1 (pow lambda1 3))))))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) #s(hole binary64 (/ (pow lambda1 2) (pow lambda2 2))))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) #s(hole binary64 (* (pow lambda1 2) (+ (/ 1 (* lambda1 lambda2)) (/ 1 (pow lambda2 2))))))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) #s(hole binary64 (* (pow lambda1 2) (+ (/ 1 (* lambda1 lambda2)) (+ (/ 1 (pow lambda1 2)) (/ 1 (pow lambda2 2)))))))
#s(approx (+ 1 (* (/ lambda1 lambda2) 1)) #s(hole binary64 (/ lambda1 lambda2)))
#s(approx (+ 1 (* (/ lambda1 lambda2) 1)) #s(hole binary64 (* lambda1 (+ (/ 1 lambda1) (/ 1 lambda2)))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (cos phi2)))))
#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 (+ 1 (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (cos (- lambda1 lambda2)))))
#s(approx (+ 1 (* -1/2 (* lambda1 lambda1))) #s(hole binary64 (* -1/2 (pow lambda1 2))))
#s(approx (+ 1 (* -1/2 (* lambda1 lambda1))) #s(hole binary64 (* (pow lambda1 2) (- (/ 1 (pow lambda1 2)) 1/2))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) #s(hole binary64 (* 1/24 (pow lambda1 4))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) #s(hole binary64 (* (pow lambda1 4) (- 1/24 (* 1/2 (/ 1 (pow lambda1 2)))))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) #s(hole binary64 (* (pow lambda1 4) (- (+ 1/24 (/ 1 (pow lambda1 4))) (* 1/2 (/ 1 (pow lambda1 2)))))))
#s(approx (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2)) #s(hole binary64 (* 1/24 (pow lambda1 4))))
#s(approx (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2)) #s(hole binary64 (* (pow lambda1 4) (- 1/24 (* 1/2 (/ 1 (pow lambda1 2)))))))
#s(approx (- (* 1/24 (* lambda1 lambda1)) 1/2) #s(hole binary64 (* 1/24 (pow lambda1 2))))
#s(approx (- (* 1/24 (* lambda1 lambda1)) 1/2) #s(hole binary64 (* (pow lambda1 2) (- 1/24 (* 1/2 (/ 1 (pow lambda1 2)))))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) #s(hole binary64 (* -1/720 (pow lambda1 6))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) #s(hole binary64 (* (pow lambda1 6) (- (* 1/24 (/ 1 (pow lambda1 2))) 1/720))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) #s(hole binary64 (* (pow lambda1 6) (- (* 1/24 (/ 1 (pow lambda1 2))) (+ 1/720 (/ 1/2 (pow lambda1 4)))))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) #s(hole binary64 (* (pow lambda1 6) (- (+ (* 1/24 (/ 1 (pow lambda1 2))) (/ 1 (pow lambda1 6))) (+ 1/720 (/ 1/2 (pow lambda1 4)))))))
#s(approx (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) #s(hole binary64 (* -1/720 (pow lambda1 6))))
#s(approx (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) #s(hole binary64 (* (pow lambda1 6) (- (* 1/24 (/ 1 (pow lambda1 2))) 1/720))))
#s(approx (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) #s(hole binary64 (* (pow lambda1 6) (- (* 1/24 (/ 1 (pow lambda1 2))) (+ 1/720 (/ 1/2 (pow lambda1 4)))))))
#s(approx (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) #s(hole binary64 (* -1/720 (pow lambda1 4))))
#s(approx (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) #s(hole binary64 (* (pow lambda1 4) (- (* 1/24 (/ 1 (pow lambda1 2))) 1/720))))
#s(approx (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) #s(hole binary64 (* (pow lambda1 4) (- (* 1/24 (/ 1 (pow lambda1 2))) (+ 1/720 (/ 1/2 (pow lambda1 4)))))))
#s(approx (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) #s(hole binary64 (* -1/720 (pow lambda1 4))))
#s(approx (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) #s(hole binary64 (* (pow lambda1 4) (- (* 1/24 (/ 1 (pow lambda1 2))) 1/720))))
#s(approx (+ 1/24 (* -1/720 (* lambda1 lambda1))) #s(hole binary64 (* -1/720 (pow lambda1 2))))
#s(approx (+ 1/24 (* -1/720 (* lambda1 lambda1))) #s(hole binary64 (* (pow lambda1 2) (- (* 1/24 (/ 1 (pow lambda1 2))) 1/720))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) #s(hole binary64 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) #s(hole binary64 lambda1))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) #s(hole binary64 (* lambda1 (- (+ 1 (* 1/2 (/ (PI) lambda1))) (/ lambda2 lambda1)))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) lambda1)))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (/ (- 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (pow (cos (- lambda1 lambda2)) 2) #s(hole binary64 (pow (cos (- lambda1 lambda2)) 2)))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (cos phi1) (cos (- lambda1 lambda2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #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 (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) #s(hole binary64 (+ 1 (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3) #s(hole binary64 (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))) lambda1)))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (/ (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (/ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (/ (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (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 (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) #s(hole binary64 (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (cos (- lambda1 lambda2)))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) #s(hole binary64 (* lambda1 (sin lambda2))))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) #s(hole binary64 (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1)))))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) #s(hole binary64 (sin lambda2)))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) #s(hole binary64 (+ (sin lambda2) (/ (cos lambda2) lambda1))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) #s(hole binary64 (* -1/2 (* (pow lambda1 2) (cos lambda2)))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (/ (sin lambda2) lambda1)))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (+ (/ (cos lambda2) (pow lambda1 2)) (/ (sin lambda2) lambda1))))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) #s(hole binary64 (* -1/2 (cos lambda2))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) #s(hole binary64 (+ (* -1/2 (cos lambda2)) (/ (sin lambda2) lambda1))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) #s(hole binary64 (+ (* -1/2 (cos lambda2)) (+ (/ (cos lambda2) (pow lambda1 2)) (/ (sin lambda2) lambda1)))))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) #s(hole binary64 (* -1 (/ (sin lambda2) lambda1))))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) #s(hole binary64 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) #s(hole binary64 (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) lambda1)))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))) lambda1)))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (* (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 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) #s(hole binary64 (+ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (pow (cos phi1) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (pow (cos phi1) 3))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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))) (- (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 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) lambda1)))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))
#s(approx (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (pow (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #s(hole binary64 (- (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (* 2 (log (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (log (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) lambda1)))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) #s(hole binary64 (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) (pow (cos phi1) 4))))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) #s(hole binary64 (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))))
#s(approx (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) #s(hole binary64 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) #s(hole binary64 (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) (pow (cos phi1) 4)))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (pow lambda1 3)))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (* (pow lambda1 3) (+ 1 (* -1 (/ (pow lambda2 3) (pow lambda1 3)))))))
#s(approx (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) #s(hole binary64 (pow lambda1 3)))
#s(approx (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) #s(hole binary64 (* (pow lambda1 3) (+ 1 (* -1 (/ (pow lambda2 3) (pow lambda1 3)))))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (pow lambda1 2)))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (* (pow lambda1 2) (+ 1 (/ lambda2 lambda1)))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (* (pow lambda1 2) (+ 1 (+ (/ lambda2 lambda1) (/ (pow lambda2 2) (pow lambda1 2)))))))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) #s(hole binary64 (* lambda1 lambda2)))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) #s(hole binary64 (* lambda1 (+ lambda2 (/ (pow lambda2 2) 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))
#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 (* (cos lambda1) (sin lambda2)) #s(hole binary64 (* (cos lambda1) (sin lambda2))))
#s(approx (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (sin (+ phi2 (* 1/2 (PI)))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (* (sin (+ phi2 (* 1/2 (PI)))) (sin (- lambda1 lambda2)))))
#s(approx (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (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) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) #s(hole binary64 (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 lambda1))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (* lambda1 (- (+ 1 (* -1 (/ (+ (* -1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)) (pow lambda1 2)))) (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (* lambda1 (- (+ 1 (* -1 (/ (* (+ (* -1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (pow lambda1 3)))) (+ (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) (+ (* -1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2))) (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2))))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) #s(hole binary64 (pow lambda1 3)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) #s(hole binary64 (* (pow lambda1 3) (+ 1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 3) (pow lambda1 3))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (pow lambda1 2)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (* (pow lambda1 2) (- (+ 1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2))) (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) #s(hole binary64 (pow lambda1 2)))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))))))
#s(approx (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) #s(hole binary64 lambda1))
#s(approx (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) #s(hole binary64 (pow lambda1 2)))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)))))))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) #s(hole binary64 lambda1))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))))))
#s(approx (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) #s(hole binary64 lambda1))
#s(approx (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))))))
#s(approx (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) #s(hole binary64 1))
#s(approx (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) #s(hole binary64 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #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))) lambda1) 1) 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))) lambda1) 1) #s(hole binary64 (+ 1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1))))
#s(approx (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1) #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 (* (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 (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) #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))) #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 (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))))
#s(approx (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) lambda1) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))) lambda1)) 1)))))
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) #s(hole binary64 (+ 1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))) lambda1))))
#s(approx (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) #s(hole binary64 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))) lambda1)))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (cos (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (+ (* -1 lambda2) (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda2 2)) lambda1))) lambda1)) 1)))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (+ (* -1 lambda2) (* -1 (/ (+ (* -1 (/ (* lambda2 (+ (* -1 (pow lambda2 2)) (pow lambda2 2))) lambda1)) (+ (* -1 (pow lambda2 2)) (pow lambda2 2))) lambda1))) lambda1)) 1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (cos (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI))))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* 1/2 (+ (sin (+ lambda2 (+ phi2 (+ (* -1 lambda1) (* 1/2 (PI)))))) (sin (- (+ phi2 (* 1/2 (PI))) (+ lambda2 (* -1 lambda1)))))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* 1/2 (+ (sin (+ lambda2 (+ phi2 (+ (* -1 lambda1) (* 1/2 (PI)))))) (sin (- (+ phi2 (* 1/2 (PI))) (+ lambda2 (* -1 lambda1))))))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (cos phi1) (* 1/2 (+ (sin (+ lambda2 (+ phi2 (+ (* -1 lambda1) (* 1/2 (PI)))))) (sin (- (+ phi2 (* 1/2 (PI))) (+ lambda2 (* -1 lambda1)))))))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) #s(hole binary64 (* 1/2 (+ (sin (+ lambda2 (+ phi2 (+ (* -1 lambda1) (* 1/2 (PI)))))) (sin (- (+ phi2 (* 1/2 (PI))) (+ lambda2 (* -1 lambda1))))))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (+ lambda2 (+ phi2 (+ (* -1 lambda1) (* 1/2 (PI)))))) (sin (- (+ phi2 (* 1/2 (PI))) (+ lambda2 (* -1 lambda1)))))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (sin (+ lambda2 (+ phi2 (+ (* -1 lambda1) (* 1/2 (PI))))))))
#s(approx (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (* -1 (* lambda1 (+ 1 (* -1 (/ (+ lambda2 (+ phi2 (* 1/2 (PI)))) lambda1)))))))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (sin (- (+ phi2 (* 1/2 (PI))) (+ lambda2 (* -1 lambda1))))))
#s(approx (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (- (+ phi2 (* 1/2 (PI))) lambda2) lambda1)) 1)))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (neg (+ lambda2 (* -1 lambda1)))) (* -1/2 (* (pow phi2 2) (sin (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 lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (cos lambda2)) (/ (sin lambda2) lambda1))))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (* (cos phi2) (sin lambda2))) (* -1 (/ (* (cos lambda2) (cos phi2)) lambda1)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (sin (+ lambda2 (* 1/2 (PI))))) (/ (sin lambda2) lambda1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (sin (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (sin (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (cos lambda2)) (/ (sin lambda2) lambda1))))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1)))))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (/ (sin lambda2) lambda1)) (* 1/2 (cos lambda2)))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* -1 (* (pow lambda1 3) (+ (* 1/6 (sin lambda2)) (* 1/2 (/ (cos lambda2) lambda1)))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* -1 (* (pow lambda1 3) (+ (* -1 (/ (+ (* -1/2 (cos lambda2)) (/ (sin lambda2) lambda1)) lambda1)) (* 1/6 (sin lambda2)))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* -1 (* (pow lambda1 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) lambda1)) (* 1/6 (sin lambda2)))))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (/ (sin lambda2) lambda1)) (* 1/2 (cos lambda2))) lambda1)) (* -1/6 (sin lambda2))))))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) #s(hole binary64 (* -1 (* lambda1 (+ (* 1/6 (sin lambda2)) (* 1/2 (/ (cos lambda2) lambda1)))))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (cos lambda2)) (/ (sin lambda2) lambda1)) lambda1)) (* 1/2 (sin lambda2))))))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (/ (cos lambda2) lambda1)) (* -1/2 (sin lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) #s(hole binary64 (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))))
#s(approx (- (/ lambda1 lambda2) 1) #s(hole binary64 (* -1 (* lambda1 (- (/ 1 lambda1) (/ 1 lambda2))))))
#s(approx (* lambda1 (- (pow lambda2 -1) (pow lambda1 -1))) #s(hole binary64 (* -1 (* lambda1 (- (/ 1 lambda1) (/ 1 lambda2))))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (+ (* -1 lambda2) (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda2 2)) lambda1))) lambda1)) 1)))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (+ (* -1 lambda2) (* -1 (/ (+ (* -1 (/ (* lambda2 (+ (* -1 (pow lambda2 2)) (pow lambda2 2))) lambda1)) (+ (* -1 (pow lambda2 2)) (pow lambda2 2))) lambda1))) lambda1)) 1)))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (* -1 (* lambda1 (- (/ 1 lambda1) (/ 1 lambda2))))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (- (* -1 (/ (+ lambda2 (* -1 lambda2)) lambda1)) 1) lambda1)) (/ 1 lambda2))))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (- (* -1 (/ (+ lambda2 (+ (* -1 lambda2) (* -1 (/ (* lambda2 (+ lambda2 (* -1 lambda2))) lambda1)))) lambda1)) 1) lambda1)) (/ 1 lambda2))))))
#s(approx (- (pow (/ lambda1 lambda2) 3) 1) #s(hole binary64 (* -1 (* (pow lambda1 3) (- (/ 1 (pow lambda1 3)) (/ 1 (pow lambda2 3)))))))
#s(approx (* lambda2 (- (/ lambda1 lambda2) 1)) #s(hole binary64 (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (cos (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (sin (- (* 1/2 (PI)) (+ lambda2 (* -1 lambda1))))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (+ lambda2 (* -1 lambda1))))))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (- (* 1/2 (PI)) lambda2) lambda1)) 1)))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (/ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (/ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (/ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (/ (- 1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- 1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (- (pow (cos phi1) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (- (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (pow (cos phi1) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))))
#s(approx (pow (cos (- lambda1 lambda2)) 2) #s(hole binary64 (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (/ (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 3))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) #s(hole binary64 (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 3)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3) #s(hole binary64 (* (pow (cos phi2) 3) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 3))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (* (cos (* 1/2 (PI))) (sin phi1))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) #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 phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))) (/ (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))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (/ (* (pow (cos phi2) 3) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 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)))))))) (/ (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (/ (* (pow (cos phi2) 3) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 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)))))))) (/ (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (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 (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (* (pow (cos phi2) 3) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 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 (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) #s(hole binary64 (* (pow (cos phi2) 3) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 3))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))))
#s(approx (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1)))))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) #s(hole binary64 (* -1 (/ (+ (sin lambda2) (/ (cos lambda2) lambda1)) lambda1))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (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))))) (* (cos (* 1/2 (PI))) (sin phi1))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (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))))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (- (cos phi1) (* (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 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2) (- (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) #s(hole binary64 (+ (* (pow (cos phi2) 3) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 3)) (pow (cos phi1) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ (* (pow (cos phi2) 3) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 3)) (pow (cos phi1) 3))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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))) (- (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 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* (pow (cos phi2) 2) (* (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) 2))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* (pow (cos phi2) 2) (* (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) 2)))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* (pow (cos phi2) 2) (* (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) 2))))
#s(approx (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (* (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (pow (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) 2)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #s(hole binary64 (- (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (* 2 (log (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (log (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) #s(hole binary64 (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 6))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)) (pow (cos phi1) 4))))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) #s(hole binary64 (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 6)))))
#s(approx (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) #s(hole binary64 (* (pow (cos phi2) 6) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 6))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) #s(hole binary64 (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)) (pow (cos phi1) 4)))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (* -1 (* (pow lambda1 3) (- (/ (pow lambda2 3) (pow lambda1 3)) 1)))))
#s(approx (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) #s(hole binary64 (* -1 (* (pow lambda1 3) (- (/ (pow lambda2 3) (pow lambda1 3)) 1)))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -1 (/ (+ (* -1 lambda2) (* -1 (/ (pow lambda2 2) lambda1))) lambda1))))))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 lambda2) (* -1 (/ (pow lambda2 2) 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 (* -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 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))))
#s(approx (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (sin (neg (+ lambda2 (* -1 lambda1)))) (+ (cos phi2) (* (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) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (sin (neg (+ lambda2 (* -1 lambda1)))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) #s(hole binary64 (* (sin (neg (+ lambda2 (* -1 lambda1)))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 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 (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (- (+ (* -1 (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2) lambda1)) (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2) lambda1)) (* -1 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))) lambda1)) 1)))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (- (* -1 (/ (- (* -1 (/ (* (+ (* -1 (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2)) (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2)) (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))) lambda1)) (+ (* -1 (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2)) (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2))) lambda1)) (* -1 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))) lambda1)) 1)))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) #s(hole binary64 (* -1 (* (pow lambda1 3) (- (* -1 (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 3) (pow lambda1 3))) 1)))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 3)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -1 (/ (- (* -1 (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2) lambda1)) (* -1 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))) lambda1))))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2)))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -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))) lambda1) #s(hole binary64 (* lambda1 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))))
#s(approx (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -1 (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2) (pow lambda1 2)))))))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) #s(hole binary64 (* -1 (* lambda1 (- (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1) 1)))))
#s(approx (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) #s(hole binary64 (* -1 (* lambda1 (- (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1) 1)))))
#s(approx (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) #s(hole binary64 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)))))
#s(approx (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) #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 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) #s(hole binary64 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 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 (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (+ (* (cos (- 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 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos lambda1) (cos phi2)))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* 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))) #s(hole binary64 (+ (cos lambda1) (cos phi1))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* lambda2 (sin lambda1))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1))))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (cos phi2)))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (cos lambda1)))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (cos lambda1) (* lambda2 (sin lambda1)))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (sin lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* 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)))))) (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/6 (* 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)))))) (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos lambda1) (cos phi2))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (+ (* 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 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1/2 (pow phi1 2)) (* (cos lambda1) (cos phi2)))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1/2 (pow phi1 2)) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1/2 (pow phi1 2)) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1/2 (pow phi1 2)) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos 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)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (* (sin lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* (cos 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)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* 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)))))) (* (cos 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)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/6 (* 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)))))) (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (cos phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos lambda1) (cos phi2))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/6 (* lambda2 (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))))) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/6 (* lambda2 (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))))) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (cos phi1) (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) lambda1)))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (cos phi1) (+ (* 1/2 (* lambda2 (+ (cos (- (+ phi2 (* 1/2 (PI))) lambda1)) (* -1 (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))))) (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) lambda1))))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (cos phi1) (+ (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) lambda1)))) (* lambda2 (+ (* 1/2 (* lambda2 (+ (* -1/2 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1/2 (sin (- (+ phi2 (* 1/2 (PI))) lambda1)))))) (* 1/2 (+ (cos (- (+ phi2 (* 1/2 (PI))) lambda1)) (* -1 (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))))))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (cos phi1) (+ (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) lambda1)))) (* lambda2 (+ (* 1/2 (+ (cos (- (+ phi2 (* 1/2 (PI))) lambda1)) (* -1 (cos (+ lambda1 (+ phi2 (* 1/2 (PI)))))))) (* lambda2 (+ (* 1/2 (* lambda2 (+ (* -1/6 (cos (- (+ phi2 (* 1/2 (PI))) lambda1))) (* 1/6 (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))))) (* 1/2 (+ (* -1/2 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1/2 (sin (- (+ phi2 (* 1/2 (PI))) lambda1)))))))))))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) #s(hole binary64 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) lambda1))))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) #s(hole binary64 (+ (* 1/2 (* lambda2 (+ (cos (- (+ phi2 (* 1/2 (PI))) lambda1)) (* -1 (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))))) (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) lambda1)))))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) #s(hole binary64 (+ (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) lambda1)))) (* lambda2 (+ (* 1/2 (* lambda2 (+ (* -1/2 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1/2 (sin (- (+ phi2 (* 1/2 (PI))) lambda1)))))) (* 1/2 (+ (cos (- (+ phi2 (* 1/2 (PI))) lambda1)) (* -1 (cos (+ lambda1 (+ phi2 (* 1/2 (PI)))))))))))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) #s(hole binary64 (+ (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) lambda1)))) (* lambda2 (+ (* 1/2 (+ (cos (- (+ phi2 (* 1/2 (PI))) lambda1)) (* -1 (cos (+ lambda1 (+ phi2 (* 1/2 (PI)))))))) (* lambda2 (+ (* 1/2 (* lambda2 (+ (* -1/6 (cos (- (+ phi2 (* 1/2 (PI))) lambda1))) (* 1/6 (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))))) (* 1/2 (+ (* -1/2 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1/2 (sin (- (+ phi2 (* 1/2 (PI))) lambda1))))))))))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (+ lambda1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) lambda1)))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (+ lambda1 (+ phi2 (* 1/2 (PI))))) (+ (sin (- (+ phi2 (* 1/2 (PI))) lambda1)) (* lambda2 (+ (cos (- (+ phi2 (* 1/2 (PI))) lambda1)) (* -1 (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))))))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (+ lambda1 (+ phi2 (* 1/2 (PI))))) (+ (sin (- (+ phi2 (* 1/2 (PI))) lambda1)) (* lambda2 (+ (cos (- (+ phi2 (* 1/2 (PI))) lambda1)) (+ (* -1 (cos (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1/2 (sin (- (+ phi2 (* 1/2 (PI))) lambda1))))))))))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (+ lambda1 (+ phi2 (* 1/2 (PI))))) (+ (sin (- (+ phi2 (* 1/2 (PI))) lambda1)) (* lambda2 (+ (cos (- (+ phi2 (* 1/2 (PI))) lambda1)) (+ (* -1 (cos (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (+ (* -1/2 (sin (- (+ phi2 (* 1/2 (PI))) lambda1))) (* lambda2 (+ (* -1/6 (cos (- (+ phi2 (* 1/2 (PI))) lambda1))) (* 1/6 (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))))))))))))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (sin (- (+ phi2 (* 1/2 (PI))) lambda1))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- (+ phi2 (* 1/2 (PI))) lambda1)) (* lambda2 (cos (- (+ phi2 (* 1/2 (PI))) lambda1))))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- (+ phi2 (* 1/2 (PI))) lambda1)) (* lambda2 (+ (cos (- (+ phi2 (* 1/2 (PI))) lambda1)) (* -1/2 (* lambda2 (sin (- (+ phi2 (* 1/2 (PI))) lambda1)))))))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- (+ phi2 (* 1/2 (PI))) lambda1)) (* lambda2 (+ (cos (- (+ phi2 (* 1/2 (PI))) lambda1)) (* lambda2 (+ (* -1/2 (sin (- (+ phi2 (* 1/2 (PI))) lambda1))) (* -1/6 (* lambda2 (cos (- (+ phi2 (* 1/2 (PI))) lambda1)))))))))))
#s(approx (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (- (+ phi2 (* 1/2 (PI))) lambda1)))
#s(approx (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (- (+ lambda2 (+ phi2 (* 1/2 (PI)))) lambda1)))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (+ (sin (+ lambda1 (+ phi2 (* 1/2 (PI))))) (* -1 (* lambda2 (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))))))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (+ (sin (+ lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (+ (* -1 (cos (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1/2 (* lambda2 (sin (+ lambda1 (+ phi2 (* 1/2 (PI))))))))))))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (+ (sin (+ lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (+ (* -1 (cos (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* 1/6 (* lambda2 (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))))))))))
#s(approx (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (+ lambda1 (+ phi2 (* 1/2 (PI))))))
#s(approx (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (+ lambda1 (+ phi2 (+ (* -1 lambda2) (* 1/2 (PI)))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin lambda1) (* -1/2 (* (pow phi2 2) (sin lambda1))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin lambda1) (+ (* -1/2 (* (pow phi2 2) (sin lambda1))) (* lambda2 (+ (* -1 (cos lambda1)) (* 1/2 (* (pow phi2 2) (cos lambda1)))))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin lambda1) (+ (* -1/2 (* (pow phi2 2) (sin lambda1))) (* lambda2 (+ (* -1 (cos lambda1)) (+ (* 1/2 (* (pow phi2 2) (cos lambda1))) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/4 (* (pow phi2 2) (sin lambda1))))))))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin lambda1) (+ (* -1/2 (* (pow phi2 2) (sin lambda1))) (* lambda2 (+ (* -1 (cos lambda1)) (+ (* 1/2 (* (pow phi2 2) (cos lambda1))) (* lambda2 (+ (* -1/2 (sin lambda1)) (+ (* 1/4 (* (pow phi2 2) (sin lambda1))) (* lambda2 (+ (* -1/12 (* (pow phi2 2) (cos lambda1))) (* 1/6 (cos lambda1))))))))))))))
#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 lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 lambda1))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ lambda1 (* lambda2 (- (* -1/2 (* lambda1 lambda2)) 1)))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)))))
#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 (neg (sin lambda2)) #s(hole binary64 (* -1 lambda2)))
#s(approx (neg (sin lambda2)) #s(hole binary64 (* lambda2 (- (* 1/6 (pow lambda2 2)) 1))))
#s(approx (neg (sin lambda2)) #s(hole binary64 (* lambda2 (- (* (pow lambda2 2) (+ 1/6 (* -1/120 (pow lambda2 2)))) 1))))
#s(approx (neg (sin lambda2)) #s(hole binary64 (* lambda2 (- (* (pow lambda2 2) (+ 1/6 (* (pow lambda2 2) (- (* 1/5040 (pow lambda2 2)) 1/120)))) 1))))
#s(approx (sin lambda2) #s(hole binary64 lambda2))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* -1/6 (pow lambda2 2))))))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* (pow lambda2 2) (- (* 1/120 (pow lambda2 2)) 1/6))))))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/120 (* -1/5040 (pow lambda2 2)))) 1/6))))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (cos phi2)))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (+ (cos phi2) (* lambda1 (* lambda2 (cos phi2))))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (+ (cos phi2) (* lambda2 (+ (* -1/2 (* lambda2 (cos phi2))) (* lambda1 (cos phi2)))))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (+ (cos phi2) (* lambda2 (+ (* lambda1 (cos phi2)) (* lambda2 (+ (* -1/2 (cos phi2)) (* -1/6 (* lambda1 (* lambda2 (cos phi2)))))))))))
#s(approx (* lambda1 (* (cos phi2) (neg (sin lambda2)))) #s(hole binary64 (* -1 (* lambda1 (* lambda2 (cos phi2))))))
#s(approx (* lambda1 (* (cos phi2) (neg (sin lambda2)))) #s(hole binary64 (* lambda2 (+ (* -1 (* lambda1 (cos phi2))) (* 1/6 (* lambda1 (* (pow lambda2 2) (cos phi2))))))))
#s(approx (* lambda1 (* (cos phi2) (neg (sin lambda2)))) #s(hole binary64 (* lambda2 (+ (* -1 (* lambda1 (cos phi2))) (* (pow lambda2 2) (+ (* -1/120 (* lambda1 (* (pow lambda2 2) (cos phi2)))) (* 1/6 (* lambda1 (cos phi2)))))))))
#s(approx (* lambda1 (* (cos phi2) (neg (sin lambda2)))) #s(hole binary64 (* lambda2 (+ (* -1 (* lambda1 (cos phi2))) (* (pow lambda2 2) (+ (* 1/6 (* lambda1 (cos phi2))) (* (pow lambda2 2) (+ (* -1/120 (* lambda1 (cos phi2))) (* 1/5040 (* lambda1 (* (pow lambda2 2) (cos phi2))))))))))))
#s(approx (* (cos phi2) (neg (sin lambda2))) #s(hole binary64 (* -1 (* lambda2 (cos phi2)))))
#s(approx (* (cos phi2) (neg (sin lambda2))) #s(hole binary64 (* lambda2 (+ (* -1 (cos phi2)) (* 1/6 (* (pow lambda2 2) (cos phi2)))))))
#s(approx (* (cos phi2) (neg (sin lambda2))) #s(hole binary64 (* lambda2 (+ (* -1 (cos phi2)) (* (pow lambda2 2) (+ (* -1/120 (* (pow lambda2 2) (cos phi2))) (* 1/6 (cos phi2))))))))
#s(approx (* (cos phi2) (neg (sin lambda2))) #s(hole binary64 (* lambda2 (+ (* -1 (cos phi2)) (* (pow lambda2 2) (+ (* 1/6 (cos phi2)) (* (pow lambda2 2) (+ (* -1/120 (cos phi2)) (* 1/5040 (* (pow lambda2 2) (cos phi2)))))))))))
#s(approx (* (cos phi2) (cos lambda2)) #s(hole binary64 (cos phi2)))
#s(approx (* (cos phi2) (cos lambda2)) #s(hole binary64 (+ (cos phi2) (* -1/2 (* (pow lambda2 2) (cos phi2))))))
#s(approx (* (cos phi2) (cos lambda2)) #s(hole binary64 (+ (cos phi2) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda2 2) (cos phi2))))))))
#s(approx (* (cos phi2) (cos lambda2)) #s(hole binary64 (+ (cos phi2) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (cos phi2))) (* 1/24 (cos phi2)))))))))
#s(approx (+ (cos 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 (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (* lambda1 (sin (* 1/2 (PI))))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ (* lambda1 (sin (* 1/2 (PI)))) (* lambda2 (- (* lambda1 (cos (* 1/2 (PI)))) 1)))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ (* lambda1 (sin (* 1/2 (PI)))) (* lambda2 (- (+ (* -1/2 (* lambda1 (* lambda2 (sin (* 1/2 (PI)))))) (* lambda1 (cos (* 1/2 (PI))))) 1)))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ (* lambda1 (sin (* 1/2 (PI)))) (* lambda2 (- (+ (* lambda1 (cos (* 1/2 (PI)))) (* lambda2 (+ (* -1/2 (* lambda1 (sin (* 1/2 (PI))))) (* lambda2 (+ 1/6 (* -1/6 (* lambda1 (cos (* 1/2 (PI)))))))))) 1)))))
#s(approx (sin (+ lambda2 (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ lambda2 (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* lambda2 (cos (* 1/2 (PI)))))))
#s(approx (sin (+ lambda2 (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* lambda2 (+ (cos (* 1/2 (PI))) (* -1/2 (* lambda2 (sin (* 1/2 (PI))))))))))
#s(approx (sin (+ lambda2 (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* lambda2 (+ (cos (* 1/2 (PI))) (* lambda2 (+ (* -1/2 (sin (* 1/2 (PI)))) (* -1/6 (* lambda2 (cos (* 1/2 (PI))))))))))))
#s(approx (+ lambda2 (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ lambda2 (/ (PI) 2)) #s(hole binary64 (+ lambda2 (* 1/2 (PI)))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (sin lambda1)))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (cos phi2))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* -1/2 (* (pow lambda2 2) (cos phi2)))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda2 2) (cos phi2)))))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (cos phi2))) (* 1/24 (cos phi2))))))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos lambda1) (cos phi2)))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* 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 (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) #s(hole binary64 lambda1))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) #s(hole binary64 (+ lambda1 (* lambda2 (- (* -1/2 (* lambda1 lambda2)) 1)))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) #s(hole binary64 (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)))))
#s(approx (* lambda1 (cos lambda2)) #s(hole binary64 lambda1))
#s(approx (* lambda1 (cos lambda2)) #s(hole binary64 (+ lambda1 (* -1/2 (* lambda1 (pow lambda2 2))))))
#s(approx (* lambda1 (cos lambda2)) #s(hole binary64 (+ lambda1 (* (pow lambda2 2) (+ (* -1/2 lambda1) (* 1/24 (* lambda1 (pow lambda2 2))))))))
#s(approx (* lambda1 (cos lambda2)) #s(hole binary64 (+ lambda1 (* (pow lambda2 2) (+ (* -1/2 lambda1) (* (pow lambda2 2) (+ (* -1/720 (* lambda1 (pow lambda2 2))) (* 1/24 lambda1))))))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 1))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (+ 1 (* lambda1 lambda2))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2))))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (+ 1 (* lambda2 (+ lambda1 (* lambda2 (- (* -1/6 (* lambda1 lambda2)) 1/2)))))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ 1 (* -1/2 (pow lambda1 2)))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda1 lambda2)))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ lambda1 (* lambda2 (- (* 1/4 (pow lambda1 2)) 1/2))))))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ lambda1 (* lambda2 (- (+ (* -1/6 (* lambda1 lambda2)) (* 1/4 (pow lambda1 2))) 1/2))))))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (* -1/2 lambda1)))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (+ lambda2 (* -1/2 lambda1))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ 1 (* 1/4 (* lambda1 lambda2)))))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ 1 (* lambda2 (+ (* -1/6 lambda2) (* 1/4 lambda1))))))))
#s(approx (* (* (cos lambda2) lambda1) -1/2) #s(hole binary64 (* -1/2 lambda1)))
#s(approx (* (* (cos lambda2) lambda1) -1/2) #s(hole binary64 (+ (* -1/2 lambda1) (* 1/4 (* lambda1 (pow lambda2 2))))))
#s(approx (* (* (cos lambda2) lambda1) -1/2) #s(hole binary64 (+ (* -1/2 lambda1) (* (pow lambda2 2) (+ (* -1/48 (* lambda1 (pow lambda2 2))) (* 1/4 lambda1))))))
#s(approx (* (* (cos lambda2) lambda1) -1/2) #s(hole binary64 (+ (* -1/2 lambda1) (* (pow lambda2 2) (+ (* 1/4 lambda1) (* (pow lambda2 2) (+ (* -1/48 lambda1) (* 1/1440 (* lambda1 (pow lambda2 2))))))))))
#s(approx (* (cos lambda2) lambda1) #s(hole binary64 lambda1))
#s(approx (* (cos lambda2) lambda1) #s(hole binary64 (+ lambda1 (* -1/2 (* lambda1 (pow lambda2 2))))))
#s(approx (* (cos lambda2) lambda1) #s(hole binary64 (+ lambda1 (* (pow lambda2 2) (+ (* -1/2 lambda1) (* 1/24 (* lambda1 (pow lambda2 2))))))))
#s(approx (* (cos lambda2) lambda1) #s(hole binary64 (+ lambda1 (* (pow lambda2 2) (+ (* -1/2 lambda1) (* (pow lambda2 2) (+ (* -1/720 (* lambda1 (pow lambda2 2))) (* 1/24 lambda1))))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ 1 (* -1/2 (pow lambda1 2)))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda1 (* lambda2 (+ 1 (* -1/6 (pow lambda1 2)))))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ (* lambda1 (+ 1 (* -1/6 (pow lambda1 2)))) (* lambda2 (- (* 1/4 (pow lambda1 2)) 1/2))))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ (* lambda1 (+ 1 (* -1/6 (pow lambda1 2)))) (* lambda2 (- (+ (* 1/4 (pow lambda1 2)) (* lambda1 (* lambda2 (- (* 1/36 (pow lambda1 2)) 1/6)))) 1/2))))))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (* -1/2 lambda1)))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ 1 (* -1/6 (pow lambda1 2)))))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ 1 (+ (* -1/6 (pow lambda1 2)) (* 1/4 (* lambda1 lambda2))))))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ 1 (+ (* -1/6 (pow lambda1 2)) (* lambda2 (+ (* 1/4 lambda1) (* lambda2 (- (* 1/36 (pow lambda1 2)) 1/6))))))))))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) #s(hole binary64 (* -1/2 lambda1)))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) #s(hole binary64 (+ (* -1/2 lambda1) (* -1/6 (* (pow lambda1 2) lambda2)))))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ (* -1/6 (pow lambda1 2)) (* 1/4 (* lambda1 lambda2)))))))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ (* -1/6 (pow lambda1 2)) (* lambda2 (+ (* 1/36 (* (pow lambda1 2) lambda2)) (* 1/4 lambda1))))))))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) #s(hole binary64 -1/2))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) #s(hole binary64 (- (* -1/6 (* lambda1 lambda2)) 1/2)))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) #s(hole binary64 (- (* lambda2 (+ (* -1/6 lambda1) (* 1/4 lambda2))) 1/2)))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) #s(hole binary64 (- (* lambda2 (+ (* -1/6 lambda1) (* lambda2 (+ 1/4 (* 1/36 (* lambda1 lambda2)))))) 1/2)))
#s(approx (* -1/2 (cos lambda2)) #s(hole binary64 -1/2))
#s(approx (* -1/2 (cos lambda2)) #s(hole binary64 (- (* 1/4 (pow lambda2 2)) 1/2)))
#s(approx (* -1/2 (cos lambda2)) #s(hole binary64 (- (* (pow lambda2 2) (+ 1/4 (* -1/48 (pow lambda2 2)))) 1/2)))
#s(approx (* -1/2 (cos lambda2)) #s(hole binary64 (- (* (pow lambda2 2) (+ 1/4 (* (pow lambda2 2) (- (* 1/1440 (pow lambda2 2)) 1/48)))) 1/2)))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) #s(hole binary64 lambda1))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) #s(hole binary64 (+ lambda1 (* lambda2 (- (* 1/2 (pow lambda1 2)) 1)))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) #s(hole binary64 (+ lambda1 (* lambda2 (- (+ (* -1/2 (* lambda1 lambda2)) (* 1/2 (pow lambda1 2))) 1)))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) #s(hole binary64 (+ lambda1 (* lambda2 (- (+ (* 1/2 (pow lambda1 2)) (* lambda2 (+ (* -1/2 lambda1) (* lambda2 (+ 1/6 (* -1/12 (pow lambda1 2))))))) 1)))))
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) #s(hole binary64 lambda1))
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) #s(hole binary64 (+ lambda1 (* 1/2 (* (pow lambda1 2) lambda2)))))
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) #s(hole binary64 (+ lambda1 (* lambda2 (+ (* -1/2 (* lambda1 lambda2)) (* 1/2 (pow lambda1 2)))))))
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) #s(hole binary64 (+ lambda1 (* lambda2 (+ (* 1/2 (pow lambda1 2)) (* lambda2 (+ (* -1/2 lambda1) (* -1/12 (* (pow lambda1 2) lambda2)))))))))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) #s(hole binary64 1))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) #s(hole binary64 (+ 1 (* 1/2 (* lambda1 lambda2)))))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) #s(hole binary64 (+ 1 (* lambda2 (+ (* -1/2 lambda2) (* 1/2 lambda1))))))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) #s(hole binary64 (+ 1 (* lambda2 (+ (* 1/2 lambda1) (* lambda2 (- (* -1/12 (* lambda1 lambda2)) 1/2)))))))
#s(approx (* -1/2 (* lambda1 (neg (sin lambda2)))) #s(hole binary64 (* 1/2 (* lambda1 lambda2))))
#s(approx (* -1/2 (* lambda1 (neg (sin lambda2)))) #s(hole binary64 (* lambda2 (+ (* -1/12 (* lambda1 (pow lambda2 2))) (* 1/2 lambda1)))))
#s(approx (* -1/2 (* lambda1 (neg (sin lambda2)))) #s(hole binary64 (* lambda2 (+ (* 1/2 lambda1) (* (pow lambda2 2) (+ (* -1/12 lambda1) (* 1/240 (* lambda1 (pow lambda2 2)))))))))
#s(approx (* -1/2 (* lambda1 (neg (sin lambda2)))) #s(hole binary64 (* lambda2 (+ (* 1/2 lambda1) (* (pow lambda2 2) (+ (* -1/12 lambda1) (* (pow lambda2 2) (+ (* -1/10080 (* lambda1 (pow lambda2 2))) (* 1/240 lambda1)))))))))
#s(approx (* lambda1 (neg (sin lambda2))) #s(hole binary64 (* -1 (* lambda1 lambda2))))
#s(approx (* lambda1 (neg (sin lambda2))) #s(hole binary64 (* lambda2 (+ (* -1 lambda1) (* 1/6 (* lambda1 (pow lambda2 2)))))))
#s(approx (* lambda1 (neg (sin lambda2))) #s(hole binary64 (* lambda2 (+ (* -1 lambda1) (* (pow lambda2 2) (+ (* -1/120 (* lambda1 (pow lambda2 2))) (* 1/6 lambda1)))))))
#s(approx (* lambda1 (neg (sin lambda2))) #s(hole binary64 (* lambda2 (+ (* -1 lambda1) (* (pow lambda2 2) (+ (* 1/6 lambda1) (* (pow lambda2 2) (+ (* -1/120 lambda1) (* 1/5040 (* lambda1 (pow lambda2 2)))))))))))
#s(approx (- (/ lambda1 lambda2) 1) #s(hole binary64 (/ (+ lambda1 (* -1 lambda2)) lambda2)))
#s(approx (* lambda1 (- (pow lambda2 -1) (pow lambda1 -1))) #s(hole binary64 (/ (+ lambda1 (* -1 lambda2)) lambda2)))
#s(approx (- (pow lambda2 -1) (pow lambda1 -1)) #s(hole binary64 (/ (+ 1 (* -1 (/ lambda2 lambda1))) lambda2)))
#s(approx (pow lambda2 -1) #s(hole binary64 (/ 1 lambda2)))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (/ (+ lambda1 (* -1 lambda2)) lambda2)))
#s(approx (- (pow (/ lambda1 lambda2) 3) 1) #s(hole binary64 (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (pow lambda2 3))))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) #s(hole binary64 (/ (+ (* lambda1 lambda2) (pow lambda1 2)) (pow lambda2 2))))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) #s(hole binary64 (/ (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)) (pow lambda2 2))))
#s(approx (+ 1 (* (/ lambda1 lambda2) 1)) #s(hole binary64 (/ (+ lambda1 lambda2) lambda2)))
#s(approx (+ (cos lambda2) (cos phi1)) #s(hole binary64 (+ 1 (cos phi1))))
#s(approx (+ (cos lambda2) (cos phi1)) #s(hole binary64 (+ 1 (+ (cos phi1) (* -1/2 (pow lambda2 2))))))
#s(approx (+ (cos lambda2) (cos phi1)) #s(hole binary64 (+ 1 (+ (cos phi1) (* (pow lambda2 2) (- (* 1/24 (pow lambda2 2)) 1/2))))))
#s(approx (+ (cos lambda2) (cos phi1)) #s(hole binary64 (+ 1 (+ (cos phi1) (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/24 (* -1/720 (pow lambda2 2)))) 1/2))))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (cos lambda1))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (+ (cos lambda1) (* lambda2 (sin lambda1))))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1))))))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos lambda1) (cos phi2)))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (sin (+ lambda1 (* 1/2 (PI))))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* -1 (* lambda2 (* (cos phi2) (cos (+ lambda1 (* 1/2 (PI))))))) (* (cos phi2) (sin (+ lambda1 (* 1/2 (PI)))))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* -1 (* (cos phi2) (cos (+ lambda1 (* 1/2 (PI)))))) (* -1/2 (* lambda2 (* (cos phi2) (sin (+ lambda1 (* 1/2 (PI))))))))) (* (cos phi2) (sin (+ lambda1 (* 1/2 (PI)))))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* -1 (* (cos phi2) (cos (+ lambda1 (* 1/2 (PI)))))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin (+ lambda1 (* 1/2 (PI)))))) (* 1/6 (* lambda2 (* (cos phi2) (cos (+ lambda1 (* 1/2 (PI))))))))))) (* (cos phi2) (sin (+ lambda1 (* 1/2 (PI)))))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) #s(hole binary64 (sin (+ lambda1 (* 1/2 (PI))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ lambda1 (* 1/2 (PI)))) (* -1 (* lambda2 (cos (+ lambda1 (* 1/2 (PI)))))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ lambda1 (* 1/2 (PI)))) (* lambda2 (+ (* -1 (cos (+ lambda1 (* 1/2 (PI))))) (* -1/2 (* lambda2 (sin (+ lambda1 (* 1/2 (PI)))))))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ lambda1 (* 1/2 (PI)))) (* lambda2 (+ (* -1 (cos (+ lambda1 (* 1/2 (PI))))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 (* 1/2 (PI))))) (* 1/6 (* lambda2 (cos (+ lambda1 (* 1/2 (PI)))))))))))))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) #s(hole binary64 (+ lambda1 (* 1/2 (PI)))))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) #s(hole binary64 (+ lambda1 (+ (* -1 lambda2) (* 1/2 (PI))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (+ (* lambda2 (* (sin lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* -1/2 (* 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)))))) (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/6 (* 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)))))) (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (* lambda2 (* (sin lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* 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)))))) (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/6 (* 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)))))) (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos lambda1) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos lambda1) (+ (* lambda2 (sin lambda1)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos lambda1) (+ (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos lambda1) (+ (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi2) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi2) (+ (* -1/2 (* (pow lambda2 2) (cos phi2))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi2) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda2 2) (cos phi2))))))))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi2) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (cos phi2))) (* 1/24 (cos phi2)))))))))))
#s(approx (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi1)))))
#s(approx (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos phi2) (+ (* -1/2 (* (pow lambda2 2) (cos phi2))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos phi2) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda2 2) (cos phi2)))))))))
#s(approx (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos phi2) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (cos phi2))) (* 1/24 (cos phi2))))))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (/ (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda2 (- (* -1 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (/ (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -1 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* lambda2 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* -1 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* 1/2 (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (+ (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (/ (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -1 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* lambda2 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* -1 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (* 1/2 (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* lambda2 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (/ (* (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 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* 1/2 (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (* 1/6 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (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 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (+ (* 1/6 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1)))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (+ (/ (* (cos phi2) (* (sin lambda1) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (+ (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (/ (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 (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (/ (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (- 1 (* (cos lambda1) (cos phi2))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (- (+ (* lambda2 (- (* -2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- 1 (* (cos lambda1) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda1) (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ 1 (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- 1 (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- 1 (* (cos lambda1) (cos phi2))))) (* lambda2 (- (* -1 (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (* -2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- 1 (* (cos lambda1) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda1) (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (- 1 (* (cos lambda1) (cos phi2))))) (* 1/2 (/ (* (cos lambda1) (* (cos phi2) (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))) (* -1 (/ (* (cos phi2) (* (sin lambda1) (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ 1 (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- 1 (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- 1 (* (cos lambda1) (cos phi2))))) (* lambda2 (- (+ (* -1 (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (- 1 (* (cos lambda1) (cos phi2))))) (* lambda2 (- (* -1 (/ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (* -1 (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (* -2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- 1 (* (cos lambda1) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda1) (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (- 1 (* (cos lambda1) (cos phi2))))) (* 1/2 (/ (* (cos lambda1) (* (cos phi2) (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* 1/6 (/ (* (cos phi2) (* (sin lambda1) (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (* 1/2 (/ (* (cos lambda1) (* (cos phi2) (- (* -2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- 1 (* (cos lambda1) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda1) (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (- 1 (* (cos lambda1) (cos phi2)))))))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (* -2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- 1 (* (cos lambda1) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda1) (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (- 1 (* (cos lambda1) (cos phi2))))) (* 1/2 (/ (* (cos lambda1) (* (cos phi2) (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))) (* -1 (/ (* (cos phi2) (* (sin lambda1) (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ 1 (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- 1 (* (cos lambda1) (cos phi2)))))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- (+ 1 (* -2 (* lambda2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- (+ 1 (* 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 lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- (+ 1 (* 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 lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) #s(hole binary64 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) #s(hole binary64 (+ (* 2 (* lambda2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) #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 (* (cos phi2) (cos (- lambda1 lambda2))) 2) #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 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- 1 (* (cos lambda1) (cos phi2)))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* -1 (* lambda2 (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (cos phi2)))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* lambda2 (- (* 1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (cos phi2)))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* 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) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (- (pow (cos phi1) 2) (pow (cos lambda1) 2)) (- (cos phi1) (cos lambda1)))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda2 (- (* -2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (sin lambda1) (- (pow (cos phi1) 2) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos lambda1)))) (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* lambda2 (- (* -1 (/ (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (cos lambda1)))) (+ (* -1 (/ (* (sin lambda1) (- (* -2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (sin lambda1) (- (pow (cos phi1) 2) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))) (- (cos phi1) (cos lambda1)))) (* 1/2 (/ (* (cos lambda1) (- (pow (cos phi1) 2) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))))) (* -1 (/ (* (sin lambda1) (- (pow (cos phi1) 2) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos lambda1)))) (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* lambda2 (- (+ (* -1 (/ (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (cos lambda1)))) (* lambda2 (- (* -1 (/ (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))) (- (cos phi1) (cos lambda1)))) (+ (* -1 (/ (* (sin lambda1) (- (* -1 (/ (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (cos lambda1)))) (+ (* -1 (/ (* (sin lambda1) (- (* -2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (sin lambda1) (- (pow (cos phi1) 2) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))) (- (cos phi1) (cos lambda1)))) (* 1/2 (/ (* (cos lambda1) (- (pow (cos phi1) 2) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2)))))) (- (cos phi1) (cos lambda1)))) (+ (* 1/6 (/ (* (sin lambda1) (- (pow (cos phi1) 2) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))) (* 1/2 (/ (* (cos lambda1) (- (* -2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (sin lambda1) (- (pow (cos phi1) 2) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))) (- (cos phi1) (cos lambda1))))))))) (+ (* -1 (/ (* (sin lambda1) (- (* -2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (sin lambda1) (- (pow (cos phi1) 2) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))) (- (cos phi1) (cos lambda1)))) (* 1/2 (/ (* (cos lambda1) (- (pow (cos phi1) 2) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))))) (* -1 (/ (* (sin lambda1) (- (pow (cos phi1) 2) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos lambda1)))) (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1))))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (pow (cos phi1) 2) (pow (cos lambda1) 2))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ (* -2 (* lambda2 (* (cos lambda1) (sin lambda1)))) (pow (cos phi1) 2)) (pow (cos lambda1) 2))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ (* lambda2 (- (* -1 (* lambda2 (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 2 (* (cos lambda1) (sin lambda1))))) (pow (cos phi1) 2)) (pow (cos lambda1) 2))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 2 (* (cos lambda1) (sin lambda1))))) (pow (cos phi1) 2)) (pow (cos lambda1) 2))))
#s(approx (pow (cos (- lambda1 lambda2)) 2) #s(hole binary64 (pow (cos lambda1) 2)))
#s(approx (pow (cos (- lambda1 lambda2)) 2) #s(hole binary64 (+ (* 2 (* lambda2 (* (cos lambda1) (sin lambda1)))) (pow (cos lambda1) 2))))
#s(approx (pow (cos (- lambda1 lambda2)) 2) #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 (pow (cos (- lambda1 lambda2)) 2) #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 phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (cos phi1) (cos lambda1))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ (cos phi1) (* -1 (* lambda2 (sin lambda1)))) (cos lambda1))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ (cos phi1) (* lambda2 (+ (* -1 (sin lambda1)) (* 1/2 (* lambda2 (cos lambda1)))))) (cos lambda1))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ (cos phi1) (* lambda2 (+ (* -1 (sin lambda1)) (* lambda2 (- (* 1/6 (* lambda2 (sin lambda1))) (* -1/2 (cos lambda1))))))) (cos lambda1))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (/ (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* lambda2 (- (/ (* (pow (cos phi2) 3) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1)))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)))) (+ (/ 1 (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #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)))))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (+ (/ (* (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* -1/2 (* (cos lambda1) (cos phi2))))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)) (/ (* (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1))) (- (/ (* (pow (cos phi2) 3) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1)))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))))))) (/ (* (pow (cos phi2) 3) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))))) (/ (* (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1)))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)))) (+ (/ 1 (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #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))))))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (+ (/ (* (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* -1/6 (* (cos phi2) (sin lambda1))))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)) (+ (/ (* (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (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)))))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (+ (/ (* (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* -1/2 (* (cos lambda1) (cos phi2))))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)) (/ (* (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1))) (- (/ (* (pow (cos phi2) 3) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1)))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))))))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (- (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* -1/2 (* (cos lambda1) (cos phi2)))) (- (/ (* (pow (cos phi2) 3) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1)))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (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)))))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))))) (+ (/ (* (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* -1/2 (* (cos lambda1) (cos phi2))))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)) (/ (* (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1))) (- (/ (* (pow (cos phi2) 3) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1)))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))))))) (/ (* (pow (cos phi2) 3) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))))) (/ (* (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1)))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)))) (+ (/ 1 (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) #s(hole binary64 (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3)))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) #s(hole binary64 (+ 1 (+ (* 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))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) #s(hole binary64 (+ 1 (+ (* 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))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) #s(hole binary64 (+ 1 (+ (* 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))))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3) #s(hole binary64 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 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)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 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)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 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)))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* lambda2 (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1)))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))) (* (cos lambda1) (cos phi2)))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* 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 phi2)))))) (* (cos phi2) (sin lambda1)))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))) (* (cos lambda1) (cos phi2)))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* 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 phi2) (sin lambda1))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* -1/2 (* (cos lambda1) (cos phi2)))))) (* (cos phi2) (sin lambda1)))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))) (* (cos lambda1) (cos phi2)))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (+ (* 2 (* lambda2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (+ (* 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 (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (+ (* 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 (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos lambda1) (cos phi2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (* (cos phi2) (sin lambda1))) (+ (* (cos lambda1) (cos phi2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (cos phi2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (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)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (/ (* (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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) (- (* 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 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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi1) (* (cos phi2) (sin lambda1)))) 2)) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2)))) 3))) (+ (/ (* (- (* 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) (- (* 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) 3) (* (pow (cos phi2) 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)) (/ (* (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))))))) (/ (* (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) (- (* 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 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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi1) (* (cos phi2) (sin lambda1)))) 2)) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (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 lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (* (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (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))))))) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2)))) 3))) (+ (/ (* (- (* 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))))) (+ (/ (* (- (* 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) (- (* 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) 3) (* (pow (cos phi2) 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))))) (- (+ (* (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) (- (* 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) 3) (* (pow (cos phi2) 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)) (/ (* (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))))))))) (/ (* (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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi1) (* (cos phi2) (sin lambda1)))) 2)) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2)))) 3))) (+ (/ (* (- (* 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) (- (* 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) 3) (* (pow (cos phi2) 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)) (/ (* (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))))))) (/ (* (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) (- (* 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 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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (pow (cos phi1) 3) (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2)))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* -1 (/ (* lambda2 (* (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 phi1) 3) (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* lambda2 (- (* -1 (* lambda2 (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi1) (* (cos phi2) (sin lambda1)))) 2)) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (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))))) (/ (* (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 phi1) 3) (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (+ (* -1 (/ (* (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi1) (* (cos phi2) (sin lambda1)))) 2)) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (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 lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (* (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (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))))))) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi1) (* (cos phi2) (sin lambda1)))) 2)) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (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))))) (/ (* (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 phi1) 3) (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2))))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* lambda2 (- (/ (* (cos phi2) (sin lambda1)) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))))) (/ 1 (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* lambda2 (- (+ (* lambda2 (- (* -1/2 (/ (* (cos lambda1) (cos phi2)) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))) (+ (/ (* (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1))) (- (/ (* (cos phi2) (sin lambda1)) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))))) (/ (* (cos phi2) (sin lambda1)) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))))) (/ 1 (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* lambda2 (- (+ (* lambda2 (- (+ (* -1/2 (/ (* (cos lambda1) (cos phi2)) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))) (* lambda2 (- (* -1/6 (/ (* (cos phi2) (sin lambda1)) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))) (+ (/ (* (- (* -1/2 (/ (* (cos lambda1) (cos phi2)) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))) (+ (/ (* (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1))) (- (/ (* (cos phi2) (sin lambda1)) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)))) (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (+ (/ (* (- (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* -1/2 (* (cos lambda1) (cos phi2)))) (- (/ (* (cos phi2) (sin lambda1)) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))))))) (+ (/ (* (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1))) (- (/ (* (cos phi2) (sin lambda1)) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))))) (/ (* (cos phi2) (sin lambda1)) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))))) (/ 1 (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (* (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)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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) (- (* 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))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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))))) (+ (/ (* (- (* 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) (- (* 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) 3) (* (pow (cos phi2) 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))))) (/ (* (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) (- (* 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))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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))))) (+ (/ (* (- (* 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))))) (+ (/ (* (- (* 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) (- (* 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) 3) (* (pow (cos phi2) 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))))) (- (+ (* (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) (- (* 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) 3) (* (pow (cos phi2) 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)))))) (/ (* (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)))))) (+ (/ (* (- (* 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) (- (* 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) 3) (* (pow (cos phi2) 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))))) (/ (* (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) (- (* 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))))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) #s(hole binary64 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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)))))
#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 phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (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))) (* -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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (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))))) (* -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 (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #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))) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (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))) (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (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))))) (* -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))) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #s(hole binary64 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #s(hole binary64 (+ (* 2 (* lambda2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (* (cos lambda1) (* (cos phi1) (cos phi2)))))
#s(approx (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #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 (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) #s(hole binary64 1))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) #s(hole binary64 (+ 1 (* lambda1 lambda2))))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) #s(hole binary64 (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2))))))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) #s(hole binary64 (+ 1 (* lambda2 (+ lambda1 (* lambda2 (- (* -1/6 (* lambda1 lambda2)) 1/2)))))))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) #s(hole binary64 (/ 1 lambda1)))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) #s(hole binary64 (+ lambda2 (/ 1 lambda1))))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) #s(hole binary64 (+ (* lambda2 (+ 1 (* -1/2 (/ lambda2 lambda1)))) (/ 1 lambda1))))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) #s(hole binary64 (+ (* lambda2 (+ 1 (* lambda2 (- (* -1/6 lambda2) (* 1/2 (/ 1 lambda1)))))) (/ 1 lambda1))))
#s(approx (/ (cos lambda2) lambda1) #s(hole binary64 (/ 1 lambda1)))
#s(approx (/ (cos lambda2) lambda1) #s(hole binary64 (+ (* -1/2 (/ (pow lambda2 2) lambda1)) (/ 1 lambda1))))
#s(approx (/ (cos lambda2) lambda1) #s(hole binary64 (+ (* (pow lambda2 2) (- (* 1/24 (/ (pow lambda2 2) lambda1)) (* 1/2 (/ 1 lambda1)))) (/ 1 lambda1))))
#s(approx (/ (cos lambda2) lambda1) #s(hole binary64 (+ (* (pow lambda2 2) (- (* (pow lambda2 2) (+ (* -1/720 (/ (pow lambda2 2) lambda1)) (* 1/24 (/ 1 lambda1)))) (* 1/2 (/ 1 lambda1)))) (/ 1 lambda1))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) #s(hole binary64 (* (pow lambda1 2) (- (/ 1 (pow lambda1 2)) 1/2))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) #s(hole binary64 (+ (* lambda1 lambda2) (* (pow lambda1 2) (- (/ 1 (pow lambda1 2)) 1/2)))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) #s(hole binary64 (+ (* lambda2 (+ lambda1 (* (pow lambda1 2) (* lambda2 (- 1/4 (* 1/2 (/ 1 (pow lambda1 2)))))))) (* (pow lambda1 2) (- (/ 1 (pow lambda1 2)) 1/2)))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) #s(hole binary64 (+ (* lambda2 (+ lambda1 (* lambda2 (+ (* -1/6 (* lambda1 lambda2)) (* (pow lambda1 2) (- 1/4 (* 1/2 (/ 1 (pow lambda1 2))))))))) (* (pow lambda1 2) (- (/ 1 (pow lambda1 2)) 1/2)))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) #s(hole binary64 (- (/ 1 (pow lambda1 2)) 1/2)))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) #s(hole binary64 (- (+ (/ 1 (pow lambda1 2)) (/ lambda2 lambda1)) 1/2)))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) #s(hole binary64 (- (+ (* lambda2 (+ (* lambda2 (- 1/4 (* 1/2 (/ 1 (pow lambda1 2))))) (/ 1 lambda1))) (/ 1 (pow lambda1 2))) 1/2)))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) #s(hole binary64 (- (+ (* lambda2 (+ (* lambda2 (- (+ 1/4 (* -1/6 (/ lambda2 lambda1))) (* 1/2 (/ 1 (pow lambda1 2))))) (/ 1 lambda1))) (/ 1 (pow lambda1 2))) 1/2)))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) #s(hole binary64 (/ -1 (pow lambda1 2))))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) #s(hole binary64 (- (* -1 (/ lambda2 lambda1)) (/ 1 (pow lambda1 2)))))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) #s(hole binary64 (- (* lambda2 (- (* 1/2 (/ lambda2 (pow lambda1 2))) (/ 1 lambda1))) (/ 1 (pow lambda1 2)))))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) #s(hole binary64 (- (* lambda2 (- (* lambda2 (+ (* 1/6 (/ lambda2 lambda1)) (* 1/2 (/ 1 (pow lambda1 2))))) (/ 1 lambda1))) (/ 1 (pow lambda1 2)))))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) #s(hole binary64 (/ -1 lambda1)))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) #s(hole binary64 (- (* -1 lambda2) (/ 1 lambda1))))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) #s(hole binary64 (- (* lambda2 (- (* 1/2 (/ lambda2 lambda1)) 1)) (/ 1 lambda1))))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) #s(hole binary64 (- (* lambda2 (- (* lambda2 (+ (* 1/6 lambda2) (* 1/2 (/ 1 lambda1)))) 1)) (/ 1 lambda1))))
#s(approx (* -1 (/ (cos lambda2) lambda1)) #s(hole binary64 (/ -1 lambda1)))
#s(approx (* -1 (/ (cos lambda2) lambda1)) #s(hole binary64 (- (* 1/2 (/ (pow lambda2 2) lambda1)) (/ 1 lambda1))))
#s(approx (* -1 (/ (cos lambda2) lambda1)) #s(hole binary64 (- (* (pow lambda2 2) (+ (* -1/24 (/ (pow lambda2 2) lambda1)) (* 1/2 (/ 1 lambda1)))) (/ 1 lambda1))))
#s(approx (* -1 (/ (cos lambda2) lambda1)) #s(hole binary64 (- (* (pow lambda2 2) (+ (* (pow lambda2 2) (- (* 1/720 (/ (pow lambda2 2) lambda1)) (* 1/24 (/ 1 lambda1)))) (* 1/2 (/ 1 lambda1)))) (/ 1 lambda1))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/6 (* lambda2 (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))) (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/6 (* lambda2 (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))) (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* (cos lambda1) (cos phi2)) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (+ (* (cos lambda1) (cos phi2)) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (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)) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (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)) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (/ (* lambda2 (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1)))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda2 (- (* -1 (* lambda2 (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (+ (* 1/6 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1)))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (/ (* (cos phi2) (* (sin lambda1) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- 1 (* (cos lambda1) (cos phi2))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (/ 1 (- 1 (* (cos lambda1) (cos phi2)))) (/ (* lambda2 (* (cos phi2) (sin lambda1))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* lambda2 (- (* -1 (* lambda2 (+ (* -1 (/ (* (pow (cos phi2) 2) (pow (sin lambda1) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 3))) (* 1/2 (/ (* (cos lambda1) (cos phi2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (* -1 (/ (* (cos phi2) (sin lambda1)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ 1 (- 1 (* (cos lambda1) (cos phi2)))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (+ (* 1/6 (/ (* (cos phi2) (sin lambda1)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (+ (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (pow (- 1 (* (cos lambda1) (cos phi2))) 3))) (/ (* (cos phi2) (* (sin lambda1) (+ (* -1 (/ (* (pow (cos phi2) 2) (pow (sin lambda1) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 3))) (* 1/2 (/ (* (cos lambda1) (cos phi2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* -1 (/ (* (pow (cos phi2) 2) (pow (sin lambda1) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 3))) (* 1/2 (/ (* (cos lambda1) (cos phi2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (* -1 (/ (* (cos phi2) (sin lambda1)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ 1 (- 1 (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (/ (* (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 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* 1/2 (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))))) (* -1 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (+ (* lambda2 (- (/ (* (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) (- (/ (* (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 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* 1/2 (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (* 1/6 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (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 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))) (/ (* (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 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* 1/2 (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))))) (* -1 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- (cos phi1) (* (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 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1)))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (- (* 2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (pow (- (cos phi1) (cos lambda1)) 2))))) (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (- (+ (* 2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* lambda2 (- (+ (* -1 (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1)))) (/ (pow (sin lambda1) 2) (- (cos phi1) (cos lambda1)))) (+ (* -1 (/ (* (sin lambda1) (- (* 2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (pow (- (cos phi1) (cos lambda1)) 2))))) (- (cos phi1) (cos lambda1)))) (* 1/2 (/ (pow (cos lambda1) 3) (pow (- (cos phi1) (cos lambda1)) 2))))))) (* -1 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (pow (- (cos phi1) (cos lambda1)) 2))))) (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (- (+ (* 2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* lambda2 (- (+ (* -1 (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1)))) (+ (* lambda2 (- (+ (* -1 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1/3 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1))))) (+ (* -1 (/ (* (sin lambda1) (- (+ (* -1 (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1)))) (/ (pow (sin lambda1) 2) (- (cos phi1) (cos lambda1)))) (+ (* -1 (/ (* (sin lambda1) (- (* 2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (pow (- (cos phi1) (cos lambda1)) 2))))) (- (cos phi1) (cos lambda1)))) (* 1/2 (/ (pow (cos lambda1) 3) (pow (- (cos phi1) (cos lambda1)) 2)))))) (- (cos phi1) (cos lambda1)))) (+ (* 1/6 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (pow (- (cos phi1) (cos lambda1)) 2))) (* 1/2 (/ (* (cos lambda1) (- (* 2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (pow (- (cos phi1) (cos lambda1)) 2))))) (- (cos phi1) (cos lambda1)))))))) (/ (pow (sin lambda1) 2) (- (cos phi1) (cos lambda1))))) (+ (* -1 (/ (* (sin lambda1) (- (* 2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (pow (- (cos phi1) (cos lambda1)) 2))))) (- (cos phi1) (cos lambda1)))) (* 1/2 (/ (pow (cos lambda1) 3) (pow (- (cos phi1) (cos lambda1)) 2))))))) (* -1 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (pow (- (cos phi1) (cos lambda1)) 2))))) (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) #s(hole binary64 (+ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (cos phi1) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (cos phi1) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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))) (- (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda2 (- (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* lambda2 (- (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (/ (* (+ (* (cos lambda1) (* (cos phi2) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 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))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 4)) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* lambda2 (- (+ (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* lambda2 (- (* 1/6 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (/ (* (+ (* (cos lambda1) (* (cos phi2) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 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))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 4)) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (/ (* (+ (* -1 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 1/3 (* (cos phi2) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 4)) (+ (/ (* (+ (* (cos lambda1) (* (cos phi2) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 1/6 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (+ (* (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (/ (* (+ (* (cos lambda1) (* (cos phi2) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 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))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 4)) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ (* lambda2 (- (* -1 (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1)))) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))))) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -1 (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1)))) (* lambda2 (- (* 1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2)))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))))) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))))) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -1 (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1)))) (* lambda2 (- (+ (* 1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2)))) (* lambda2 (- (* 1/6 (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1)))) (* (pow (cos phi2) 2) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 1/6 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (+ (* (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))))))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))))) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))))) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* -1 (* lambda2 (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))))) (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1)))) (* 1/2 (* lambda2 (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))))))) (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1)))) (* lambda2 (+ (* 1/6 (* lambda2 (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))))) (* 1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2)))))))) (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* lambda2 (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* lambda2 (* (pow (cos phi2) 2) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 1/6 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (+ (* (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* -2 (* lambda2 (* (cos phi2) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda2 (+ (* -2 (* (cos phi2) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (* lambda2 (+ (* (cos lambda1) (* (cos phi2) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda2 (+ (* -2 (* (cos phi2) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (* lambda2 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 1/3 (* (cos phi2) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (+ (* (cos lambda1) (* (cos phi2) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (* lambda2 (- (* -2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (* 1/2 (/ 1 (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (* 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) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))))) (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (* 1/2 (/ 1 (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (* 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) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))))) (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (* 1/2 (/ 1 (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (+ 1/2 (+ (* -2 (* lambda2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))))) (* 1/2 (cos (* 2 phi1))))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* 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 lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* 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 lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #s(hole binary64 (- (pow (cos phi1) 2) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #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 (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #s(hole binary64 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #s(hole binary64 (+ (* 2 (* lambda2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #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 (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #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 (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (* 2 (log (* (cos lambda1) (cos phi2))))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (+ (* 2 (log (* (cos lambda1) (cos phi2)))) (* 2 (/ (* lambda2 (sin lambda1)) (cos lambda1))))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (+ (* 2 (log (* (cos lambda1) (cos phi2)))) (* lambda2 (+ (* 2 (/ (sin lambda1) (cos lambda1))) (* lambda2 (- (* -1 (/ (pow (sin lambda1) 2) (pow (cos lambda1) 2))) 1)))))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (+ (* 2 (log (* (cos lambda1) (cos phi2)))) (* lambda2 (+ (* 2 (/ (sin lambda1) (cos lambda1))) (* lambda2 (- (+ (* -1 (/ (pow (sin lambda1) 2) (pow (cos lambda1) 2))) (* 1/3 (* lambda2 (+ (* -1 (/ (sin lambda1) (cos lambda1))) (+ (* 2 (/ (pow (sin lambda1) 3) (pow (cos lambda1) 3))) (* 3 (/ (sin lambda1) (cos lambda1)))))))) 1)))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (log (* (cos lambda1) (cos phi2)))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (+ (log (* (cos lambda1) (cos phi2))) (/ (* lambda2 (sin lambda1)) (cos lambda1)))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (+ (log (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* 1/2 (* lambda2 (- (* -1 (/ (pow (sin lambda1) 2) (pow (cos lambda1) 2))) 1))) (/ (sin lambda1) (cos lambda1)))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (+ (log (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* lambda2 (+ (* 1/6 (* lambda2 (+ (* -1 (/ (sin lambda1) (cos lambda1))) (+ (* 2 (/ (pow (sin lambda1) 3) (pow (cos lambda1) 3))) (* 3 (/ (sin lambda1) (cos lambda1))))))) (* 1/2 (- (* -1 (/ (pow (sin lambda1) 2) (pow (cos lambda1) 2))) 1)))) (/ (sin lambda1) (cos lambda1)))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* lambda2 (- (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (/ (pow (cos phi1) 6) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (/ (* (pow (cos lambda1) 6) (pow (cos phi2) 6)) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (* lambda2 (- (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (+ (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (- (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))) (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (/ (pow (cos phi1) 6) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (/ (* (pow (cos lambda1) 6) (pow (cos phi2) 6)) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (* lambda2 (- (+ (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (* lambda2 (- (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (+ (* -1/2 (pow (cos lambda1) 3)) (+ (* 2 (* (cos lambda1) (pow (sin lambda1) 2))) (* (cos lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* 2 (* (pow (cos lambda1) 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 phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (+ (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (- (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (- (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (+ (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (- (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))))) (+ (* 1/6 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))))) (+ (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (- (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))) (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (/ (pow (cos phi1) 6) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (/ (* (pow (cos lambda1) 6) (pow (cos phi2) 6)) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) #s(hole binary64 (/ (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6))) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) #s(hole binary64 (- (+ (* lambda2 (- (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))))) (/ (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2)))) (/ (pow (cos phi1) 6) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))))) (/ (* (pow (cos lambda1) 6) (pow (cos phi2) 6)) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))))) (* lambda2 (- (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))))) (+ (/ (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))))) (/ (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2)))) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))) (/ (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2)))))) (/ (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2)))) (/ (pow (cos phi1) 6) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))))) (/ (* (pow (cos lambda1) 6) (pow (cos phi2) 6)) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))))) (* lambda2 (- (+ (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))))) (* lambda2 (- (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (+ (* -1/2 (pow (cos lambda1) 3)) (+ (* 2 (* (cos lambda1) (pow (sin lambda1) 2))) (* (cos lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* 2 (* (pow (cos lambda1) 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 phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))))) (+ (/ (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))))) (+ (/ (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))))) (/ (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2)))) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))) (/ (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2))))) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))) (+ (/ (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2)) (/ (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))))) (/ (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2)))) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))))))))) (+ (/ (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))))) (/ (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2)))) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))) (/ (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2)))))) (/ (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2)))) (/ (pow (cos phi1) 6) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))))) (/ (* (pow (cos lambda1) 6) (pow (cos phi2) 6)) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) #s(hole binary64 (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) #s(hole binary64 (- (+ (* -2 (* lambda2 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))))) (pow (cos phi1) 6)) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) #s(hole binary64 (- (+ (* lambda2 (- (* -1 (* lambda2 (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))))) (* 2 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))))) (pow (cos phi1) 6)) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) #s(hole binary64 (- (+ (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (* (pow (cos phi2) 6) (+ (* 2 (* (+ (* -1/2 (pow (cos lambda1) 3)) (+ (* 2 (* (cos lambda1) (pow (sin lambda1) 2))) (* (cos lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* 2 (* (pow (cos lambda1) 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) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))))) (* 2 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))))) (pow (cos phi1) 6)) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))))
#s(approx (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) #s(hole binary64 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))
#s(approx (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) #s(hole binary64 (+ (* 2 (* lambda2 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))))) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))))
#s(approx (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) #s(hole binary64 (+ (* lambda2 (+ (* 2 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* lambda2 (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))))) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))))
#s(approx (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) #s(hole binary64 (+ (* lambda2 (+ (* 2 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* lambda2 (+ (* lambda2 (* (pow (cos phi2) 6) (+ (* 2 (* (+ (* -1/2 (pow (cos lambda1) 3)) (+ (* 2 (* (cos lambda1) (pow (sin lambda1) 2))) (* (cos lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* 2 (* (pow (cos lambda1) 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) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))))))) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) #s(hole binary64 (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) #s(hole binary64 (+ (* lambda2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) #s(hole binary64 (+ (* lambda2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (+ (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))) (* lambda2 (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))))) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) #s(hole binary64 (+ (* lambda2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (+ (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))) (* lambda2 (+ (* lambda2 (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))))))) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (+ (* lambda2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (+ (* lambda2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (+ (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))) (* lambda2 (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))))) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (+ (* lambda2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (+ (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))) (* lambda2 (+ (* lambda2 (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))))))) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* 2 (* lambda2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1)))))) (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* lambda2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* lambda2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))) (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* lambda2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* lambda2 (+ (* lambda2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))) (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (+ (* -1 (pow lambda2 3)) (pow lambda1 3))))
#s(approx (pow lambda2 3) #s(hole binary64 (pow lambda2 3)))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 lambda2) (pow lambda1 2))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) #s(hole binary64 (* lambda2 (+ lambda1 lambda2))))
#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 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 (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/2 (* lambda2 (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))))) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))) (* lambda2 (+ (* -1/2 (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))) (* 1/6 (* lambda2 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))))))) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) #s(hole binary64 (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/2 (* lambda2 (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))) (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* lambda2 (+ (* -1/2 (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* 1/6 (* lambda2 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))))) (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (/ (+ (pow lambda1 3) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 3)) (- (+ (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)) (* lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (- (+ (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)) (* lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) #s(hole binary64 (- (pow lambda1 2) (* lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) #s(hole binary64 (/ (- (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)) (- lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* lambda2 (- (* -1 (/ (+ (* -1 (pow lambda1 2)) (pow lambda1 2)) (pow lambda2 2))) (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* lambda2 (- (/ (* lambda1 (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) (pow lambda2 3)) (+ 1 (+ (* -1 (/ lambda1 lambda2)) (+ (* -1 (/ (pow lambda1 2) (pow lambda2 2))) (/ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 lambda2))
#s(approx (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (* lambda2 (- (+ 1 (+ (* 1/2 (/ (PI) lambda2)) (/ phi2 lambda2))) (/ lambda1 lambda2)))))
#s(approx (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (* -1 lambda2)))
#s(approx (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (* lambda2 (- (+ (* 1/2 (/ (PI) lambda2)) (+ (/ lambda1 lambda2) (/ phi2 lambda2))) 1))))
#s(approx (cos lambda2) #s(hole binary64 (cos lambda2)))
#s(approx (neg (sin lambda2)) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (sin lambda2) #s(hole binary64 (sin lambda2)))
#s(approx (* (cos phi2) (neg (sin lambda2))) #s(hole binary64 (* -1 (* (cos phi2) (sin lambda2)))))
#s(approx (* (cos phi2) (cos lambda2)) #s(hole binary64 (* (cos lambda2) (cos phi2))))
#s(approx (sin (+ lambda2 (/ (PI) 2))) #s(hole binary64 (sin (+ lambda2 (* 1/2 (PI))))))
#s(approx (+ lambda2 (/ (PI) 2)) #s(hole binary64 lambda2))
#s(approx (+ lambda2 (/ (PI) 2)) #s(hole binary64 (* lambda2 (+ 1 (* 1/2 (/ (PI) lambda2))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos lambda2) (cos phi2)))))
#s(approx (* -1/2 (cos lambda2)) #s(hole binary64 (* -1/2 (cos lambda2))))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* lambda2 (- (* -1 (/ (+ (* -1 (pow lambda1 2)) (pow lambda1 2)) (pow lambda2 2))) (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* lambda2 (- (/ (* lambda1 (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) (pow lambda2 3)) (+ 1 (+ (* -1 (/ lambda1 lambda2)) (+ (* -1 (/ (pow lambda1 2) (pow lambda2 2))) (/ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (- (* -1 (/ (+ (* -1 (pow lambda1 2)) (pow lambda1 2)) (pow lambda2 2))) (+ 1 (* -1 (/ lambda1 lambda2))))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (- (/ (* lambda1 (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) (pow lambda2 3)) (+ 1 (+ (* -1 (/ lambda1 lambda2)) (+ (* -1 (/ (pow lambda1 2) (pow lambda2 2))) (/ (pow lambda1 2) (pow lambda2 2))))))))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) #s(hole binary64 (+ 1 (+ (/ lambda1 lambda2) (/ (pow lambda1 2) (pow lambda2 2))))))
#s(approx (* lambda2 (- (/ lambda1 lambda2) 1)) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1))))
#s(approx (+ (cos lambda2) (cos phi1)) #s(hole binary64 (+ (cos lambda2) (cos phi1))))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) #s(hole binary64 (* -1 lambda2)))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) #s(hole binary64 (* lambda2 (- (+ (* 1/2 (/ (PI) lambda2)) (/ lambda1 lambda2)) 1))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (* (cos lambda2) (cos phi2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (* (cos lambda2) (cos phi2)) (* (cos (* 1/2 (PI))) (sin phi1)))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (* (pow lambda2 3) (- (/ (pow lambda1 3) (pow lambda2 3)) 1))))
#s(approx (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) #s(hole binary64 (* (pow lambda2 3) (- (/ (pow lambda1 3) (pow lambda2 3)) 1))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (* (pow lambda2 2) (+ 1 (/ lambda1 lambda2)))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (* (pow lambda2 2) (+ 1 (+ (/ lambda1 lambda2) (/ (pow lambda1 2) (pow lambda2 2)))))))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) #s(hole binary64 (* (pow lambda2 2) (+ 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))) lambda1) 1) 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))) lambda1) 1) #s(hole binary64 (+ 1 (/ (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) lambda1))))
#s(approx (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1) #s(hole binary64 (/ (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) lambda1)))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (* (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 (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) #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))) #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 (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos phi1) (cos (+ lambda1 (* -1 lambda2))))))
#s(approx (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) lambda1) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))) lambda1)))))
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) #s(hole binary64 (+ 1 (/ (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))) lambda1))))
#s(approx (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) #s(hole binary64 (/ (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))) lambda1)))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (cos (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ (- (+ (* -1 (/ (pow lambda1 2) lambda2)) (/ (pow lambda1 2) lambda2)) (* -1 lambda1)) lambda2)))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ (- (* -1 (/ (- (/ (* lambda1 (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) lambda2) (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) lambda2)) (* -1 lambda1)) lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (+ lambda1 (* -1 lambda2))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (cos (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI))))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* 1/2 (+ (sin (+ lambda1 (+ phi2 (+ (* -1 lambda2) (* 1/2 (PI)))))) (sin (- (+ phi2 (* 1/2 (PI))) (+ lambda1 (* -1 lambda2)))))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* 1/2 (+ (sin (+ lambda1 (+ phi2 (+ (* -1 lambda2) (* 1/2 (PI)))))) (sin (- (+ phi2 (* 1/2 (PI))) (+ lambda1 (* -1 lambda2))))))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (cos phi1) (* 1/2 (+ (sin (+ lambda1 (+ phi2 (+ (* -1 lambda2) (* 1/2 (PI)))))) (sin (- (+ phi2 (* 1/2 (PI))) (+ lambda1 (* -1 lambda2)))))))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) #s(hole binary64 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (+ (* -1 lambda2) (* 1/2 (PI)))))) (sin (- (+ phi2 (* 1/2 (PI))) (+ lambda1 (* -1 lambda2))))))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (+ lambda1 (+ phi2 (+ (* -1 lambda2) (* 1/2 (PI)))))) (sin (- (+ phi2 (* 1/2 (PI))) (+ lambda1 (* -1 lambda2)))))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (sin (- (+ phi2 (* 1/2 (PI))) (+ lambda1 (* -1 lambda2))))))
#s(approx (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (* -1 (* lambda2 (- (* -1 (/ (- (+ phi2 (* 1/2 (PI))) lambda1) lambda2)) 1)))))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (sin (+ lambda1 (+ phi2 (+ (* -1 lambda2) (* 1/2 (PI))))))))
#s(approx (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2)))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (+ lambda1 (* -1 lambda2))) (* -1/2 (* (pow phi2 2) (sin (+ 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 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (- (* lambda1 (sin (- (* 1/2 (PI)) (* -1 lambda2)))) (sin lambda2))))
#s(approx (sin (+ lambda2 (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (* -1 lambda2)))))
#s(approx (+ lambda2 (/ (PI) 2)) #s(hole binary64 (* -1 (* lambda2 (- (* -1/2 (/ (PI) lambda2)) 1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (sin (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ (+ lambda1 (* -1 (/ (+ (* -1 (pow lambda1 2)) (pow lambda1 2)) lambda2))) lambda2)))))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ (+ lambda1 (* -1 (/ (+ (* -1 (/ (* lambda1 (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) lambda2)) (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) lambda2))) lambda2)))))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (- (* -1 (/ (- (+ (* -1 (/ (pow lambda1 2) lambda2)) (/ (pow lambda1 2) lambda2)) lambda1) lambda2)) 1)))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (- (* -1 (/ (- (* -1 (/ (- (/ (* lambda1 (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) lambda2) (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) lambda2)) lambda1) lambda2)) 1)))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) #s(hole binary64 (+ 1 (* -1 (/ (+ (* -1 lambda1) (* -1 (/ (pow lambda1 2) lambda2))) lambda2)))))
#s(approx (* lambda2 (- (/ lambda1 lambda2) 1)) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (cos (+ lambda1 (* -1 lambda2))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (cos (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (sin (+ lambda1 (+ (* -1 lambda2) (* 1/2 (PI)))))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) #s(hole binary64 (sin (+ lambda1 (+ (* -1 lambda2) (* 1/2 (PI)))))))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ (+ lambda1 (* 1/2 (PI))) lambda2)))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (* (cos (+ lambda1 (* -1 lambda2))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (* (cos (+ lambda1 (* -1 lambda2))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos (+ lambda1 (* -1 lambda2))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (/ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (/ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (/ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (/ (- 1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- 1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (- (pow (cos phi1) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (- (cos phi1) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (pow (cos phi1) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))))
#s(approx (pow (cos (- lambda1 lambda2)) 2) #s(hole binary64 (pow (cos (+ lambda1 (* -1 lambda2))) 2)))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (cos phi1) (cos (+ lambda1 (* -1 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (/ (+ 1 (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 3))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) #s(hole binary64 (+ 1 (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 3)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3) #s(hole binary64 (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 3))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (/ (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (/ (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))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (/ (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (/ (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (/ (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (/ (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (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 (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 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 (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) #s(hole binary64 (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 3))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (+ lambda1 (* -1 lambda2))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (+ (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (+ (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (- (cos phi1) (* (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 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (pow (cos (+ lambda1 (* -1 lambda2))) 2) (- (cos phi1) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) #s(hole binary64 (+ (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 3)) (pow (cos phi1) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 3)) (pow (cos phi1) 3))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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))) (- (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 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* (pow (cos phi2) 2) (* (pow (cos (+ lambda1 (* -1 lambda2))) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) 2))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* (pow (cos phi2) 2) (* (pow (cos (+ lambda1 (* -1 lambda2))) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) 2)))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* (pow (cos phi2) 2) (* (pow (cos (+ lambda1 (* -1 lambda2))) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) 2))))
#s(approx (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (* (pow (cos (+ lambda1 (* -1 lambda2))) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (pow (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) 2)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #s(hole binary64 (- (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (* 2 (log (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (log (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (+ lambda1 (* -1 lambda2))) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (+ lambda1 (* -1 lambda2))) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (+ lambda1 (* -1 lambda2))) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) #s(hole binary64 (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (+ lambda1 (* -1 lambda2))) 6))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)) (pow (cos phi1) 4))))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) #s(hole binary64 (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (+ lambda1 (* -1 lambda2))) 6)))))
#s(approx (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) #s(hole binary64 (* (pow (cos phi2) 6) (pow (cos (+ lambda1 (* -1 lambda2))) 6))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) #s(hole binary64 (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)) (pow (cos phi1) 4)))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (* -1 (* (pow lambda2 3) (+ 1 (* -1 (/ (pow lambda1 3) (pow lambda2 3))))))))
#s(approx (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) #s(hole binary64 (* -1 (* (pow lambda2 3) (+ 1 (* -1 (/ (pow lambda1 3) (pow lambda2 3))))))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (* (pow lambda2 2) (+ 1 (* -1 (/ (+ (* -1 lambda1) (* -1 (/ (pow lambda1 2) lambda2))) lambda2))))))
#s(approx (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (sin (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (sin (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (* (sin (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (sin (+ lambda1 (* -1 lambda2))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (sin (+ lambda1 (* -1 lambda2))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) #s(hole binary64 (* (sin (+ lambda1 (* -1 lambda2))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (/ (+ (pow lambda1 3) (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 3)) (- (+ (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 2)) (* lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) #s(hole binary64 (+ (pow lambda1 3) (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 3))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 3)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (- (+ (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 2)) (* lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 2)))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) #s(hole binary64 (- (pow lambda1 2) (* 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))) lambda1) #s(hole binary64 (* lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) #s(hole binary64 (/ (- (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 2)) (- lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) #s(hole binary64 (- (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 2))))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) #s(hole binary64 (- lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) lambda1))))))
#s(approx (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) #s(hole binary64 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) lambda1)))))
#s(approx (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) #s(hole binary64 (* -1 (/ (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) lambda1))))
#s(approx (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) #s(hole binary64 (/ (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) lambda1)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #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 (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (cos (- lambda1 lambda2)))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (* -1/2 (pow phi1 2))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (* (cos phi2) (cos (- lambda1 lambda2)))))
#s(approx (* phi1 phi1) #s(hole binary64 (pow phi1 2)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ 1 (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ 1 (+ (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ 1 (+ (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ 1 (* 1/2 (+ (sin (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2)) (sin (- (+ lambda2 (+ phi2 (* 1/2 (PI)))) lambda1)))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* 1/2 (+ (sin (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2)) (sin (- (+ lambda2 (+ phi2 (* 1/2 (PI)))) lambda1))))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ 1 (+ (* 1/2 (+ (sin (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2)) (sin (- (+ lambda2 (+ phi2 (* 1/2 (PI)))) lambda1)))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ 1 (+ (* 1/2 (+ (sin (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2)) (sin (- (+ lambda2 (+ phi2 (* 1/2 (PI)))) lambda1)))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (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)))))))
#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 lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (* (cos lambda2) (cos phi2)))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos lambda2) (cos phi2))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos lambda2) (cos phi2)) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos lambda2) (cos phi2)) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (* (cos lambda1) (cos phi2)))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos lambda2) (cos phi1)) #s(hole binary64 (+ 1 (cos lambda2))))
#s(approx (+ (cos lambda2) (cos phi1)) #s(hole binary64 (+ 1 (+ (cos lambda2) (* -1/2 (pow phi1 2))))))
#s(approx (+ (cos lambda2) (cos phi1)) #s(hole binary64 (+ 1 (+ (cos lambda2) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos lambda2) (cos phi1)) #s(hole binary64 (+ 1 (+ (cos lambda2) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos phi1) (cos phi2)) #s(hole binary64 (+ 1 (cos phi2))))
#s(approx (+ (cos phi1) (cos phi2)) #s(hole binary64 (+ 1 (+ (cos phi2) (* -1/2 (pow phi1 2))))))
#s(approx (+ (cos phi1) (cos phi2)) #s(hole binary64 (+ 1 (+ (cos phi2) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (cos phi2)) #s(hole binary64 (+ 1 (+ (cos phi2) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))
#s(approx (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (sin (* 1/2 (PI))) (* phi1 (cos (* 1/2 (PI))))))))
#s(approx (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (sin (* 1/2 (PI))) (* phi1 (+ (cos (* 1/2 (PI))) (* -1/2 (* phi1 (sin (* 1/2 (PI)))))))))))
#s(approx (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (sin (* 1/2 (PI))) (* phi1 (+ (cos (* 1/2 (PI))) (* phi1 (+ (* -1/2 (sin (* 1/2 (PI)))) (* -1/6 (* phi1 (cos (* 1/2 (PI)))))))))))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi1 (cos (* 1/2 (PI)))))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi1 (+ (cos (* 1/2 (PI))) (* -1/2 (* phi1 (sin (* 1/2 (PI))))))))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi1 (+ (cos (* 1/2 (PI))) (* phi1 (+ (* -1/2 (sin (* 1/2 (PI)))) (* -1/6 (* phi1 (cos (* 1/2 (PI))))))))))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi1)) #s(hole binary64 (* phi1 (cos (* 1/2 (PI))))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi1)) #s(hole binary64 (* phi1 (+ (cos (* 1/2 (PI))) (* -1/6 (* (pow phi1 2) (cos (* 1/2 (PI)))))))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi1)) #s(hole binary64 (* phi1 (+ (cos (* 1/2 (PI))) (* (pow phi1 2) (+ (* -1/6 (cos (* 1/2 (PI)))) (* 1/120 (* (pow phi1 2) (cos (* 1/2 (PI)))))))))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi1)) #s(hole binary64 (* phi1 (+ (cos (* 1/2 (PI))) (* (pow phi1 2) (+ (* -1/6 (cos (* 1/2 (PI)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (cos (* 1/2 (PI))))) (* 1/120 (cos (* 1/2 (PI))))))))))))
#s(approx (sin phi1) #s(hole binary64 phi1))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* -1/6 (pow phi1 2))))))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* (pow phi1 2) (- (* 1/120 (pow phi1 2)) 1/6))))))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/120 (* -1/5040 (pow phi1 2)))) 1/6))))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* (cos lambda2) (cos phi2)))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (+ (* phi1 (cos (* 1/2 (PI)))) (* (cos lambda2) (cos phi2))))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (+ (* phi1 (+ (cos (* 1/2 (PI))) (* -1/2 (* phi1 (sin (* 1/2 (PI))))))) (* (cos lambda2) (cos phi2))))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (+ (* phi1 (+ (cos (* 1/2 (PI))) (* phi1 (+ (* -1/2 (sin (* 1/2 (PI)))) (* -1/6 (* phi1 (cos (* 1/2 (PI))))))))) (* (cos lambda2) (cos phi2))))))
#s(approx (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (* (cos lambda2) (cos phi2))))
#s(approx (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (* phi1 (cos (* 1/2 (PI)))) (* (cos lambda2) (cos phi2)))))
#s(approx (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (* phi1 (+ (cos (* 1/2 (PI))) (* -1/6 (* (pow phi1 2) (cos (* 1/2 (PI))))))) (* (cos lambda2) (cos phi2)))))
#s(approx (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (* phi1 (+ (cos (* 1/2 (PI))) (* (pow phi1 2) (+ (* -1/6 (cos (* 1/2 (PI)))) (* 1/120 (* (pow phi1 2) (cos (* 1/2 (PI))))))))) (* (cos lambda2) (cos phi2)))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (/ 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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 1/2 (/ 1 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* (pow phi1 2) (- (+ (* -1/4 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 1/24 (/ 1 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* (pow phi1 2) (- (+ (* -1/4 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* (pow phi1 2) (- (+ (* -1/720 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/720 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/48 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (* 1/2 (/ (+ (* -1/4 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))) (+ (* -1/2 (/ (- (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 1/24 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* 1/24 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 2/45 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 1/24 (/ 1 (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 (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (- 1 (cos (- lambda1 lambda2))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* -1/2 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2))))))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* 1/3 (/ 1 (- 1 (cos (- lambda1 lambda2))))) (+ (* 1/24 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (+ (* -1/2 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (- 1 (cos (- lambda1 lambda2)))))))) (+ (* -1/2 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2))))))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* -1 (* (pow phi1 2) (+ (* -1/2 (/ (- (* 1/3 (/ 1 (- 1 (cos (- lambda1 lambda2))))) (+ (* 1/24 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (+ (* -1/2 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (- 1 (cos (- lambda1 lambda2))))))) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (/ (+ (* -1/2 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/720 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* 2/45 (/ 1 (- 1 (cos (- lambda1 lambda2)))))))))) (* 1/3 (/ 1 (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/24 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (+ (* -1/2 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (- 1 (cos (- lambda1 lambda2)))))))) (+ (* -1/2 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2))))))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- 1 (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ 1 (* -1 (pow phi1 2))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1))) (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))) #s(hole binary64 (- 1 (cos (- lambda1 lambda2)))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ 1 (* -1/2 (pow phi1 2))) (cos (- lambda1 lambda2)))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))) (cos (- lambda1 lambda2)))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))) (cos (- lambda1 lambda2)))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (+ (* phi1 (cos (* 1/2 (PI)))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (+ (* phi1 (+ (cos (* 1/2 (PI))) (* -1/2 (* phi1 (sin (* 1/2 (PI))))))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (+ (* phi1 (+ (cos (* 1/2 (PI))) (* phi1 (+ (* -1/2 (sin (* 1/2 (PI)))) (* -1/6 (* phi1 (cos (* 1/2 (PI))))))))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi1 (cos (* 1/2 (PI)))))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi1 (+ (cos (* 1/2 (PI))) (* -1/2 (* phi1 (sin (* 1/2 (PI))))))))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi1 (+ (cos (* 1/2 (PI))) (* phi1 (+ (* -1/2 (sin (* 1/2 (PI)))) (* -1/6 (* phi1 (cos (* 1/2 (PI))))))))))))
#s(approx (+ 1 (* -1/2 (* phi1 phi1))) #s(hole binary64 1))
#s(approx (+ 1 (* -1/2 (* phi1 phi1))) #s(hole binary64 (+ 1 (* -1/2 (pow phi1 2)))))
#s(approx (* -1/2 (* phi1 phi1)) #s(hole binary64 (* -1/2 (pow phi1 2))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (/ 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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (+ (* -1 (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 1 (* -1/2 (* (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))))) (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* 1/24 (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 7/8 (/ 1 (- (+ 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) (pow (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* 1/3 (/ 1 (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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))))) (/ (* (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) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 1 (* -1/2 (* (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))))) (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* -1 (* (pow phi1 2) (+ (* -1 (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (- (+ (* 1/24 (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 7/8 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2))))))) (+ (* 1/3 (/ 1 (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (* (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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)))))) (+ (* -1 (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 2/45 (* -1/720 (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* -1 (/ (+ 2/45 (* -1/720 (* (cos phi2) (cos (- lambda1 lambda2))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 61/240 (/ 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 (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (pow (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (/ (* (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))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (- 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)))) 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))) (* 7/8 (/ 1 (- (+ 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) (pow (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* 1/3 (/ 1 (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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))))) (/ (* (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) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 1 (* -1/2 (* (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))))) (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* 1/24 (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 7/8 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2))))))) (+ (* 1/3 (/ 1 (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* -1 (* (pow phi1 2) (+ (* -1 (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (- (+ (* 1/24 (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 7/8 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2))))))) (+ (* 1/3 (/ 1 (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (* (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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)))))) (+ (* -1 (/ (+ 2/45 (* -1/720 (* (cos phi2) (cos (- lambda1 lambda2))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 61/240 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2))))))))))) (+ (* 1/24 (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 7/8 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))))))) (+ (* 1/3 (/ 1 (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (* (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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (/ (* (pow phi1 2) (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (/ (* (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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* (pow phi1 2) (- (* -1 (* (pow phi1 2) (+ (* -1 (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (pow (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (/ (* (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) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (/ (* (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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* -1 (* (pow phi1 2) (+ (* -1 (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 2/45 (* -1/720 (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1 (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (pow (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (/ (* (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))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (- 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)))) 3)))))) (+ (* -1 (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (pow (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (/ (* (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) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (/ (* (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 phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* 1/2 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (* -1/24 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* -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 (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* 1/720 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/24 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (cos phi1) (* (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 (+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #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) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* phi1 (cos (* 1/2 (PI)))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* phi1 (+ (cos (* 1/2 (PI))) (* -1/2 phi1))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* phi1 (+ (cos (* 1/2 (PI))) (* phi1 (- (* -1/6 (* phi1 (cos (* 1/2 (PI))))) 1/2)))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) #s(hole binary64 1))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) #s(hole binary64 (+ 1 (* phi1 (cos (* 1/2 (PI)))))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) #s(hole binary64 (+ 1 (* phi1 (+ (cos (* 1/2 (PI))) (* -1/2 phi1))))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) #s(hole binary64 (+ 1 (* phi1 (+ (cos (* 1/2 (PI))) (* phi1 (- (* -1/6 (* phi1 (cos (* 1/2 (PI))))) 1/2)))))))
#s(approx (* (cos phi1) 1) #s(hole binary64 1))
#s(approx (* (cos phi1) 1) #s(hole binary64 (+ 1 (* -1/2 (pow phi1 2)))))
#s(approx (* (cos phi1) 1) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))))
#s(approx (* (cos phi1) 1) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi1 2) (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi1 2) (- (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* (pow phi1 2) (- (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 1/24 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi1 2) (- (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* (pow phi1 2) (- (+ (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* (pow phi1 2) (- (* 1/720 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* -1/2 (/ (- (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 1/24 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* 1/24 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 2/45 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 1/24 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi1 2) (- (* -1 (* (pow phi1 2) (+ (* -1/4 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* -1 (* (pow phi1 2) (+ (* -1/720 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/48 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (* 1/2 (/ (+ (* -1/4 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))) (+ (* -1/4 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#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 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow phi1 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (pow phi1 2) (- (* -1 (* (pow phi1 2) (+ (* -1/4 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 3))) (* 1/24 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (* -1/2 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* -1 (* (pow phi1 2) (+ (* -1/720 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (+ (* 1/48 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 3))) (* 1/2 (/ (+ (* -1/4 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 3))) (* 1/24 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (- 1 (cos (- lambda1 lambda2))))))))) (+ (* -1/4 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 3))) (* 1/24 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (* -1/2 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) #s(hole binary64 (+ 1 (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) #s(hole binary64 (+ 1 (+ (* -3/2 (pow phi1 2)) (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (exp (* (log (cos phi1)) 3)) #s(hole binary64 1))
#s(approx (exp (* (log (cos phi1)) 3)) #s(hole binary64 (+ 1 (* -3/2 (pow phi1 2)))))
#s(approx (exp (* (log (cos phi1)) 3)) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* 7/8 (pow phi1 2)) 3/2)))))
#s(approx (exp (* (log (cos phi1)) 3)) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 7/8 (* -61/240 (pow phi1 2)))) 3/2)))))
#s(approx (* (log (cos phi1)) 3) #s(hole binary64 (* -3/2 (pow phi1 2))))
#s(approx (* (log (cos phi1)) 3) #s(hole binary64 (* (pow phi1 2) (- (* -1/4 (pow phi1 2)) 3/2))))
#s(approx (* (log (cos phi1)) 3) #s(hole binary64 (* (pow phi1 2) (- (* (pow phi1 2) (- (* -1/15 (pow phi1 2)) 1/4)) 3/2))))
#s(approx (* (log (cos phi1)) 3) #s(hole binary64 (* (pow phi1 2) (- (* (pow phi1 2) (- (* (pow phi1 2) (- (* -17/840 (pow phi1 2)) 1/15)) 1/4)) 3/2))))
#s(approx (log (cos phi1)) #s(hole binary64 (* -1/2 (pow phi1 2))))
#s(approx (log (cos phi1)) #s(hole binary64 (* (pow phi1 2) (- (* -1/12 (pow phi1 2)) 1/2))))
#s(approx (log (cos phi1)) #s(hole binary64 (* (pow phi1 2) (- (* (pow phi1 2) (- (* -1/45 (pow phi1 2)) 1/12)) 1/2))))
#s(approx (log (cos phi1)) #s(hole binary64 (* (pow phi1 2) (- (* (pow phi1 2) (- (* (pow phi1 2) (- (* -17/2520 (pow phi1 2)) 1/45)) 1/12)) 1/2))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ 1 (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ 1 (+ (* -3/2 (pow phi1 2)) (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ 1 (+ (* (pow phi1 2) (- (* 7/8 (pow phi1 2)) 3/2)) (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ 1 (+ (* (pow phi1 2) (- (* (pow phi1 2) (+ 7/8 (* -61/240 (pow phi1 2)))) 3/2)) (* (pow (cos phi2) 3) (pow (cos (- 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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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))) (- (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* -1 (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))) (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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 (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 4))) (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 11/24 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (/ (* (+ 1/4 (* 1/12 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 4))))))))) (+ (* -1 (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))) (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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 (/ (* (+ 1/4 (* 1/12 (- 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)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* -1 (/ (- (* 1/3 (/ 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)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 4))) (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 11/24 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (/ (* (+ 1/4 (* 1/12 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 4)))))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* -1/720 (/ (* (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)))))) (+ (* 151/720 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ (* (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (- (* -1/360 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) 1/24)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 4))))))))) (* 1/3 (/ 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)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 4))) (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 11/24 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (/ (* (+ 1/4 (* 1/12 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 4))))))))) (+ (* -1 (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))) (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- 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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (* -1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ 1/2 (* -1/2 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))))))) (+ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (+ (* -1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow phi1 2) (- (+ 13/24 (* 1/3 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 1/24 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))) (+ 1/2 (* -1/2 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))))))) (+ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (+ (* -1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow phi1 2) (- (+ 13/24 (+ (* 1/3 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow phi1 2) (- (* -2/45 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ 151/720 (* -1/720 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))))) (* 1/24 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))) (+ 1/2 (* -1/2 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))))))) (+ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (* -1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) 1/2))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (+ (* -1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow phi1 2) (+ 13/24 (* 1/3 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) 1/2))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (+ (* -1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow phi1 2) (+ 13/24 (+ (* 1/3 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow phi1 2) (- (* -2/45 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) 151/720)))))) 1/2))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* -1/2 (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* (pow phi1 2) (+ (* -1/2 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 1/24 (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* (pow phi1 2) (+ (* -1/2 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (* 1/24 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))))))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi1 2) (+ (* -1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow phi1 2) (+ 1/4 (* 1/12 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi1 2) (+ (* -1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow phi1 2) (+ 1/4 (+ (* 1/12 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow phi1 2) (- (* -1/360 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) 1/24))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (+ 1 (* -1 (pow phi1 2))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #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 (+ 1/2 (* 1/2 (cos (* 2 phi1)))) #s(hole binary64 1))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 phi1)))) #s(hole binary64 (+ 1 (* -1 (pow phi1 2)))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 phi1)))) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 phi1)))) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))))
#s(approx (* 1/2 (cos (* 2 phi1))) #s(hole binary64 1/2))
#s(approx (* 1/2 (cos (* 2 phi1))) #s(hole binary64 (+ 1/2 (* -1 (pow phi1 2)))))
#s(approx (* 1/2 (cos (* 2 phi1))) #s(hole binary64 (+ 1/2 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)))))
#s(approx (* 1/2 (cos (* 2 phi1))) #s(hole binary64 (+ 1/2 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))))
#s(approx (cos (* 2 phi1)) #s(hole binary64 1))
#s(approx (cos (* 2 phi1)) #s(hole binary64 (+ 1 (* -2 (pow phi1 2)))))
#s(approx (cos (* 2 phi1)) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* 2/3 (pow phi1 2)) 2)))))
#s(approx (cos (* 2 phi1)) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/3 (* -4/45 (pow phi1 2)))) 2)))))
#s(approx (* 2 phi1) #s(hole binary64 (* 2 phi1)))
#s(approx (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #s(hole binary64 (- 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #s(hole binary64 (- (+ 1 (* -1 (pow phi1 2))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #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 (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* 4 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (+ (* -1 (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (+ (* 1/24 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ 5/3 (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* -1 (* (pow phi1 2) (+ (* -1 (/ (* (+ (* -1/2 (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (+ (* 1/24 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ 5/3 (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (+ (* 47/15 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- (* 4 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (+ (* -1 (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (+ (* 1/24 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ 5/3 (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (/ (* (+ (* -1/2 (+ 5/3 (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))))) (+ (* -1/720 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/24 (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -2/45 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 34/45))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))))) (* 4 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (+ (* -1 (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (+ (* 1/24 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ 5/3 (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) #s(hole binary64 (/ (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))) (/ (* (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2))))) (/ 1 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* 4 (/ 1 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))) (+ (* -1 (/ (* (+ (* 3 (/ 1 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))) (/ (* (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))) (/ (* (+ 5/3 (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2))))) (+ (* 3 (/ 1 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))) (/ (* (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2))))) (/ 1 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* -1 (* (pow phi1 2) (+ (* -1 (/ (* (+ 5/3 (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 3 (/ 1 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))) (/ (* (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2)))) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))) (+ (* 47/15 (/ 1 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))) (+ (/ (* (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (- (* -2/45 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 34/45)) (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2)) (/ (* (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) (- (* 4 (/ 1 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))) (+ (* -1 (/ (* (+ (* 3 (/ 1 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))) (/ (* (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))) (/ (* (+ 5/3 (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2))))) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))))))) (* 4 (/ 1 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))))) (+ (* -1 (/ (* (+ (* 3 (/ 1 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))) (/ (* (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))) (/ (* (+ 5/3 (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2))))) (+ (* 3 (/ 1 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))) (/ (* (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2))))) (/ 1 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) #s(hole binary64 (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) #s(hole binary64 (- (+ 1 (* -3 (pow phi1 2))) (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (* 4 (pow phi1 2)) 3))) (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 4 (* -47/15 (pow phi1 2)))) 3))) (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))))
#s(approx (pow (pow (cos phi1) 2) 3) #s(hole binary64 1))
#s(approx (pow (pow (cos phi1) 2) 3) #s(hole binary64 (+ 1 (* -3 (pow phi1 2)))))
#s(approx (pow (pow (cos phi1) 2) 3) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* 4 (pow phi1 2)) 3)))))
#s(approx (pow (pow (cos phi1) 2) 3) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 4 (* -47/15 (pow phi1 2)))) 3)))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) #s(hole binary64 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) #s(hole binary64 (+ 1 (+ (* (pow phi1 2) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) #s(hole binary64 (+ 1 (+ (* (pow phi1 2) (- (+ (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (pow phi1 2) (+ 5/3 (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))) 2)) (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) #s(hole binary64 (+ 1 (+ (* (pow phi1 2) (- (+ (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (pow phi1 2) (+ 5/3 (+ (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (pow phi1 2) (- (* -2/45 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 34/45)))))) 2)) (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (+ (* (pow phi1 2) (+ (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 1/3 (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))) (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (+ (* (pow phi1 2) (+ (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (pow phi1 2) (+ (* -2/45 (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))))))) (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* (pow phi1 2) (+ (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 1/3 (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* (pow phi1 2) (+ (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (pow phi1 2) (+ (* -2/45 (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))))))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (cos phi1) #s(hole binary64 (cos phi1)))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (* -1/2 (pow phi1 2))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (* (pow phi1 2) (- (+ (/ 1 (pow phi1 2)) (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow phi1 2))) 1/2))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (* -1/2 (pow phi1 2))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (* (pow phi1 2) (- (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow phi1 2)) 1/2))))
#s(approx (+ (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi1) (cos phi2))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi1)) #s(hole binary64 (* (cos (* 1/2 (PI))) (sin phi1))))
#s(approx (sin phi1) #s(hole binary64 (sin phi1)))
#s(approx (pow (cos phi1) 2) #s(hole binary64 (pow (cos phi1) 2)))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))
#s(approx (+ 1 (* -1/2 (* phi1 phi1))) #s(hole binary64 (* -1/2 (pow phi1 2))))
#s(approx (+ 1 (* -1/2 (* phi1 phi1))) #s(hole binary64 (* (pow phi1 2) (- (/ 1 (pow phi1 2)) 1/2))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) #s(hole binary64 (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))
#s(approx (* (cos phi1) 1) #s(hole binary64 (cos phi1)))
#s(approx (exp (* (log (cos phi1)) 3)) #s(hole binary64 (pow (cos phi1) 3)))
#s(approx (* (log (cos phi1)) 3) #s(hole binary64 (* 3 (log (cos phi1)))))
#s(approx (log (cos phi1)) #s(hole binary64 (log (cos phi1))))
#s(approx (pow (cos phi1) 3) #s(hole binary64 (pow (cos phi1) 3)))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 phi1)))) #s(hole binary64 (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
#s(approx (* 1/2 (cos (* 2 phi1))) #s(hole binary64 (* 1/2 (cos (* 2 phi1)))))
#s(approx (cos (* 2 phi1)) #s(hole binary64 (cos (* 2 phi1))))
#s(approx (pow (pow (cos phi1) 2) 3) #s(hole binary64 (pow (cos phi1) 6)))
#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 (* (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 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (cos (- lambda1 lambda2)))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* -1/2 (* (pow phi2 2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* (pow phi2 2) (+ (* -1/2 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* 1/24 (* (pow phi2 2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* (pow phi2 2) (+ (* -1/2 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (* 1/24 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (* -1/2 (pow phi1 2))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (+ (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* -1/2 (pow phi1 2)))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (+ (* -1/2 (pow phi1 2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2)))))))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (+ (* -1/2 (pow phi1 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 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (* -1/2 (pow phi1 2)))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* -1/2 (pow phi1 2))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (* -1/2 (pow phi1 2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (* -1/2 (pow phi1 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 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#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 (+ 1 (* -1/2 (* phi2 phi2))) #s(hole binary64 1))
#s(approx (+ 1 (* -1/2 (* phi2 phi2))) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (* -1/2 (* phi2 phi2)) #s(hole binary64 (* -1/2 (pow phi2 2))))
#s(approx (* phi2 phi2) #s(hole binary64 (pow phi2 2)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (+ (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* -1/2 (* (pow phi2 2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (+ (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* (pow phi2 2) (+ (* -1/2 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* 1/24 (* (pow phi2 2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (+ (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* (pow phi2 2) (+ (* -1/2 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (* 1/24 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* -1/2 (* (pow phi2 2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* (pow phi2 2) (+ (* -1/2 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* 1/24 (* (pow phi2 2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* (pow phi2 2) (+ (* -1/2 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (* 1/24 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (sin (+ phi2 (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ phi2 (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi2 (cos (* 1/2 (PI)))))))
#s(approx (sin (+ phi2 (/ (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 (/ (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 (+ phi2 (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ phi2 (/ (PI) 2)) #s(hole binary64 (+ phi2 (* 1/2 (PI)))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (cos phi1) (* 1/2 (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (cos phi1) (+ (* 1/2 (* phi2 (+ (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)) (cos (- (+ lambda2 (* 1/2 (PI))) lambda1))))) (* 1/2 (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (cos phi1) (+ (* 1/2 (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))) (* phi2 (+ (* 1/2 (* phi2 (+ (* -1/2 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* -1/2 (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))))) (* 1/2 (+ (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)) (cos (- (+ lambda2 (* 1/2 (PI))) lambda1))))))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (cos phi1) (+ (* 1/2 (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))) (* phi2 (+ (* 1/2 (+ (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)) (cos (- (+ lambda2 (* 1/2 (PI))) lambda1)))) (* phi2 (+ (* 1/2 (* phi2 (+ (* -1/6 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* -1/6 (cos (- (+ lambda2 (* 1/2 (PI))) lambda1)))))) (* 1/2 (+ (* -1/2 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* -1/2 (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))))))))))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) #s(hole binary64 (* 1/2 (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) #s(hole binary64 (+ (* 1/2 (* phi2 (+ (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)) (cos (- (+ lambda2 (* 1/2 (PI))) lambda1))))) (* 1/2 (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) #s(hole binary64 (+ (* 1/2 (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))) (* phi2 (+ (* 1/2 (* phi2 (+ (* -1/2 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* -1/2 (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))))) (* 1/2 (+ (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)) (cos (- (+ lambda2 (* 1/2 (PI))) lambda1)))))))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) #s(hole binary64 (+ (* 1/2 (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))) (* phi2 (+ (* 1/2 (+ (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)) (cos (- (+ lambda2 (* 1/2 (PI))) lambda1)))) (* phi2 (+ (* 1/2 (* phi2 (+ (* -1/6 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* -1/6 (cos (- (+ lambda2 (* 1/2 (PI))) lambda1)))))) (* 1/2 (+ (* -1/2 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* -1/2 (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))))))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (+ (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)) (* phi2 (+ (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)) (cos (- (+ lambda2 (* 1/2 (PI))) lambda1))))))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (+ (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)) (* phi2 (+ (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)) (+ (cos (- (+ lambda2 (* 1/2 (PI))) lambda1)) (* phi2 (+ (* -1/2 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* -1/2 (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))))))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (+ (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)) (* phi2 (+ (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)) (+ (cos (- (+ lambda2 (* 1/2 (PI))) lambda1)) (* phi2 (+ (* -1/2 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (+ (* -1/2 (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))) (* phi2 (+ (* -1/6 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* -1/6 (cos (- (+ lambda2 (* 1/2 (PI))) lambda1)))))))))))))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)) (* phi2 (cos (- (+ lambda2 (* 1/2 (PI))) lambda1))))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)) (* phi2 (+ (cos (- (+ lambda2 (* 1/2 (PI))) lambda1)) (* -1/2 (* phi2 (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))))))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)) (* phi2 (+ (cos (- (+ lambda2 (* 1/2 (PI))) lambda1)) (* phi2 (+ (* -1/2 (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))) (* -1/6 (* phi2 (cos (- (+ lambda2 (* 1/2 (PI))) lambda1)))))))))))
#s(approx (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (- (+ lambda2 (* 1/2 (PI))) lambda1)))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* phi2 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2))))))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* phi2 (+ (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* -1/2 (* phi2 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))))))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* phi2 (+ (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* phi2 (+ (* -1/2 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* -1/6 (* phi2 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))))))))))
#s(approx (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (- (+ lambda1 (* 1/2 (PI))) lambda2)))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (* (* phi2 phi2) -1/2) #s(hole binary64 (* -1/2 (pow phi2 2))))
#s(approx (+ (* (* phi2 phi2) -1/2) 1) #s(hole binary64 1))
#s(approx (+ (* (* phi2 phi2) -1/2) 1) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (* (* phi2 phi2) (- (pow phi2 -2) 1/2)) #s(hole binary64 1))
#s(approx (* (* phi2 phi2) (- (pow phi2 -2) 1/2)) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (- (pow phi2 -2) 1/2) #s(hole binary64 (/ 1 (pow phi2 2))))
#s(approx (- (pow phi2 -2) 1/2) #s(hole binary64 (/ (+ 1 (* -1/2 (pow phi2 2))) (pow phi2 2))))
#s(approx (pow phi2 -2) #s(hole binary64 (/ 1 (pow phi2 2))))
#s(approx (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) #s(hole binary64 1))
#s(approx (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))))
#s(approx (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2)) #s(hole binary64 (* -1/2 (pow phi2 2))))
#s(approx (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2)) #s(hole binary64 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2))))
#s(approx (- (* 1/24 (* phi2 phi2)) 1/2) #s(hole binary64 -1/2))
#s(approx (- (* 1/24 (* phi2 phi2)) 1/2) #s(hole binary64 (- (* 1/24 (pow phi2 2)) 1/2)))
#s(approx (* 1/24 (* phi2 phi2)) #s(hole binary64 (* 1/24 (pow phi2 2))))
#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 (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (+ (cos lambda2) (+ (* lambda1 (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* -1/2 (* lambda1 (sin lambda2)))))))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (+ (cos lambda2) (+ (* lambda1 (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (+ (* -1/2 (* lambda1 (sin lambda2))) (* (pow phi2 2) (+ (* 1/24 (cos lambda2)) (* 1/24 (* lambda1 (sin lambda2))))))))))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (+ (cos lambda2) (+ (* lambda1 (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (+ (* -1/2 (* lambda1 (sin lambda2))) (* (pow phi2 2) (+ (* 1/24 (cos lambda2)) (+ (* 1/24 (* lambda1 (sin lambda2))) (* (pow phi2 2) (+ (* -1/720 (cos lambda2)) (* -1/720 (* lambda1 (sin lambda2)))))))))))))))
#s(approx (* lambda1 (* (cos phi2) (neg (sin lambda2)))) #s(hole binary64 (* -1 (* lambda1 (sin lambda2)))))
#s(approx (* lambda1 (* (cos phi2) (neg (sin lambda2)))) #s(hole binary64 (+ (* -1 (* lambda1 (sin lambda2))) (* 1/2 (* lambda1 (* (pow phi2 2) (sin lambda2)))))))
#s(approx (* lambda1 (* (cos phi2) (neg (sin lambda2)))) #s(hole binary64 (+ (* -1 (* lambda1 (sin lambda2))) (* (pow phi2 2) (+ (* -1/24 (* lambda1 (* (pow phi2 2) (sin lambda2)))) (* 1/2 (* lambda1 (sin lambda2))))))))
#s(approx (* lambda1 (* (cos phi2) (neg (sin lambda2)))) #s(hole binary64 (+ (* -1 (* lambda1 (sin lambda2))) (* (pow phi2 2) (+ (* 1/2 (* lambda1 (sin lambda2))) (* (pow phi2 2) (+ (* -1/24 (* lambda1 (sin lambda2))) (* 1/720 (* lambda1 (* (pow phi2 2) (sin lambda2)))))))))))
#s(approx (* (cos phi2) (neg (sin lambda2))) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (* (cos phi2) (neg (sin lambda2))) #s(hole binary64 (+ (* -1 (sin lambda2)) (* 1/2 (* (pow phi2 2) (sin lambda2))))))
#s(approx (* (cos phi2) (neg (sin lambda2))) #s(hole binary64 (+ (* -1 (sin lambda2)) (* (pow phi2 2) (+ (* -1/24 (* (pow phi2 2) (sin lambda2))) (* 1/2 (sin lambda2)))))))
#s(approx (* (cos phi2) (neg (sin lambda2))) #s(hole binary64 (+ (* -1 (sin lambda2)) (* (pow phi2 2) (+ (* 1/2 (sin lambda2)) (* (pow phi2 2) (+ (* -1/24 (sin lambda2)) (* 1/720 (* (pow phi2 2) (sin lambda2))))))))))
#s(approx (* (cos phi2) (cos lambda2)) #s(hole binary64 (cos lambda2)))
#s(approx (* (cos phi2) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* -1/2 (* (pow phi2 2) (cos lambda2))))))
#s(approx (* (cos phi2) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* 1/24 (* (pow phi2 2) (cos lambda2))))))))
#s(approx (* (cos phi2) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda2))) (* 1/24 (cos lambda2)))))))))
#s(approx (+ (cos 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* -1/2 (* (pow phi2 2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* (pow phi2 2) (+ (* -1/2 (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* 1/24 (* (pow phi2 2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* (pow phi2 2) (+ (* -1/2 (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (* 1/24 (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda2) (cos phi1))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda2) (+ (cos phi1) (* -1/2 (* (pow phi2 2) (cos lambda2)))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda2) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* 1/24 (* (pow phi2 2) (cos lambda2)))))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda2) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda2))) (* 1/24 (cos lambda2))))))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (cos (- lambda1 lambda2)))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (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)) 1) #s(hole binary64 (+ 1 (+ (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) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (cos phi1))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* -1/2 (* (pow phi2 2) (cos lambda1)))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* 1/24 (* (pow phi2 2) (cos lambda1)))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda1))) (* 1/24 (cos lambda1))))))))))
#s(approx (+ (cos phi1) (cos phi2)) #s(hole binary64 (+ 1 (cos phi1))))
#s(approx (+ (cos phi1) (cos phi2)) #s(hole binary64 (+ 1 (+ (cos phi1) (* -1/2 (pow phi2 2))))))
#s(approx (+ (cos phi1) (cos phi2)) #s(hole binary64 (+ 1 (+ (cos phi1) (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2))))))
#s(approx (+ (cos phi1) (cos phi2)) #s(hole binary64 (+ 1 (+ (cos phi1) (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) #s(hole binary64 (+ 1 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* -1/2 (* (pow phi2 2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* (pow phi2 2) (+ (* -1/2 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* 1/24 (* (pow phi2 2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* (pow phi2 2) (+ (* -1/2 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (* 1/24 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* -1/2 (* (pow phi2 2) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* 1/24 (* (pow phi2 2) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))) (* 1/24 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (+ (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi2 (cos (* 1/2 (PI)))))))
#s(approx (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi2 (+ (cos (* 1/2 (PI))) (* -1/2 (* phi2 (sin (* 1/2 (PI))))))))))
#s(approx (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))) #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 (* (cos (* 1/2 (PI))) (sin phi2)) #s(hole binary64 (* phi2 (cos (* 1/2 (PI))))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi2)) #s(hole binary64 (* phi2 (+ (cos (* 1/2 (PI))) (* -1/6 (* (pow phi2 2) (cos (* 1/2 (PI)))))))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi2)) #s(hole binary64 (* phi2 (+ (cos (* 1/2 (PI))) (* (pow phi2 2) (+ (* -1/6 (cos (* 1/2 (PI)))) (* 1/120 (* (pow phi2 2) (cos (* 1/2 (PI)))))))))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi2)) #s(hole binary64 (* phi2 (+ (cos (* 1/2 (PI))) (* (pow phi2 2) (+ (* -1/6 (cos (* 1/2 (PI)))) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (cos (* 1/2 (PI))))) (* 1/120 (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 phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos lambda2) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos lambda2) (+ (* -1/2 (* (pow phi2 2) (cos lambda2))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos lambda2) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* 1/24 (* (pow phi2 2) (cos lambda2))))))))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos lambda2) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda2))) (* 1/24 (cos lambda2)))))))))))
#s(approx (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos lambda2) (* (cos (* 1/2 (PI))) (sin phi1)))))
#s(approx (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos lambda2) (+ (* -1/2 (* (pow phi2 2) (cos lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos lambda2) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* 1/24 (* (pow phi2 2) (cos lambda2)))))))))
#s(approx (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos lambda2) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda2))) (* 1/24 (cos lambda2))))))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (/ (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* (pow phi2 2) (- (+ (* -1/24 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (+ (* -1/4 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3))) (+ (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* (pow phi2 2) (- (+ (* -1/24 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))) (* (pow phi2 2) (- (+ (* -1/24 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/720 (/ (pow (cos (- lambda1 lambda2)) 3) (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 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2)))))))) (- (cos phi1) (cos (- lambda1 lambda2))))))) (+ (* -1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -1/4 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3))) (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* -2/45 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/720 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/48 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3)))))))))) (+ (* -1/4 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3))) (+ (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (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 (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (- 1 (cos (- lambda1 lambda2))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- 1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* (pow phi2 2) (- (* -1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (/ (* (cos (- lambda1 lambda2)) (- 1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- 1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (- 1 (cos (- lambda1 lambda2)))))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- 1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* (pow phi2 2) (- (+ (* -1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (* (pow phi2 2) (- (* 2/45 (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (/ (* (cos (- lambda1 lambda2)) (- (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- 1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (- 1 (cos (- lambda1 lambda2))))) (+ (* 1/720 (/ (* (cos (- lambda1 lambda2)) (- 1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (/ (* (cos (- lambda1 lambda2)) (- 1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- 1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (- 1 (cos (- lambda1 lambda2)))))))) (- 1 (cos (- lambda1 lambda2)))))))))) (+ (* -1/24 (/ (* (cos (- lambda1 lambda2)) (- 1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- 1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (- 1 (cos (- lambda1 lambda2)))))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- 1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- 1 (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- (+ 1 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- (+ 1 (* (pow phi2 2) (- (* -1/3 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- (+ 1 (* (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 (- lambda1 lambda2)) 2))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) #s(hole binary64 (pow (cos (- lambda1 lambda2)) 2)))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) #s(hole binary64 (+ (* -1 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) #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 (* (cos phi2) (cos (- lambda1 lambda2))) 2) #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 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- 1 (cos (- lambda1 lambda2)))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* 1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))) (cos (- lambda1 lambda2)))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* (pow phi2 2) (- (* -1/24 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* -1/2 (cos (- lambda1 lambda2)))))) (cos (- lambda1 lambda2)))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* (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 (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (/ (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* (pow phi2 2) (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))) (/ (* (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2)))) (+ (/ 1 (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* (pow phi2 2) (- (+ (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))) (* (pow phi2 2) (- (* 7/8 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))) (+ (/ (* (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 1/24 (cos (- lambda1 lambda2))))) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2)) (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))) (/ (* (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))))))) (/ (* (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2)))) (+ (/ 1 (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* (pow phi2 2) (- (+ (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))) (* (pow phi2 2) (- (+ (* 7/8 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))) (* (pow phi2 2) (- (* -61/240 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))) (+ (/ (* (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (* -2/45 (pow (cos (- lambda1 lambda2)) 2)) (* -1/720 (cos (- lambda1 lambda2))))) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2)) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))) (/ (* (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (- (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 1/24 (cos (- lambda1 lambda2))))) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) (/ (* (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2)))) (- (* 7/8 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))) (+ (/ (* (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 1/24 (cos (- lambda1 lambda2))))) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2)) (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))) (/ (* (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))))) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))))))) (+ (/ (* (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 1/24 (cos (- lambda1 lambda2))))) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2)) (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))) (/ (* (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))))))) (/ (* (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2)))) (+ (/ 1 (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) #s(hole binary64 (+ 1 (pow (cos (- lambda1 lambda2)) 3))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) #s(hole binary64 (+ 1 (+ (* -3/2 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 3))) (pow (cos (- lambda1 lambda2)) 3)))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) #s(hole binary64 (+ 1 (+ (* (pow phi2 2) (+ (* -3/2 (pow (cos (- lambda1 lambda2)) 3)) (* 7/8 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 3))))) (pow (cos (- lambda1 lambda2)) 3)))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) #s(hole binary64 (+ 1 (+ (* (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 (- lambda1 lambda2)) 3)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3) #s(hole binary64 (pow (cos (- lambda1 lambda2)) 3)))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3) #s(hole binary64 (+ (* -3/2 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 3))) (pow (cos (- lambda1 lambda2)) 3))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 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 (- lambda1 lambda2)) 3))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 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 (- lambda1 lambda2)) 3))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* (pow phi2 2) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (pow (cos (- lambda1 lambda2)) 2))) (cos (- lambda1 lambda2)))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* (pow phi2 2) (- (+ (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* (pow phi2 2) (- (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 1/24 (cos (- lambda1 lambda2)))))) (* -1/2 (cos (- lambda1 lambda2))))) (pow (cos (- lambda1 lambda2)) 2))) (cos (- lambda1 lambda2)))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* (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 (- lambda1 lambda2)))))) (* 1/24 (cos (- lambda1 lambda2)))))) (* -1/2 (cos (- lambda1 lambda2))))) (pow (cos (- lambda1 lambda2)) 2))) (cos (- lambda1 lambda2)))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (+ (* -1 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (+ (* (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 (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (+ (* (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 (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2)))))))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (/ (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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) (- (* -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 (- 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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) 2)) (pow (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))) 3))) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (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) (- (* 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)) (/ (* (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)))))))) (+ (/ (* (pow (cos phi1) 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 (- 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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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)))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) 2)) (pow (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))) 3))) (/ (* (pow (cos phi1) 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))) (- (* -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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (* (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) (- (* 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)))) 3))) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (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)))))) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (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 (- 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))))) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2))))) (+ (/ (* (pow (cos phi1) 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)) (/ (* (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)))))))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) 2)) (pow (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))) 3))) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (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) (- (* 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)) (/ (* (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)))))))) (+ (/ (* (pow (cos phi1) 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 (- 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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (pow (cos phi1) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* -1 (/ (* (pow phi2 2) (* (pow (cos phi1) 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))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* (pow phi2 2) (- (* -1 (* (pow phi2 2) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) 2)) (pow (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))) 3))) (/ (* (pow (cos phi1) 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))))) (/ (* (pow (cos phi1) 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))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* (pow phi2 2) (- (* (pow phi2 2) (- (* -1 (* (pow phi2 2) (+ (* -1 (/ (* (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) 2)) (pow (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))) 3))) (/ (* (pow (cos phi1) 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))) (- (* -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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (* (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) (- (* 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)))) 3))) (/ (* (pow (cos phi1) 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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) 2)) (pow (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))) 3))) (/ (* (pow (cos phi1) 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))))) (/ (* (pow (cos phi1) 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))))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* (pow phi2 2) (- (* -1/2 (/ (cos (- lambda1 lambda2)) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))))) (/ 1 (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* (pow phi2 2) (- (+ (* -1/2 (/ (cos (- lambda1 lambda2)) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (* (pow phi2 2) (- (* 1/24 (/ (cos (- lambda1 lambda2)) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (/ (* (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2)))) (- (* -1/2 (/ (cos (- lambda1 lambda2)) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))))) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))))))) (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))))) (/ 1 (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* (pow phi2 2) (- (+ (* -1/2 (/ (cos (- lambda1 lambda2)) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (* (pow phi2 2) (- (+ (* 1/24 (/ (cos (- lambda1 lambda2)) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (* (pow phi2 2) (- (* -1/720 (/ (cos (- lambda1 lambda2)) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (+ (* -2/45 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (+ (/ (* (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2)))) (- (* 1/24 (/ (cos (- lambda1 lambda2)) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (/ (* (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2)))) (- (* -1/2 (/ (cos (- lambda1 lambda2)) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))))) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))))) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) (/ (* (- (* -1/2 (/ (cos (- lambda1 lambda2)) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2)))) (- (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 1/24 (cos (- lambda1 lambda2))))) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))))))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (/ (* (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2)))) (- (* -1/2 (/ (cos (- lambda1 lambda2)) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))))) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))))))) (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))))) (/ 1 (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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 (- 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 (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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)))))) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (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 (- 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)))))) (/ (* (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 (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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)))))) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (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)))))) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (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 (- 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))))) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2))))) (/ (* (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 (- 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 (- 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)))))) (/ (* (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 (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2))))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) #s(hole binary64 (pow (cos (- lambda1 lambda2)) 3)))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) #s(hole binary64 (+ (* -3/2 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 3))) (pow (cos (- lambda1 lambda2)) 3))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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 (- lambda1 lambda2)) 3))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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 (- lambda1 lambda2)) 3))))
#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 phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (pow (cos (- lambda1 lambda2)) 2) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))))) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #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 (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #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 (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #s(hole binary64 (pow (cos (- lambda1 lambda2)) 2)))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #s(hole binary64 (+ (* -1 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 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 (+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #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 (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (cos (- lambda1 lambda2)))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* phi2 (+ (* -1/2 (* phi2 (cos (- lambda1 lambda2)))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* phi2 (+ (* phi2 (+ (* -1/2 (cos (- lambda1 lambda2))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) #s(hole binary64 (cos (- lambda1 lambda2))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (* phi2 (+ (* -1/2 (* phi2 (cos (- lambda1 lambda2)))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (* phi2 (+ (* phi2 (+ (* -1/2 (cos (- lambda1 lambda2))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))))
#s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) #s(hole binary64 1))
#s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) #s(hole binary64 (+ 1 (* phi2 (cos (* 1/2 (PI)))))))
#s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) #s(hole binary64 (+ 1 (* phi2 (+ (cos (* 1/2 (PI))) (* -1/2 phi2))))))
#s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) #s(hole binary64 (+ 1 (* phi2 (+ (cos (* 1/2 (PI))) (* phi2 (- (* -1/6 (* phi2 (cos (* 1/2 (PI))))) 1/2)))))))
#s(approx (* (cos phi2) 1) #s(hole binary64 1))
#s(approx (* (cos phi2) 1) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (* (cos phi2) 1) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))))
#s(approx (* (cos phi2) 1) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (+ (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2)))))))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (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 (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow phi2 2) (* (pow (cos phi1) 2) (cos (- lambda1 lambda2)))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (- (* -1 (* (pow phi2 2) (+ (* -1/4 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3))) (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2)))))) (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (- (* (pow phi2 2) (- (* -1 (* (pow phi2 2) (+ (* -1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -1/4 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3))) (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/720 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/48 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3))))))) (+ (* -1/4 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3))) (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2)))))) (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- 1 (cos (- lambda1 lambda2))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* -1/2 (/ (* (pow phi2 2) (cos (- lambda1 lambda2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* (pow phi2 2) (- (* -1 (* (pow phi2 2) (+ (* -1/4 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 3))) (* -1/24 (/ (cos (- lambda1 lambda2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ 1 (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* (pow phi2 2) (- (* (pow phi2 2) (- (* -1 (* (pow phi2 2) (+ (* -1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -1/4 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 3))) (* -1/24 (/ (cos (- lambda1 lambda2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (- 1 (cos (- lambda1 lambda2))))) (+ (* 1/720 (/ (cos (- lambda1 lambda2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* 1/48 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 3))))))) (+ (* -1/4 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 3))) (* -1/24 (/ (cos (- lambda1 lambda2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ 1 (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (- (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* (pow phi2 2) (- (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* -1/24 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (- (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* (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)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/720 (/ (pow (cos (- lambda1 lambda2)) 3) (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 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2)))))))) (- (cos phi1) (cos (- lambda1 lambda2)))))))))) (+ (* -1/24 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) #s(hole binary64 (+ (pow (cos phi1) 3) (pow (cos (- lambda1 lambda2)) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ (pow (cos phi1) 3) (pow (cos (- lambda1 lambda2)) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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))) (- (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (* (cos (- lambda1 lambda2)) (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3)))))) (/ (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* (pow phi2 2) (- (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1/24 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (* (cos (- lambda1 lambda2)) (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3)))))) (- (cos phi1) (cos (- lambda1 lambda2)))) (/ (* (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2))) (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 4))))))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (* (cos (- lambda1 lambda2)) (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3)))))) (/ (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* (pow phi2 2) (- (+ (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* (pow phi2 2) (- (* 1/720 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -2/45 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/720 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* 1/24 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* 1/6 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (/ (* (cos (- lambda1 lambda2)) (- (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1/24 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (* (cos (- lambda1 lambda2)) (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3)))))) (- (cos phi1) (cos (- lambda1 lambda2)))) (/ (* (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2))) (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 4)))))))) (- (cos phi1) (cos (- lambda1 lambda2)))) (+ (/ (* (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2))) (- (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (* (cos (- lambda1 lambda2)) (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2)) (/ (* (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 2)) (* 1/360 (* (cos (- lambda1 lambda2)) (- (cos phi1) (cos (- lambda1 lambda2)))))) (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 4))))))))))) (+ (* -1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1/24 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (* (cos (- lambda1 lambda2)) (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3)))))) (- (cos phi1) (cos (- lambda1 lambda2)))) (/ (* (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2))) (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 4))))))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (* (cos (- lambda1 lambda2)) (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3)))))) (/ (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (* 1/2 (* (pow (cos phi1) 2) (cos (- lambda1 lambda2)))) (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* 1/2 (* (pow (cos phi1) 2) (cos (- lambda1 lambda2)))) (* (pow phi2 2) (- (* -1/24 (* (pow (cos phi1) 2) (cos (- lambda1 lambda2)))) (+ (* -1/2 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (* 1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))))) (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* 1/2 (* (pow (cos phi1) 2) (cos (- lambda1 lambda2)))) (* (pow phi2 2) (- (+ (* -1/24 (* (pow (cos phi1) 2) (cos (- lambda1 lambda2)))) (* (pow phi2 2) (- (* 1/720 (* (pow (cos phi1) 2) (cos (- lambda1 lambda2)))) (+ (* -2/45 (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/720 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/24 (pow (cos (- lambda1 lambda2)) 3)) (* 1/6 (pow (cos (- lambda1 lambda2)) 3)))))))) (+ (* -1/2 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (* 1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))))) (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* 1/2 (* (pow phi2 2) (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))))) (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -1/24 (* (pow phi2 2) (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))))) (* 1/2 (* (pow (cos phi1) 2) (cos (- lambda1 lambda2)))))) (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (+ (* 1/2 (* (pow (cos phi1) 2) (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/24 (* (pow (cos phi1) 2) (cos (- lambda1 lambda2)))) (* 1/720 (* (pow phi2 2) (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))))))))) (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/2 (pow (cos (- lambda1 lambda2)) 3)) (* (pow phi2 2) (+ (* -1/2 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (* 1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))))))))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/2 (pow (cos (- lambda1 lambda2)) 3)) (* (pow phi2 2) (+ (* -1/2 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 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/720 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/24 (pow (cos (- lambda1 lambda2)) 3)) (* 1/6 (pow (cos (- lambda1 lambda2)) 3))))))))))))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2)))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (- (cos phi1) (cos (- lambda1 lambda2))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (+ (* (cos (- lambda1 lambda2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (+ (* (cos (- lambda1 lambda2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/4 (pow (cos (- lambda1 lambda2)) 2)) (* (pow phi2 2) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 2)) (* 1/360 (* (cos (- lambda1 lambda2)) (- (cos phi1) (cos (- lambda1 lambda2)))))))))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* (pow phi2 2) (- (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda1 lambda2))))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* (pow phi2 2) (- (+ (* (pow phi2 2) (- (* -1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* -1/24 (/ (* (cos (- lambda1 lambda2)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda1 lambda2))))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/720 (/ (* (cos (- lambda1 lambda2)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda1 lambda2))))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2)))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (pow phi2 2) (- (* -1/3 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))) (* -1 (pow (cos (- lambda1 lambda2)) 2)))))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (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 (- lambda1 lambda2)) 2))))
#s(approx (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #s(hole binary64 (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #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 (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #s(hole binary64 (pow (cos (- lambda1 lambda2)) 2)))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #s(hole binary64 (+ (* -1 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #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 (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #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 (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (* 2 (log (cos (- lambda1 lambda2))))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (+ (* -1 (pow phi2 2)) (* 2 (log (cos (- lambda1 lambda2)))))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (+ (* 2 (log (cos (- lambda1 lambda2)))) (* (pow phi2 2) (- (* -1/6 (pow phi2 2)) 1)))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (+ (* 2 (log (cos (- lambda1 lambda2)))) (* (pow phi2 2) (- (* (pow phi2 2) (- (* -2/45 (pow phi2 2)) 1/6)) 1)))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (log (cos (- lambda1 lambda2)))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (+ (log (cos (- lambda1 lambda2))) (* -1/2 (pow phi2 2)))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (+ (log (cos (- lambda1 lambda2))) (* (pow phi2 2) (- (* -1/12 (pow phi2 2)) 1/2)))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (+ (log (cos (- lambda1 lambda2))) (* (pow phi2 2) (- (* (pow phi2 2) (- (* -1/45 (pow phi2 2)) 1/12)) 1/2)))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (* 3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos phi1) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* 3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (* (pow phi2 2) (- (* -4 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (+ (/ (* (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))))) (* (+ (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))) (- (* 3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2))))))))) (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos phi1) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* 3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (* (pow phi2 2) (- (+ (* -4 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (* (pow phi2 2) (- (* 47/15 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (+ (/ (* (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))))) (+ (* 1/720 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (/ (* (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))))) (* (+ (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (- (* 3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2))))) (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))) (- (* -4 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (+ (/ (* (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))))) (* (+ (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))) (- (* 3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))))) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))))))) (+ (/ (* (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))))) (* (+ (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))) (- (* 3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2))))))))) (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos phi1) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2))))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) #s(hole binary64 (/ (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (* 3 (/ (pow (cos (- lambda1 lambda2)) 6) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (/ (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2)))) (/ (pow (cos phi1) 6) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (/ (pow (cos (- lambda1 lambda2)) 6) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4)))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* 3 (/ (pow (cos (- lambda1 lambda2)) 6) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (pow phi2 2) (- (* -4 (/ (pow (cos (- lambda1 lambda2)) 6) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (+ (/ (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (* 3 (/ (pow (cos (- lambda1 lambda2)) 6) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (/ (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2)))) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4)))) (/ (* (+ (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2)))))) (/ (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2)))) (/ (pow (cos phi1) 6) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (/ (pow (cos (- lambda1 lambda2)) 6) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4)))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* 3 (/ (pow (cos (- lambda1 lambda2)) 6) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (pow phi2 2) (- (+ (* -4 (/ (pow (cos (- lambda1 lambda2)) 6) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (pow phi2 2) (- (* 47/15 (/ (pow (cos (- lambda1 lambda2)) 6) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (+ (/ (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (* -4 (/ (pow (cos (- lambda1 lambda2)) 6) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (+ (/ (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (* 3 (/ (pow (cos (- lambda1 lambda2)) 6) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (/ (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2)))) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4)))) (/ (* (+ (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2))))) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4)))) (+ (/ (* (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2)) (/ (* (+ (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- (* 3 (/ (pow (cos (- lambda1 lambda2)) 6) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (/ (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2)))) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))))))) (+ (/ (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (* 3 (/ (pow (cos (- lambda1 lambda2)) 6) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (/ (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2)))) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4)))) (/ (* (+ (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2)))))) (/ (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2)))) (/ (pow (cos phi1) 6) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (/ (pow (cos (- lambda1 lambda2)) 6) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4)))))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) #s(hole binary64 (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) #s(hole binary64 (- (+ (* 3 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 6))) (pow (cos phi1) 6)) (pow (cos (- lambda1 lambda2)) 6))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) #s(hole binary64 (- (+ (* (pow phi2 2) (- (* -4 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 6))) (* -3 (pow (cos (- lambda1 lambda2)) 6)))) (pow (cos phi1) 6)) (pow (cos (- lambda1 lambda2)) 6))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) #s(hole binary64 (- (+ (* (pow phi2 2) (- (* (pow phi2 2) (- (* 47/15 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 6))) (* 4 (pow (cos (- lambda1 lambda2)) 6)))) (* -3 (pow (cos (- lambda1 lambda2)) 6)))) (pow (cos phi1) 6)) (pow (cos (- lambda1 lambda2)) 6))))
#s(approx (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) #s(hole binary64 (pow (cos (- lambda1 lambda2)) 6)))
#s(approx (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) #s(hole binary64 (+ (* -3 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 6))) (pow (cos (- lambda1 lambda2)) 6))))
#s(approx (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -3 (pow (cos (- lambda1 lambda2)) 6)) (* 4 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 6))))) (pow (cos (- lambda1 lambda2)) 6))))
#s(approx (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -3 (pow (cos (- lambda1 lambda2)) 6)) (* (pow phi2 2) (+ (* -47/15 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 6))) (* 4 (pow (cos (- lambda1 lambda2)) 6)))))) (pow (cos (- lambda1 lambda2)) 6))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) #s(hole binary64 (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4)))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))))) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (pow phi2 2) (+ (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))))) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (pow phi2 2) (+ (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (+ (* 5/3 (pow (cos (- lambda1 lambda2)) 4)) (* (pow phi2 2) (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))))))))))) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos (- lambda1 lambda2)) 4))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))))) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos (- lambda1 lambda2)) 4)))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (pow phi2 2) (+ (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))))) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos (- lambda1 lambda2)) 4)))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (pow phi2 2) (+ (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (+ (* 5/3 (pow (cos (- lambda1 lambda2)) 4)) (* (pow phi2 2) (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))))))))))) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos (- lambda1 lambda2)) 4)))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* -1 (* (pow phi2 2) (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 1/3 (* (pow phi2 2) (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))))) (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (pow phi2 2) (+ (* -2/45 (* (pow phi2 2) (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))))))) (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 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 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (* (sin (* 1/2 (PI))) (sin (- lambda1 lambda2)))))
#s(approx (* (sin (+ phi2 (/ (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 (/ (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 (/ (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) 1)) (sin (- lambda1 lambda2))) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* phi2 (* (cos (* 1/2 (PI))) (sin (- lambda1 lambda2)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* phi2 (+ (* -1/2 (* phi2 (sin (- lambda1 lambda2)))) (* (cos (* 1/2 (PI))) (sin (- lambda1 lambda2))))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* phi2 (+ (* phi2 (+ (* -1/2 (sin (- lambda1 lambda2))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (sin (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (sin (- lambda1 lambda2))))))))
#s(approx (cos phi2) #s(hole binary64 (cos phi2)))
#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 (+ 1 (* -1/2 (* phi2 phi2))) #s(hole binary64 (* -1/2 (pow phi2 2))))
#s(approx (+ 1 (* -1/2 (* phi2 phi2))) #s(hole binary64 (* (pow phi2 2) (- (/ 1 (pow phi2 2)) 1/2))))
#s(approx (sin (+ phi2 (/ (PI) 2))) #s(hole binary64 (sin (+ phi2 (* 1/2 (PI))))))
#s(approx (+ phi2 (/ (PI) 2)) #s(hole binary64 phi2))
#s(approx (+ phi2 (/ (PI) 2)) #s(hole binary64 (* phi2 (+ 1 (* 1/2 (/ (PI) phi2))))))
#s(approx (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 phi2))
#s(approx (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (* phi2 (- (+ 1 (+ (* 1/2 (/ (PI) phi2)) (/ lambda2 phi2))) (/ lambda1 phi2)))))
#s(approx (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 phi2))
#s(approx (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (* phi2 (- (+ 1 (+ (* 1/2 (/ (PI) phi2)) (/ lambda1 phi2))) (/ lambda2 phi2)))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (/ (sin (- lambda1 lambda2)) (pow phi2 2))))))
#s(approx (+ (* (* phi2 phi2) -1/2) 1) #s(hole binary64 (* -1/2 (pow phi2 2))))
#s(approx (+ (* (* phi2 phi2) -1/2) 1) #s(hole binary64 (* (pow phi2 2) (- (/ 1 (pow phi2 2)) 1/2))))
#s(approx (* (* phi2 phi2) (- (pow phi2 -2) 1/2)) #s(hole binary64 (* -1/2 (pow phi2 2))))
#s(approx (* (* phi2 phi2) (- (pow phi2 -2) 1/2)) #s(hole binary64 (* (pow phi2 2) (- (/ 1 (pow phi2 2)) 1/2))))
#s(approx (- (pow phi2 -2) 1/2) #s(hole binary64 -1/2))
#s(approx (- (pow phi2 -2) 1/2) #s(hole binary64 (- (/ 1 (pow phi2 2)) 1/2)))
#s(approx (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) #s(hole binary64 (* 1/24 (pow phi2 4))))
#s(approx (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) #s(hole binary64 (* (pow phi2 4) (- 1/24 (* 1/2 (/ 1 (pow phi2 2)))))))
#s(approx (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) #s(hole binary64 (* (pow phi2 4) (- (+ 1/24 (/ 1 (pow phi2 4))) (* 1/2 (/ 1 (pow phi2 2)))))))
#s(approx (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2)) #s(hole binary64 (* 1/24 (pow phi2 4))))
#s(approx (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2)) #s(hole binary64 (* (pow phi2 4) (- 1/24 (* 1/2 (/ 1 (pow phi2 2)))))))
#s(approx (- (* 1/24 (* phi2 phi2)) 1/2) #s(hole binary64 (* 1/24 (pow phi2 2))))
#s(approx (- (* 1/24 (* phi2 phi2)) 1/2) #s(hole binary64 (* (pow phi2 2) (- 1/24 (* 1/2 (/ 1 (pow phi2 2)))))))
#s(approx (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))) #s(hole binary64 (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi2)) #s(hole binary64 (* (cos (* 1/2 (PI))) (sin phi2))))
#s(approx (sin phi2) #s(hole binary64 (sin phi2)))
#s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) #s(hole binary64 (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))
#s(approx (* (cos phi2) 1) #s(hole binary64 (cos phi2)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2))))))
#s(approx (sin (+ phi2 (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (* -1 phi2)))))
#s(approx (+ phi2 (/ (PI) 2)) #s(hole binary64 (* -1 (* phi2 (- (* -1/2 (/ (PI) phi2)) 1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* 1/2 (+ (sin (- (+ lambda1 (* 1/2 (PI))) (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda2 (* 1/2 (PI))) (+ lambda1 (* -1 phi2)))))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* 1/2 (+ (sin (- (+ lambda1 (* 1/2 (PI))) (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda2 (* 1/2 (PI))) (+ lambda1 (* -1 phi2))))))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (cos phi1) (* 1/2 (+ (sin (- (+ lambda1 (* 1/2 (PI))) (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda2 (* 1/2 (PI))) (+ lambda1 (* -1 phi2)))))))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) #s(hole binary64 (* 1/2 (+ (sin (- (+ lambda1 (* 1/2 (PI))) (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda2 (* 1/2 (PI))) (+ lambda1 (* -1 phi2))))))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (- (+ lambda1 (* 1/2 (PI))) (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda2 (* 1/2 (PI))) (+ lambda1 (* -1 phi2)))))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (sin (- (+ lambda2 (* 1/2 (PI))) (+ lambda1 (* -1 phi2))))))
#s(approx (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (* -1 (* phi2 (- (* -1 (/ (- (+ lambda2 (* 1/2 (PI))) lambda1) phi2)) 1)))))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (sin (- (+ lambda1 (* 1/2 (PI))) (+ lambda2 (* -1 phi2))))))
#s(approx (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (* -1 (* phi2 (- (* -1 (/ (- (+ lambda1 (* 1/2 (PI))) lambda2) phi2)) 1)))))
#s(approx (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (sin (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (sin (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (* (sin (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2))))))

Calls

12 calls:

Time	Variable		Point	Expression
222.0ms	phi2	@	inf	((+ 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1) (+ 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)) (+ 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) 1 (+ 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+ 1 (* (cos phi2) (cos (- 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+ (cos phi1) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1/2 (* phi1 phi1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (+ 1 (* -1/2 (* phi2 phi2))) (* -1/2 (* phi2 phi2)) (* phi2 phi2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (sin (+ phi2 (/ (PI) 2))) (+ phi2 (/ (PI) 2)) (/ (PI) 2) (PI) 2 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (* (* phi2 phi2) -1/2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (+ (* (* phi2 phi2) -1/2) 1) (* (* phi2 phi2) (- (pow phi2 -2) 1/2)) (- (pow phi2 -2) 1/2) (pow phi2 -2) -2 1/2 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (+ (* (* phi2 phi2) -1/2) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2)) (- (* 1/24 (* phi2 phi2)) 1/2) (* 1/24 (* phi2 phi2)) 1/24 (+ 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))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ 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))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ 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))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (cos lambda2) (neg (sin lambda2)) (sin lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (cos lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) -1 (* lambda1 (* (cos phi2) (neg (sin lambda2)))) (* (cos phi2) (neg (sin lambda2))) (* (cos phi2) (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos lambda1) (* (sin lambda1) (sin lambda2)) (sin lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) (sin (+ lambda2 (/ (PI) 2))) (+ lambda2 (/ (PI) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (* lambda1 (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (neg lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) (* (* (cos lambda2) lambda1) -1/2) (* (cos lambda2) lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) (* 1/6 lambda1) 1/6 (* -1/2 (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) (* -1/2 (* lambda1 (neg (sin lambda2)))) (* lambda1 (neg (sin lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (* (- (/ lambda1 lambda2) 1) lambda2) (- (/ lambda1 lambda2) 1) (* lambda1 (- (pow lambda2 -1) (pow lambda1 -1))) (- (pow lambda2 -1) (pow lambda1 -1)) (pow lambda2 -1) (pow lambda1 -1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) (- (pow (/ lambda1 lambda2) 3) 1) (pow (/ lambda1 lambda2) 3) (/ lambda1 lambda2) 3 (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) (+ 1 (* (/ lambda1 lambda2) 1)) (* (/ lambda1 lambda2) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (* lambda2 (- (/ lambda1 lambda2) 1)) (- (/ lambda1 lambda2) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ (cos lambda2) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ (cos phi1) (cos phi2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+ 1 (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (cos lambda1) (+ 1 (* -1/2 (* lambda1 lambda1))) (* -1/2 (* lambda1 lambda1)) (* lambda1 lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (cos lambda1) (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2)) (- (* 1/24 (* lambda1 lambda1)) 1/2) (* 1/24 (* lambda1 lambda1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (cos lambda1) (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) (+ 1/24 (* -1/720 (* lambda1 lambda1))) (* -1/720 (* lambda1 lambda1)) -1/720 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (+ (- lambda1 lambda2) (/ (PI) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))) (sin (* 1/2 (PI))) (* 1/2 (PI)) (* (cos (* 1/2 (PI))) (sin phi2)) (cos (* 1/2 (PI))) (sin phi2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))) (* (cos (* 1/2 (PI))) (sin phi1)) (sin phi1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (+ 1 (* -1/2 (* phi1 phi1))) (* -1/2 (* phi1 phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (* (cos (- lambda1 lambda2)) (cos phi2)) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) (+ (sin lambda2) (/ (cos lambda2) lambda1)) (/ (cos lambda2) lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (* -1 (/ (cos lambda2) lambda1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (/ (PI) 2)) (* (cos phi2) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi1) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (exp (* (log (cos phi1)) 3)) (* (log (cos phi1)) 3) (log (cos phi1)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (pow (cos phi1) 3) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (* (cos (- lambda1 lambda2)) (cos phi2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* 1/2 (cos (* 2 phi1))) (cos (* 2 phi1)) (* 2 phi1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) (log (* (cos (- lambda1 lambda2)) (cos phi2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (- (pow lambda1 3) (pow lambda2 3)) (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) (pow lambda2 3) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (+ (* lambda2 lambda2) (* lambda1 lambda2)) (* lambda1 lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (- (pow lambda1 3) (pow lambda2 3)) (pow lambda1 3) (+ 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 (* (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)))) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)) (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (* -1 (/ (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))))) lambda1) (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))
199.0ms	lambda2	@	-inf	((+ 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1) (+ 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)) (+ 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) 1 (+ 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+ 1 (* (cos phi2) (cos (- 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+ (cos phi1) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1/2 (* phi1 phi1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (+ 1 (* -1/2 (* phi2 phi2))) (* -1/2 (* phi2 phi2)) (* phi2 phi2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (sin (+ phi2 (/ (PI) 2))) (+ phi2 (/ (PI) 2)) (/ (PI) 2) (PI) 2 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (* (* phi2 phi2) -1/2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (+ (* (* phi2 phi2) -1/2) 1) (* (* phi2 phi2) (- (pow phi2 -2) 1/2)) (- (pow phi2 -2) 1/2) (pow phi2 -2) -2 1/2 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (+ (* (* phi2 phi2) -1/2) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2)) (- (* 1/24 (* phi2 phi2)) 1/2) (* 1/24 (* phi2 phi2)) 1/24 (+ 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))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ 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))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ 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))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (cos lambda2) (neg (sin lambda2)) (sin lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (cos lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) -1 (* lambda1 (* (cos phi2) (neg (sin lambda2)))) (* (cos phi2) (neg (sin lambda2))) (* (cos phi2) (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos lambda1) (* (sin lambda1) (sin lambda2)) (sin lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) (sin (+ lambda2 (/ (PI) 2))) (+ lambda2 (/ (PI) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (* lambda1 (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (neg lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) (* (* (cos lambda2) lambda1) -1/2) (* (cos lambda2) lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) (* 1/6 lambda1) 1/6 (* -1/2 (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) (* -1/2 (* lambda1 (neg (sin lambda2)))) (* lambda1 (neg (sin lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (* (- (/ lambda1 lambda2) 1) lambda2) (- (/ lambda1 lambda2) 1) (* lambda1 (- (pow lambda2 -1) (pow lambda1 -1))) (- (pow lambda2 -1) (pow lambda1 -1)) (pow lambda2 -1) (pow lambda1 -1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) (- (pow (/ lambda1 lambda2) 3) 1) (pow (/ lambda1 lambda2) 3) (/ lambda1 lambda2) 3 (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) (+ 1 (* (/ lambda1 lambda2) 1)) (* (/ lambda1 lambda2) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (* lambda2 (- (/ lambda1 lambda2) 1)) (- (/ lambda1 lambda2) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ (cos lambda2) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ (cos phi1) (cos phi2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+ 1 (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (cos lambda1) (+ 1 (* -1/2 (* lambda1 lambda1))) (* -1/2 (* lambda1 lambda1)) (* lambda1 lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (cos lambda1) (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2)) (- (* 1/24 (* lambda1 lambda1)) 1/2) (* 1/24 (* lambda1 lambda1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (cos lambda1) (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) (+ 1/24 (* -1/720 (* lambda1 lambda1))) (* -1/720 (* lambda1 lambda1)) -1/720 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (+ (- lambda1 lambda2) (/ (PI) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))) (sin (* 1/2 (PI))) (* 1/2 (PI)) (* (cos (* 1/2 (PI))) (sin phi2)) (cos (* 1/2 (PI))) (sin phi2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))) (* (cos (* 1/2 (PI))) (sin phi1)) (sin phi1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (+ 1 (* -1/2 (* phi1 phi1))) (* -1/2 (* phi1 phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (* (cos (- lambda1 lambda2)) (cos phi2)) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) (+ (sin lambda2) (/ (cos lambda2) lambda1)) (/ (cos lambda2) lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (* -1 (/ (cos lambda2) lambda1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (/ (PI) 2)) (* (cos phi2) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi1) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (exp (* (log (cos phi1)) 3)) (* (log (cos phi1)) 3) (log (cos phi1)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (pow (cos phi1) 3) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (* (cos (- lambda1 lambda2)) (cos phi2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* 1/2 (cos (* 2 phi1))) (cos (* 2 phi1)) (* 2 phi1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) (log (* (cos (- lambda1 lambda2)) (cos phi2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (- (pow lambda1 3) (pow lambda2 3)) (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) (pow lambda2 3) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (+ (* lambda2 lambda2) (* lambda1 lambda2)) (* lambda1 lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (- (pow lambda1 3) (pow lambda2 3)) (pow lambda1 3) (+ 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 (* (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)))) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)) (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (* -1 (/ (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))))) lambda1) (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))
190.0ms	lambda1	@	-inf	((+ 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1) (+ 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)) (+ 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) 1 (+ 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+ 1 (* (cos phi2) (cos (- 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+ (cos phi1) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1/2 (* phi1 phi1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (+ 1 (* -1/2 (* phi2 phi2))) (* -1/2 (* phi2 phi2)) (* phi2 phi2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (sin (+ phi2 (/ (PI) 2))) (+ phi2 (/ (PI) 2)) (/ (PI) 2) (PI) 2 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (* (* phi2 phi2) -1/2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (+ (* (* phi2 phi2) -1/2) 1) (* (* phi2 phi2) (- (pow phi2 -2) 1/2)) (- (pow phi2 -2) 1/2) (pow phi2 -2) -2 1/2 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (+ (* (* phi2 phi2) -1/2) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2)) (- (* 1/24 (* phi2 phi2)) 1/2) (* 1/24 (* phi2 phi2)) 1/24 (+ 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))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ 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))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ 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))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (cos lambda2) (neg (sin lambda2)) (sin lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (cos lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) -1 (* lambda1 (* (cos phi2) (neg (sin lambda2)))) (* (cos phi2) (neg (sin lambda2))) (* (cos phi2) (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos lambda1) (* (sin lambda1) (sin lambda2)) (sin lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) (sin (+ lambda2 (/ (PI) 2))) (+ lambda2 (/ (PI) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (* lambda1 (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (neg lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) (* (* (cos lambda2) lambda1) -1/2) (* (cos lambda2) lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) (* 1/6 lambda1) 1/6 (* -1/2 (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) (* -1/2 (* lambda1 (neg (sin lambda2)))) (* lambda1 (neg (sin lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (* (- (/ lambda1 lambda2) 1) lambda2) (- (/ lambda1 lambda2) 1) (* lambda1 (- (pow lambda2 -1) (pow lambda1 -1))) (- (pow lambda2 -1) (pow lambda1 -1)) (pow lambda2 -1) (pow lambda1 -1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) (- (pow (/ lambda1 lambda2) 3) 1) (pow (/ lambda1 lambda2) 3) (/ lambda1 lambda2) 3 (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) (+ 1 (* (/ lambda1 lambda2) 1)) (* (/ lambda1 lambda2) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (* lambda2 (- (/ lambda1 lambda2) 1)) (- (/ lambda1 lambda2) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ (cos lambda2) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ (cos phi1) (cos phi2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+ 1 (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (cos lambda1) (+ 1 (* -1/2 (* lambda1 lambda1))) (* -1/2 (* lambda1 lambda1)) (* lambda1 lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (cos lambda1) (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2)) (- (* 1/24 (* lambda1 lambda1)) 1/2) (* 1/24 (* lambda1 lambda1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (cos lambda1) (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) (+ 1/24 (* -1/720 (* lambda1 lambda1))) (* -1/720 (* lambda1 lambda1)) -1/720 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (+ (- lambda1 lambda2) (/ (PI) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))) (sin (* 1/2 (PI))) (* 1/2 (PI)) (* (cos (* 1/2 (PI))) (sin phi2)) (cos (* 1/2 (PI))) (sin phi2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))) (* (cos (* 1/2 (PI))) (sin phi1)) (sin phi1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (+ 1 (* -1/2 (* phi1 phi1))) (* -1/2 (* phi1 phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (* (cos (- lambda1 lambda2)) (cos phi2)) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) (+ (sin lambda2) (/ (cos lambda2) lambda1)) (/ (cos lambda2) lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (* -1 (/ (cos lambda2) lambda1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (/ (PI) 2)) (* (cos phi2) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi1) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (exp (* (log (cos phi1)) 3)) (* (log (cos phi1)) 3) (log (cos phi1)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (pow (cos phi1) 3) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (* (cos (- lambda1 lambda2)) (cos phi2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* 1/2 (cos (* 2 phi1))) (cos (* 2 phi1)) (* 2 phi1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) (log (* (cos (- lambda1 lambda2)) (cos phi2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (- (pow lambda1 3) (pow lambda2 3)) (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) (pow lambda2 3) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (+ (* lambda2 lambda2) (* lambda1 lambda2)) (* lambda1 lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (- (pow lambda1 3) (pow lambda2 3)) (pow lambda1 3) (+ 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 (* (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)))) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)) (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (* -1 (/ (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))))) lambda1) (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))
141.0ms	lambda1	@	0	((+ 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1) (+ 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)) (+ 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) 1 (+ 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+ 1 (* (cos phi2) (cos (- 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+ (cos phi1) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1/2 (* phi1 phi1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (+ 1 (* -1/2 (* phi2 phi2))) (* -1/2 (* phi2 phi2)) (* phi2 phi2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (sin (+ phi2 (/ (PI) 2))) (+ phi2 (/ (PI) 2)) (/ (PI) 2) (PI) 2 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (* (* phi2 phi2) -1/2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (+ (* (* phi2 phi2) -1/2) 1) (* (* phi2 phi2) (- (pow phi2 -2) 1/2)) (- (pow phi2 -2) 1/2) (pow phi2 -2) -2 1/2 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (+ (* (* phi2 phi2) -1/2) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2)) (- (* 1/24 (* phi2 phi2)) 1/2) (* 1/24 (* phi2 phi2)) 1/24 (+ 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))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ 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))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ 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))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (cos lambda2) (neg (sin lambda2)) (sin lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (cos lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) -1 (* lambda1 (* (cos phi2) (neg (sin lambda2)))) (* (cos phi2) (neg (sin lambda2))) (* (cos phi2) (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos lambda1) (* (sin lambda1) (sin lambda2)) (sin lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) (sin (+ lambda2 (/ (PI) 2))) (+ lambda2 (/ (PI) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (* lambda1 (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (neg lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) (* (* (cos lambda2) lambda1) -1/2) (* (cos lambda2) lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) (* 1/6 lambda1) 1/6 (* -1/2 (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) (* -1/2 (* lambda1 (neg (sin lambda2)))) (* lambda1 (neg (sin lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (* (- (/ lambda1 lambda2) 1) lambda2) (- (/ lambda1 lambda2) 1) (* lambda1 (- (pow lambda2 -1) (pow lambda1 -1))) (- (pow lambda2 -1) (pow lambda1 -1)) (pow lambda2 -1) (pow lambda1 -1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) (- (pow (/ lambda1 lambda2) 3) 1) (pow (/ lambda1 lambda2) 3) (/ lambda1 lambda2) 3 (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) (+ 1 (* (/ lambda1 lambda2) 1)) (* (/ lambda1 lambda2) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (* lambda2 (- (/ lambda1 lambda2) 1)) (- (/ lambda1 lambda2) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ (cos lambda2) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ (cos phi1) (cos phi2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+ 1 (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (cos lambda1) (+ 1 (* -1/2 (* lambda1 lambda1))) (* -1/2 (* lambda1 lambda1)) (* lambda1 lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (cos lambda1) (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2)) (- (* 1/24 (* lambda1 lambda1)) 1/2) (* 1/24 (* lambda1 lambda1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (cos lambda1) (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) (+ 1/24 (* -1/720 (* lambda1 lambda1))) (* -1/720 (* lambda1 lambda1)) -1/720 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (+ (- lambda1 lambda2) (/ (PI) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))) (sin (* 1/2 (PI))) (* 1/2 (PI)) (* (cos (* 1/2 (PI))) (sin phi2)) (cos (* 1/2 (PI))) (sin phi2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))) (* (cos (* 1/2 (PI))) (sin phi1)) (sin phi1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (+ 1 (* -1/2 (* phi1 phi1))) (* -1/2 (* phi1 phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (* (cos (- lambda1 lambda2)) (cos phi2)) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) (+ (sin lambda2) (/ (cos lambda2) lambda1)) (/ (cos lambda2) lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (* -1 (/ (cos lambda2) lambda1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (/ (PI) 2)) (* (cos phi2) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi1) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (exp (* (log (cos phi1)) 3)) (* (log (cos phi1)) 3) (log (cos phi1)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (pow (cos phi1) 3) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (* (cos (- lambda1 lambda2)) (cos phi2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* 1/2 (cos (* 2 phi1))) (cos (* 2 phi1)) (* 2 phi1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) (log (* (cos (- lambda1 lambda2)) (cos phi2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (- (pow lambda1 3) (pow lambda2 3)) (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) (pow lambda2 3) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (+ (* lambda2 lambda2) (* lambda1 lambda2)) (* lambda1 lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (- (pow lambda1 3) (pow lambda2 3)) (pow lambda1 3) (+ 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 (* (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)))) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)) (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (* -1 (/ (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))))) lambda1) (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))
104.0ms	phi2	@	-inf	((+ 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1) (+ 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)) (+ 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) 1 (+ 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+ 1 (* (cos phi2) (cos (- 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+ (cos phi1) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1/2 (* phi1 phi1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (+ 1 (* -1/2 (* phi2 phi2))) (* -1/2 (* phi2 phi2)) (* phi2 phi2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (sin (+ phi2 (/ (PI) 2))) (+ phi2 (/ (PI) 2)) (/ (PI) 2) (PI) 2 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (* (* phi2 phi2) -1/2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (+ (* (* phi2 phi2) -1/2) 1) (* (* phi2 phi2) (- (pow phi2 -2) 1/2)) (- (pow phi2 -2) 1/2) (pow phi2 -2) -2 1/2 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (+ (* (* phi2 phi2) -1/2) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2)) (- (* 1/24 (* phi2 phi2)) 1/2) (* 1/24 (* phi2 phi2)) 1/24 (+ 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))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ 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))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ 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))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (cos lambda2) (neg (sin lambda2)) (sin lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (cos lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) -1 (* lambda1 (* (cos phi2) (neg (sin lambda2)))) (* (cos phi2) (neg (sin lambda2))) (* (cos phi2) (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos lambda1) (* (sin lambda1) (sin lambda2)) (sin lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) (sin (+ lambda2 (/ (PI) 2))) (+ lambda2 (/ (PI) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (* lambda1 (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (neg lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) (* (* (cos lambda2) lambda1) -1/2) (* (cos lambda2) lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) (* 1/6 lambda1) 1/6 (* -1/2 (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) (* -1/2 (* lambda1 (neg (sin lambda2)))) (* lambda1 (neg (sin lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (* (- (/ lambda1 lambda2) 1) lambda2) (- (/ lambda1 lambda2) 1) (* lambda1 (- (pow lambda2 -1) (pow lambda1 -1))) (- (pow lambda2 -1) (pow lambda1 -1)) (pow lambda2 -1) (pow lambda1 -1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) (- (pow (/ lambda1 lambda2) 3) 1) (pow (/ lambda1 lambda2) 3) (/ lambda1 lambda2) 3 (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) (+ 1 (* (/ lambda1 lambda2) 1)) (* (/ lambda1 lambda2) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (* lambda2 (- (/ lambda1 lambda2) 1)) (- (/ lambda1 lambda2) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ (cos lambda2) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ (cos phi1) (cos phi2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+ 1 (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (cos lambda1) (+ 1 (* -1/2 (* lambda1 lambda1))) (* -1/2 (* lambda1 lambda1)) (* lambda1 lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (cos lambda1) (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2)) (- (* 1/24 (* lambda1 lambda1)) 1/2) (* 1/24 (* lambda1 lambda1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (cos lambda1) (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) (+ 1/24 (* -1/720 (* lambda1 lambda1))) (* -1/720 (* lambda1 lambda1)) -1/720 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (+ (- lambda1 lambda2) (/ (PI) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))) (sin (* 1/2 (PI))) (* 1/2 (PI)) (* (cos (* 1/2 (PI))) (sin phi2)) (cos (* 1/2 (PI))) (sin phi2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))) (* (cos (* 1/2 (PI))) (sin phi1)) (sin phi1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (+ 1 (* -1/2 (* phi1 phi1))) (* -1/2 (* phi1 phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (* (cos (- lambda1 lambda2)) (cos phi2)) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) (+ (sin lambda2) (/ (cos lambda2) lambda1)) (/ (cos lambda2) lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (* -1 (/ (cos lambda2) lambda1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (/ (PI) 2)) (* (cos phi2) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi1) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (exp (* (log (cos phi1)) 3)) (* (log (cos phi1)) 3) (log (cos phi1)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (pow (cos phi1) 3) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (* (cos (- lambda1 lambda2)) (cos phi2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* 1/2 (cos (* 2 phi1))) (cos (* 2 phi1)) (* 2 phi1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) (log (* (cos (- lambda1 lambda2)) (cos phi2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (- (pow lambda1 3) (pow lambda2 3)) (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) (pow lambda2 3) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (+ (* lambda2 lambda2) (* lambda1 lambda2)) (* lambda1 lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (- (pow lambda1 3) (pow lambda2 3)) (pow lambda1 3) (+ 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 (* (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)))) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)) (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (* -1 (/ (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))))) lambda1) (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))

rewrite2.4s (7.7%)

Memory

-64.8MiB live, 3 795.6MiB allocated; 2.4s collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	11427	233956
0	12547	233956
0	12547	228498

Stop Event

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

Counts

3 424 → 3 462

Calls

Call 1

Inputs
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 #s(approx (+ (/ (atan2 ( (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/.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)) lambda1))
(.f64 #s(approx (+ (/ (atan2 ( (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/.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)) lambda1)
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/.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))
(/.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)
(+.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)))))) (.f64 (+.f64 (/.f64 (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1))
(.f64 (+.f64 (/.f64 (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1)
(+.f64 (/.f64 (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64))
(/.f64 (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
#s(literal 1 binary64)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) lambda1) #s(literal 1 binary64)) lambda1))
(.f64 (+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) lambda1) #s(literal 1 binary64)) lambda1)
(+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ ( (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) lambda1) #s(literal 1 binary64))
(/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ ( (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) lambda1)
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ ( (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.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))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) lambda1) #s(literal 1 binary64)) lambda1))
(.f64 (+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) lambda1) #s(literal 1 binary64)) lambda1)
(+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ ( (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) lambda1) #s(literal 1 binary64))
(/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ ( (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) lambda1)
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1))
(.f64 (+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1)
(+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64))
(/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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))))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
#s(literal -1/2 binary64)
(*.f64 phi1 phi1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #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)))) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #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)))) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (cos.f64 phi1) (.f64 #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)))) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 #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)))) (cos.f64 (-.f64 lambda1 lambda2)))
#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))))
(+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2)))
(.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2))
(*.f64 phi2 phi2)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)))))
(+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1))))
(.f64 (cos.f64 phi2) (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (sin.f64 (+.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (sin.f64 (+.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (cos.f64 phi1) (*.f64 (sin.f64 (+.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (sin.f64 (+.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (+.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (/.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)))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (/.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 (cos.f64 phi1) (/.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 (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 (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))))
(sin.f64 (-.f64 (+.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))
(-.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)))
(+.f64 (+.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda1 lambda2))
(+.f64 lambda1 (atan2.f64 #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)))) (+.f64 (cos.f64 phi1) (.f64 #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)))) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 #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)))) (+.f64 (cos.f64 phi1) (.f64 #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)))) (cos.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))))
(fma.f64 (.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
(.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) #s(approx (+ ( (* phi2 phi2) -1/2) 1) (.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64))))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 #s(approx (cos phi2) #s(approx (+ ( (* phi2 phi2) -1/2) 1) (.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64))))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 #s(approx (cos phi2) #s(approx (+ ( (* phi2 phi2) -1/2) 1) (.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64))))) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64)))))
#s(approx (+ (* (* phi2 phi2) -1/2) 1) (.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64))))
(.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64)))
(-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64))
(pow.f64 phi2 #s(literal -2 binary64))
#s(literal -2 binary64)
#s(literal 1/2 binary64)
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))
(fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #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))))) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #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))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (cos.f64 phi1) (.f64 #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))))) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 #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))))) (cos.f64 (-.f64 lambda1 lambda2)))
#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)))))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64))))
(.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)))
(-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64))
(.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2))
#s(literal 1/24 binary64)
(+.f64 lambda1 (atan2.f64 (.f64 #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)))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 #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)))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 #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)))) (sin.f64 (-.f64 lambda1 lambda2)))
(+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 lambda1 (atan2.f64 (.f64 #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))))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 #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))))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 #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))))) (sin.f64 (-.f64 lambda1 lambda2)))
(+.f64 (cos.f64 phi1) #s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 lambda1 (atan2.f64 (.f64 #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))))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 #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))))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (cos lambda2) lambda1) (neg (sin lambda2))) lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (cos lambda2) lambda1) (neg (sin lambda2))) lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (cos lambda2) lambda1) (neg (sin lambda2))) lambda1)))
#s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) lambda1))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 #s(approx (cos lambda2) #s(literal 1 binary64)) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 #s(approx (cos lambda2) #s(literal 1 binary64)) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 #s(approx (cos lambda2) #s(literal 1 binary64)) lambda1 (neg.f64 (sin.f64 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 #s(approx (cos lambda2) #s(literal 1 binary64)) lambda1 (neg.f64 (sin.f64 lambda2))))
(fma.f64 #s(approx (cos lambda2) #s(literal 1 binary64)) lambda1 (neg.f64 (sin.f64 lambda2)))
#s(approx (cos lambda2) #s(literal 1 binary64))
(neg.f64 (sin.f64 lambda2))
(sin.f64 lambda2)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))
(cos.f64 lambda2)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) #s(approx ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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)))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) #s(approx ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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))))))
(+.f64 (cos.f64 phi1) #s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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))))
(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(literal -1 binary64)
(.f64 lambda1 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))))
(*.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))
(*.f64 (cos.f64 phi2) (cos.f64 lambda2))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (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))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(cos.f64 lambda1)
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(sin.f64 lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (sin.f64 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (sin.f64 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (sin.f64 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) lambda1 (neg.f64 (sin.f64 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (sin.f64 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) lambda1 (neg.f64 (sin.f64 lambda2))))
(fma.f64 (sin.f64 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) lambda1 (neg.f64 (sin.f64 lambda2)))
(sin.f64 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))
(.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (neg.f64 (sin.f64 lambda2))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (neg.f64 (sin.f64 lambda2)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (neg.f64 (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (neg.f64 (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))
(*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 (cos.f64 lambda2))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 (cos.f64 lambda2))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))
(.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (*.f64 lambda1 (cos.f64 lambda2)))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (*.f64 lambda1 (cos.f64 lambda2))))
(+.f64 (neg.f64 (sin.f64 lambda2)) (*.f64 lambda1 (cos.f64 lambda2)))
(*.f64 lambda1 (cos.f64 lambda2))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 (cos.f64 lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 (cos.f64 lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2))))))
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))))
(*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2))))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))
(fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2))
(neg.f64 lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 (cos.f64 lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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)))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 (cos.f64 lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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))))))
(+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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)))))
(.f64 (cos.f64 phi2) #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 (.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64)) (neg.f64 (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)))
(fma.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64)) (neg.f64 (sin.f64 lambda2))) lambda1 (cos.f64 lambda2))
(-.f64 (.f64 (.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64)) (neg.f64 (sin.f64 lambda2)))
(.f64 (.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64))
(*.f64 (cos.f64 lambda2) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 (cos.f64 lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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)))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 (cos.f64 lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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))))))
(+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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)))))
(.f64 (cos.f64 phi2) #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 (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)))
(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))
(-.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)))
(.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)
(fma.f64 (.f64 #s(literal 1/6 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))
(*.f64 #s(literal 1/6 binary64) lambda1)
#s(literal 1/6 binary64)
(*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 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))))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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)))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 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))))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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))))))
(.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 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))))))))
(+.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)))))))
(.f64 lambda1 (+.f64 (cos.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (neg.f64 (sin.f64 lambda2))))))
(+.f64 (cos.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (neg.f64 (sin.f64 lambda2)))))
(.f64 #s(literal -1/2 binary64) (.f64 lambda1 (neg.f64 (sin.f64 lambda2))))
(*.f64 lambda1 (neg.f64 (sin.f64 lambda2)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 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))))))))) (+.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) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 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))))))))) (+.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 #s(approx (- (/ lambda1 lambda2) 1) (.f64 lambda1 (-.f64 (pow.f64 lambda2 #s(literal -1 binary64)) (pow.f64 lambda1 #s(literal -1 binary64))))) lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 #s(approx (- (/ lambda1 lambda2) 1) (.f64 lambda1 (-.f64 (pow.f64 lambda2 #s(literal -1 binary64)) (pow.f64 lambda1 #s(literal -1 binary64))))) lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 #s(approx (- (/ lambda1 lambda2) 1) (*.f64 lambda1 (-.f64 (pow.f64 lambda2 #s(literal -1 binary64)) (pow.f64 lambda1 #s(literal -1 binary64))))) lambda2))))
(sin.f64 #s(approx (- lambda1 lambda2) (.f64 #s(approx (- (/ lambda1 lambda2) 1) (.f64 lambda1 (-.f64 (pow.f64 lambda2 #s(literal -1 binary64)) (pow.f64 lambda1 #s(literal -1 binary64))))) lambda2)))
#s(approx (- lambda1 lambda2) (.f64 #s(approx (- (/ lambda1 lambda2) 1) (.f64 lambda1 (-.f64 (pow.f64 lambda2 #s(literal -1 binary64)) (pow.f64 lambda1 #s(literal -1 binary64))))) lambda2))
(.f64 #s(approx (- (/ lambda1 lambda2) 1) (.f64 lambda1 (-.f64 (pow.f64 lambda2 #s(literal -1 binary64)) (pow.f64 lambda1 #s(literal -1 binary64))))) lambda2)
#s(approx (- (/ lambda1 lambda2) 1) (*.f64 lambda1 (-.f64 (pow.f64 lambda2 #s(literal -1 binary64)) (pow.f64 lambda1 #s(literal -1 binary64)))))
(*.f64 lambda1 (-.f64 (pow.f64 lambda2 #s(literal -1 binary64)) (pow.f64 lambda1 #s(literal -1 binary64))))
(-.f64 (pow.f64 lambda2 #s(literal -1 binary64)) (pow.f64 lambda1 #s(literal -1 binary64)))
(pow.f64 lambda2 #s(literal -1 binary64))
(pow.f64 lambda1 #s(literal -1 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 (/.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))))) lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 (/.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))))) lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 (/.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))))) lambda2))))
(sin.f64 #s(approx (- lambda1 lambda2) (.f64 (/.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))))) lambda2)))
#s(approx (- lambda1 lambda2) (.f64 (/.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))))) lambda2))
(.f64 (/.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))))) lambda2)
(/.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 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64))
(pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64))
(/.f64 lambda1 lambda2)
#s(literal 3 binary64)
(fma.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))
(+.f64 #s(literal 1 binary64) (*.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))
(*.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))
(.f64 (cos.f64 phi2) (sin.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)))
(sin.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))
(.f64 (cos.f64 phi2) (sin.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))))
(sin.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda2) (cos.f64 phi1))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda2) (cos.f64 phi1)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda2) (cos.f64 phi1))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(+.f64 (cos.f64 lambda2) (cos.f64 phi1))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))
(+.f64 (cos.f64 phi1) (cos.f64 phi2))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 #s(literal 1 binary64) (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(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1)))) (cos.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1)))) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1)))) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1)))) (cos.f64 phi2) (cos.f64 phi1))
#s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1))))
(+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1)))
(.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1))
(*.f64 lambda1 lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #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))))) (cos.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #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))))) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #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))))) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 #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))))) (cos.f64 phi2) (cos.f64 phi1))
#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)))))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 lambda1 lambda1) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 lambda1 lambda1)) #s(literal 1/2 binary64))))
(.f64 (.f64 lambda1 lambda1) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 lambda1 lambda1)) #s(literal 1/2 binary64)))
(-.f64 (.f64 #s(literal 1/24 binary64) (.f64 lambda1 lambda1)) #s(literal 1/2 binary64))
(.f64 #s(literal 1/24 binary64) (.f64 lambda1 lambda1))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #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))))) (cos.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #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))))) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #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))))) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 #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))))) (cos.f64 phi2) (cos.f64 phi1))
#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)))))
(+.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))))
(.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)))
(-.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))
(.f64 (.f64 lambda1 lambda1) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (.f64 lambda1 lambda1))))
(+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (.f64 lambda1 lambda1)))
(.f64 #s(literal -1/720 binary64) (.f64 lambda1 lambda1))
#s(literal -1/720 binary64)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))
(fma.f64 (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)) (cos.f64 phi2) #s(literal 1 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2) #s(literal 1 binary64))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2) #s(literal 1 binary64)))
(fma.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2) #s(literal 1 binary64))
(sin.f64 (+.f64 (-.f64 lambda1 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (-.f64 lambda1 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
(+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
(.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(sin.f64 phi2)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))
(sin.f64 phi1)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
(fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) ( (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) ( (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))))))
(/.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)))))
(-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 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))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) ( (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) ( (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))
(-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (/ (+ (pow ( (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (/ (+ (pow ( (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))))))
(/.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)))))
(+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 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))))
(+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
(+.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (cos phi1) #s(literal 1 binary64))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(approx (+ ( (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1)))) #s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(approx (+ ( (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1)))) #s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 #s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1)))) #s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1))))
(+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1)))
(.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(approx (/ (pow (cos phi1) 3) (+ ( (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (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 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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 #s(approx (/ (pow (cos phi1) 3) (+ ( (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (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 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))))
(+.f64 #s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (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 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (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)))
(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 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (.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 2 binary64)) (.f64 (cos.f64 phi1) (*.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 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)))))
(+.f64 (cos.f64 phi1) #s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (cos (- lambda1 lambda2))) (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) #s(approx ( (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(+.f64 (cos.f64 phi1) #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 (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 #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) #s(approx (+ ( (* phi2 phi2) -1/2) 1) (.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 #s(approx (cos phi2) #s(approx (+ ( (* phi2 phi2) -1/2) 1) (.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2))))))
(+.f64 (cos.f64 phi1) (.f64 #s(approx (+ ( (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))))
(.f64 #s(approx (+ ( (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2))))
#s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) #s(literal 1 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)))))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1))))))))
(+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ ( (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)))))))
(.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ ( (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1))))))
#s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1))))
(*.f64 lambda1 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)))
(+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1))
(/.f64 (cos.f64 lambda2) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))))))))
(+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ ( (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))))
(.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ ( (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))))
(.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))
(fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))
(/.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1)
(fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1)))
(*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (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 #s(approx (cos lambda1) #s(literal 1 binary64)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(.f64 (cos.f64 phi2) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
#s(approx (cos lambda1) #s(literal 1 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (cos.f64 phi1) (.f64 (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))
(fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) #s(literal 1 binary64)))
(cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
(*.f64 (cos.f64 phi2) #s(literal 1 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) #s(literal 1 binary64))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) #s(literal 1 binary64))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) #s(literal 1 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(*.f64 (cos.f64 phi1) #s(literal 1 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (/ (pow (cos phi1) 2) (- (cos phi1) ( (cos (- lambda1 lambda2)) (cos phi2)))) (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 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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 #s(approx (/ (pow (cos phi1) 2) (- (cos phi1) ( (cos (- lambda1 lambda2)) (cos phi2)))) (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 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(-.f64 #s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (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 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (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 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.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)))
(+.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)))) #s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))
(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)))) #s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.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)))) #s(approx (/ (pow ( (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (exp.f64 (.f64 (log.f64 (cos.f64 phi1)) #s(literal 3 binary64)))) (+.f64 (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)) (.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 (+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (exp.f64 (.f64 (log.f64 (cos.f64 phi1)) #s(literal 3 binary64)))) (+.f64 (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)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (exp.f64 (.f64 (log.f64 (cos.f64 phi1)) #s(literal 3 binary64)))) (+.f64 (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)) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))))
(+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (exp.f64 (.f64 (log.f64 (cos.f64 phi1)) #s(literal 3 binary64))))
(exp.f64 (*.f64 (log.f64 (cos.f64 phi1)) #s(literal 3 binary64)))
(*.f64 (log.f64 (cos.f64 phi1)) #s(literal 3 binary64))
(log.f64 (cos.f64 phi1))
(+.f64 (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)) (.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 (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 (+.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))) (+.f64 (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)) (.f64 #s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 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))) (+.f64 (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)) (.f64 #s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1))))))
(/.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))) (+.f64 (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)) (.f64 #s(approx ( (cos (- lambda1 lambda2)) (cos phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1)))))
(+.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)))
(pow.f64 (cos.f64 phi1) #s(literal 3 binary64))
(+.f64 (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)) (.f64 #s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1))))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 #s(approx ( (cos (- lambda1 lambda2)) (cos phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1)))
(.f64 #s(approx ( (cos (- lambda1 lambda2)) (cos phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 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 (.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)))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 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 (.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 (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 (.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 (.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 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (.f64 (-.f64 (cos.f64 phi1) (.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 (-.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)))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (.f64 (-.f64 (cos.f64 phi1) (.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 (-.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))))))
(/.f64 (-.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 (cos.f64 phi1) (.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 (-.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)))))
(-.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 (cos.f64 phi1) (.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 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(.f64 (-.f64 (cos.f64 phi1) (.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 (-.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))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))
(.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))
(cos.f64 (*.f64 #s(literal 2 binary64) phi1))
(*.f64 #s(literal 2 binary64) phi1)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (exp.f64 (.f64 (log.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #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)) (exp.f64 (.f64 (log.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #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)) (exp.f64 (.f64 (log.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #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)) (exp.f64 (.f64 (log.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64))))
(exp.f64 (.f64 (log.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64)))
(.f64 (log.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64))
(log.f64 (*.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 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) #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 (pow.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)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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 (-.f64 (pow.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) #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 (pow.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)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(/.f64 (/.f64 (-.f64 (pow.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) #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 (pow.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)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (-.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 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) #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 (pow.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)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))))))
(-.f64 (pow.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) #s(literal 3 binary64)))
(pow.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #s(literal 3 binary64))
(pow.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) #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 (pow.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)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)))))
(fma.f64 (pow.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)) (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)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.f64 #s(approx (- (pow lambda1 3) (pow lambda2 3)) (.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64)))) (fma.f64 lambda1 lambda1 (fma.f64 lambda2 lambda2 (.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 #s(approx (- (pow lambda1 3) (pow lambda2 3)) (.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64)))) (fma.f64 lambda1 lambda1 (fma.f64 lambda2 lambda2 (.f64 lambda1 lambda2)))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 (cos.f64 phi2) (sin.f64 (/.f64 #s(approx (- (pow lambda1 3) (pow lambda2 3)) (.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64)))) (fma.f64 lambda1 lambda1 (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda2))))))
(sin.f64 (/.f64 #s(approx (- (pow lambda1 3) (pow lambda2 3)) (.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64)))) (fma.f64 lambda1 lambda1 (fma.f64 lambda2 lambda2 (.f64 lambda1 lambda2)))))
(/.f64 #s(approx (- (pow lambda1 3) (pow lambda2 3)) (.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64)))) (fma.f64 lambda1 lambda1 (fma.f64 lambda2 lambda2 (.f64 lambda1 lambda2))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) (*.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64))))
(*.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64)))
(pow.f64 lambda2 #s(literal 3 binary64))
(fma.f64 lambda1 lambda1 (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda2)))
(fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda2))
(*.f64 lambda1 lambda2)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.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)))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.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)))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))
(.f64 (cos.f64 phi2) (sin.f64 (/.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))))))
(sin.f64 (/.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 (-.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 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))
(pow.f64 lambda1 #s(literal 3 binary64))
(+.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)))))))
(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))))
(-.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(*.f64 (cos.f64 lambda1) (sin.f64 lambda2))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 (+.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (sin.f64 (+.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (sin.f64 (+.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)))
(+.f64 lambda1 (atan2.f64 (.f64 (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) #s(literal 1 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) #s(literal 1 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) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2)))
(/.f64 (+.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)) (pow.f64 lambda1 #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))))
(+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))
(pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 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 (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 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) 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 2 binary64))
(-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(.f64 (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(/.f64 (-.f64 (.f64 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 2 binary64))) #s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.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))))))
(-.f64 (.f64 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 2 binary64)))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.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)))))
(.f64 lambda1 (+.f64 #s(literal 1 binary64) (.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))))
(+.f64 #s(literal 1 binary64) (.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)))
(.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))
(/.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)
(/.f64 (-.f64 (.f64 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 2 binary64))) (-.f64 lambda1 (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 lambda1 (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (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))) lambda1) 1) 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))) lambda1) 1) 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))) lambda1) 1) #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))) lambda1) 1) #s(hole binary64 (/ (+ 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)))))) lambda1) #s(hole binary64 (/ (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)))))) lambda1) #s(hole binary64 (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)))
#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 (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) #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))) #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 (+ (* (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 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos phi2) (cos (neg lambda2))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* 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))) #s(hole binary64 (+ (cos phi1) (cos (neg lambda2)))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos phi1) (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos phi1) (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos phi1) (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))))))
#s(approx (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) lambda1) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) lambda1) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) #s(hole binary64 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))) lambda1)))
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) #s(hole binary64 (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))) lambda1)))
#s(approx (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) #s(hole binary64 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))) lambda1)))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (* -1 lambda2))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (* -1 lambda2))))) (* (cos phi2) (cos (* -1 lambda2)))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (* -1 lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (* -1 lambda2))))))) (* (cos phi2) (cos (* -1 lambda2)))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (* -1 lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (* -1 lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (* -1 lambda2))))))))) (* (cos phi2) (cos (* -1 lambda2)))))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (cos (* -1 lambda2))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (cos (* -1 lambda2)) (* -1 (* lambda1 (sin (* -1 lambda2)))))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (cos (* -1 lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (* -1 lambda2)))) (sin (* -1 lambda2)))))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (cos (* -1 lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (* -1 lambda2))) (* 1/6 (* lambda1 (sin (* -1 lambda2)))))) (sin (* -1 lambda2)))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* -1 lambda2)))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* -1 (* 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))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/2 (* 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))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* 1/6 (* 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))))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (+ (* 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 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1/2 (pow phi1 2)) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1/2 (pow phi1 2)) (+ (* 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 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (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)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* 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)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/2 (* 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)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* 1/6 (* 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)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (* -1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (* -1 lambda2))))) (* (cos phi2) (cos (* -1 lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (* -1 lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (* -1 lambda2))))))) (* (cos phi2) (cos (* -1 lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (* -1 lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (* -1 lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (* -1 lambda2))))))))) (* (cos phi2) (cos (* -1 lambda2)))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (cos (* -1 lambda2)))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi2) (sin (* -1 lambda2))))) (* (cos phi2) (cos (* -1 lambda2))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (* -1 lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (* -1 lambda2))))))) (* (cos phi2) (cos (* -1 lambda2))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (* -1 lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (* -1 lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (* -1 lambda2))))))))) (* (cos phi2) (cos (* -1 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* -1 (* lambda1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* 1/6 (* lambda1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* 1/6 (* lambda1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* 1/2 (+ (sin (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2)) (sin (- (+ lambda2 (+ phi2 (* 1/2 (PI)))) lambda1))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* 1/2 (+ (sin (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2)) (sin (- (+ lambda2 (+ phi2 (* 1/2 (PI)))) lambda1)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* 1/2 (+ (sin (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2)) (sin (- (+ lambda2 (+ phi2 (* 1/2 (PI)))) lambda1))))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (cos phi1) (* 1/2 (+ (sin (+ lambda2 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (cos phi1) (+ (* 1/2 (* lambda1 (+ (cos (- (+ phi2 (* 1/2 (PI))) lambda2)) (* -1 (cos (+ lambda2 (+ phi2 (* 1/2 (PI))))))))) (* 1/2 (+ (sin (+ lambda2 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) lambda2))))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (cos phi1) (+ (* 1/2 (+ (sin (+ lambda2 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))) (* lambda1 (+ (* 1/2 (* lambda1 (+ (* -1/2 (sin (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* -1/2 (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))))) (* 1/2 (+ (cos (- (+ phi2 (* 1/2 (PI))) lambda2)) (* -1 (cos (+ lambda2 (+ phi2 (* 1/2 (PI))))))))))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (cos phi1) (+ (* 1/2 (+ (sin (+ lambda2 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))) (* lambda1 (+ (* 1/2 (+ (cos (- (+ phi2 (* 1/2 (PI))) lambda2)) (* -1 (cos (+ lambda2 (+ phi2 (* 1/2 (PI)))))))) (* lambda1 (+ (* 1/2 (* lambda1 (+ (* -1/6 (cos (- (+ phi2 (* 1/2 (PI))) lambda2))) (* 1/6 (cos (+ lambda2 (+ phi2 (* 1/2 (PI))))))))) (* 1/2 (+ (* -1/2 (sin (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* -1/2 (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))))))))))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) #s(hole binary64 (* 1/2 (+ (sin (+ lambda2 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) lambda2))))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) #s(hole binary64 (+ (* 1/2 (* lambda1 (+ (cos (- (+ phi2 (* 1/2 (PI))) lambda2)) (* -1 (cos (+ lambda2 (+ phi2 (* 1/2 (PI))))))))) (* 1/2 (+ (sin (+ lambda2 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) #s(hole binary64 (+ (* 1/2 (+ (sin (+ lambda2 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))) (* lambda1 (+ (* 1/2 (* lambda1 (+ (* -1/2 (sin (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* -1/2 (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))))) (* 1/2 (+ (cos (- (+ phi2 (* 1/2 (PI))) lambda2)) (* -1 (cos (+ lambda2 (+ phi2 (* 1/2 (PI)))))))))))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) #s(hole binary64 (+ (* 1/2 (+ (sin (+ lambda2 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))) (* lambda1 (+ (* 1/2 (+ (cos (- (+ phi2 (* 1/2 (PI))) lambda2)) (* -1 (cos (+ lambda2 (+ phi2 (* 1/2 (PI)))))))) (* lambda1 (+ (* 1/2 (* lambda1 (+ (* -1/6 (cos (- (+ phi2 (* 1/2 (PI))) lambda2))) (* 1/6 (cos (+ lambda2 (+ phi2 (* 1/2 (PI))))))))) (* 1/2 (+ (* -1/2 (sin (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* -1/2 (sin (- (+ phi2 (* 1/2 (PI))) lambda2))))))))))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (+ lambda2 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (+ lambda2 (+ phi2 (* 1/2 (PI))))) (+ (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (* lambda1 (+ (cos (- (+ phi2 (* 1/2 (PI))) lambda2)) (* -1 (cos (+ lambda2 (+ phi2 (* 1/2 (PI))))))))))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (+ lambda2 (+ phi2 (* 1/2 (PI))))) (+ (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (* lambda1 (+ (cos (- (+ phi2 (* 1/2 (PI))) lambda2)) (+ (* -1 (cos (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* lambda1 (+ (* -1/2 (sin (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* -1/2 (sin (- (+ phi2 (* 1/2 (PI))) lambda2))))))))))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (+ lambda2 (+ phi2 (* 1/2 (PI))))) (+ (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (* lambda1 (+ (cos (- (+ phi2 (* 1/2 (PI))) lambda2)) (+ (* -1 (cos (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* lambda1 (+ (* -1/2 (sin (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (+ (* -1/2 (sin (- (+ phi2 (* 1/2 (PI))) lambda2))) (* lambda1 (+ (* -1/6 (cos (- (+ phi2 (* 1/2 (PI))) lambda2))) (* 1/6 (cos (+ lambda2 (+ phi2 (* 1/2 (PI))))))))))))))))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (sin (+ lambda2 (+ phi2 (* 1/2 (PI)))))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (+ (sin (+ lambda2 (+ phi2 (* 1/2 (PI))))) (* -1 (* lambda1 (cos (+ lambda2 (+ phi2 (* 1/2 (PI))))))))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (+ (sin (+ lambda2 (+ phi2 (* 1/2 (PI))))) (* lambda1 (+ (* -1 (cos (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* -1/2 (* lambda1 (sin (+ lambda2 (+ phi2 (* 1/2 (PI))))))))))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (+ (sin (+ lambda2 (+ phi2 (* 1/2 (PI))))) (* lambda1 (+ (* -1 (cos (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* lambda1 (+ (* -1/2 (sin (+ lambda2 (+ phi2 (* 1/2 (PI)))))) (* 1/6 (* lambda1 (cos (+ lambda2 (+ phi2 (* 1/2 (PI))))))))))))))
#s(approx (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (+ lambda2 (+ phi2 (* 1/2 (PI))))))
#s(approx (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (+ lambda2 (+ phi2 (+ (* -1 lambda1) (* 1/2 (PI)))))))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (sin (- (+ phi2 (* 1/2 (PI))) lambda2))))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (* lambda1 (cos (- (+ phi2 (* 1/2 (PI))) lambda2))))))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (* lambda1 (+ (cos (- (+ phi2 (* 1/2 (PI))) lambda2)) (* -1/2 (* lambda1 (sin (- (+ phi2 (* 1/2 (PI))) lambda2)))))))))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- (+ phi2 (* 1/2 (PI))) lambda2)) (* lambda1 (+ (cos (- (+ phi2 (* 1/2 (PI))) lambda2)) (* lambda1 (+ (* -1/2 (sin (- (+ phi2 (* 1/2 (PI))) lambda2))) (* -1/6 (* lambda1 (cos (- (+ phi2 (* 1/2 (PI))) lambda2)))))))))))
#s(approx (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (- (+ phi2 (* 1/2 (PI))) lambda2)))
#s(approx (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2)))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (neg lambda2)) (* -1/2 (* (pow phi2 2) (sin (neg lambda2)))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (neg lambda2)) (+ (* -1/2 (* (pow phi2 2) (sin (neg lambda2)))) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* (pow phi2 2) (cos (neg lambda2))))))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (neg lambda2)) (+ (* -1/2 (* (pow phi2 2) (sin (neg lambda2)))) (* lambda1 (+ (cos (neg lambda2)) (+ (* -1/2 (* (pow phi2 2) (cos (neg lambda2)))) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* 1/4 (* (pow phi2 2) (sin (neg lambda2)))))))))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (neg lambda2)) (+ (* -1/2 (* (pow phi2 2) (sin (neg lambda2)))) (* lambda1 (+ (cos (neg lambda2)) (+ (* -1/2 (* (pow phi2 2) (cos (neg lambda2)))) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (+ (* 1/4 (* (pow phi2 2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/6 (cos (neg lambda2))) (* 1/12 (* (pow phi2 2) (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 lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (- (* lambda1 (cos lambda2)) (sin lambda2))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (* (cos lambda2) (cos phi2))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2)))))
#s(approx (* lambda1 (* (cos phi2) (neg (sin lambda2)))) #s(hole binary64 (* -1 (* lambda1 (* (cos phi2) (sin lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (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 (+ (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 (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 (* (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 (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 (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (- (* lambda1 (sin (+ lambda2 (* 1/2 (PI))))) (sin lambda2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (sin (* -1 lambda2)))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda1 (* (cos phi2) (cos (* -1 lambda2)))) (* (cos phi2) (sin (* -1 lambda2))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (* -1 lambda2))))) (* (cos phi2) (cos (* -1 lambda2))))) (* (cos phi2) (sin (* -1 lambda2))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (* -1 lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (* -1 lambda2))))))) (* (cos phi2) (cos (* -1 lambda2))))) (* (cos phi2) (sin (* -1 lambda2))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (sin (* -1 lambda2))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (sin (* -1 lambda2)) (* lambda1 (cos (* -1 lambda2))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (sin (* -1 lambda2)) (* lambda1 (+ (cos (* -1 lambda2)) (* -1/2 (* lambda1 (sin (* -1 lambda2)))))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (sin (* -1 lambda2)) (* lambda1 (+ (cos (* -1 lambda2)) (* lambda1 (+ (* -1/2 (sin (* -1 lambda2))) (* -1/6 (* lambda1 (cos (* -1 lambda2)))))))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (cos (neg lambda2))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* 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)) 1) #s(hole binary64 (+ 1 (+ (* 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 (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) #s(hole binary64 (- (* lambda1 (cos lambda2)) (sin lambda2))))
#s(approx (* lambda1 (cos lambda2)) #s(hole binary64 (* lambda1 (cos lambda2))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (cos lambda2)))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (neg lambda1) #s(hole binary64 (* -1 lambda1)))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (cos lambda2)))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (sin lambda2)))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
#s(approx (* (* (cos lambda2) lambda1) -1/2) #s(hole binary64 (* -1/2 (* lambda1 (cos lambda2)))))
#s(approx (* (cos lambda2) lambda1) #s(hole binary64 (* lambda1 (cos lambda2))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (cos lambda2)))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))))))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (sin lambda2)))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ (sin lambda2) (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))))))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) #s(hole binary64 (* -1/2 (* lambda1 (cos lambda2)))))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) #s(hole binary64 (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2)))))))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) #s(hole binary64 (* -1/2 (cos lambda2))))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) #s(hole binary64 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))))
#s(approx (* 1/6 lambda1) #s(hole binary64 (* 1/6 lambda1)))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) #s(hole binary64 (- (* lambda1 (cos lambda2)) (sin lambda2))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) #s(hole binary64 (- (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))) (sin lambda2))))
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) #s(hole binary64 (* lambda1 (cos lambda2))))
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) #s(hole binary64 (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2)))))))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) #s(hole binary64 (cos lambda2)))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) #s(hole binary64 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))))
#s(approx (* -1/2 (* lambda1 (neg (sin lambda2)))) #s(hole binary64 (* 1/2 (* lambda1 (sin lambda2)))))
#s(approx (* lambda1 (neg (sin lambda2))) #s(hole binary64 (* -1 (* lambda1 (sin lambda2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) #s(hole binary64 (* -1 lambda2)))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) #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 (- (pow lambda2 -1) (pow lambda1 -1))) #s(hole binary64 -1))
#s(approx (* lambda1 (- (pow lambda2 -1) (pow lambda1 -1))) #s(hole binary64 (- (/ lambda1 lambda2) 1)))
#s(approx (- (pow lambda2 -1) (pow lambda1 -1)) #s(hole binary64 (/ -1 lambda1)))
#s(approx (- (pow lambda2 -1) (pow lambda1 -1)) #s(hole binary64 (/ (- (/ lambda1 lambda2) 1) lambda1)))
#s(approx (pow lambda1 -1) #s(hole binary64 (/ 1 lambda1)))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* -1 lambda2)))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 -1))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (- (/ lambda1 lambda2) 1)))
#s(approx (- (pow (/ lambda1 lambda2) 3) 1) #s(hole binary64 -1))
#s(approx (- (pow (/ lambda1 lambda2) 3) 1) #s(hole binary64 (- (/ (pow lambda1 3) (pow lambda2 3)) 1)))
#s(approx (pow (/ lambda1 lambda2) 3) #s(hole binary64 (/ (pow lambda1 3) (pow lambda2 3))))
#s(approx (/ lambda1 lambda2) #s(hole binary64 (/ lambda1 lambda2)))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) #s(hole binary64 1))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) #s(hole binary64 (+ 1 (/ lambda1 lambda2))))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) #s(hole binary64 (+ 1 (* lambda1 (+ (/ 1 lambda2) (/ lambda1 (pow lambda2 2)))))))
#s(approx (+ 1 (* (/ lambda1 lambda2) 1)) #s(hole binary64 1))
#s(approx (+ 1 (* (/ lambda1 lambda2) 1)) #s(hole binary64 (+ 1 (/ lambda1 lambda2))))
#s(approx (* (/ lambda1 lambda2) 1) #s(hole binary64 (/ lambda1 lambda2)))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (cos phi2))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* -1/2 (* (pow lambda1 2) (cos phi2)))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda1 2) (cos phi2)))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (cos phi2))) (* 1/24 (cos phi2))))))))))
#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 (+ 1 (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (cos (neg lambda2)))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))))))
#s(approx (+ 1 (* -1/2 (* lambda1 lambda1))) #s(hole binary64 1))
#s(approx (+ 1 (* -1/2 (* lambda1 lambda1))) #s(hole binary64 (+ 1 (* -1/2 (pow lambda1 2)))))
#s(approx (* -1/2 (* lambda1 lambda1)) #s(hole binary64 (* -1/2 (pow lambda1 2))))
#s(approx (* lambda1 lambda1) #s(hole binary64 (pow lambda1 2)))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) #s(hole binary64 1))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) #s(hole binary64 (+ 1 (* -1/2 (pow lambda1 2)))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) #s(hole binary64 (+ 1 (* (pow lambda1 2) (- (* 1/24 (pow lambda1 2)) 1/2)))))
#s(approx (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2)) #s(hole binary64 (* -1/2 (pow lambda1 2))))
#s(approx (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2)) #s(hole binary64 (* (pow lambda1 2) (- (* 1/24 (pow lambda1 2)) 1/2))))
#s(approx (- (* 1/24 (* lambda1 lambda1)) 1/2) #s(hole binary64 -1/2))
#s(approx (- (* 1/24 (* lambda1 lambda1)) 1/2) #s(hole binary64 (- (* 1/24 (pow lambda1 2)) 1/2)))
#s(approx (* 1/24 (* lambda1 lambda1)) #s(hole binary64 (* 1/24 (pow lambda1 2))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) #s(hole binary64 1))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) #s(hole binary64 (+ 1 (* -1/2 (pow lambda1 2)))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) #s(hole binary64 (+ 1 (* (pow lambda1 2) (- (* 1/24 (pow lambda1 2)) 1/2)))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) #s(hole binary64 (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/24 (* -1/720 (pow lambda1 2)))) 1/2)))))
#s(approx (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) #s(hole binary64 (* -1/2 (pow lambda1 2))))
#s(approx (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) #s(hole binary64 (* (pow lambda1 2) (- (* 1/24 (pow lambda1 2)) 1/2))))
#s(approx (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) #s(hole binary64 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/24 (* -1/720 (pow lambda1 2)))) 1/2))))
#s(approx (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) #s(hole binary64 -1/2))
#s(approx (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) #s(hole binary64 (- (* 1/24 (pow lambda1 2)) 1/2)))
#s(approx (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) #s(hole binary64 (- (* (pow lambda1 2) (+ 1/24 (* -1/720 (pow lambda1 2)))) 1/2)))
#s(approx (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) #s(hole binary64 (* 1/24 (pow lambda1 2))))
#s(approx (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) #s(hole binary64 (* (pow lambda1 2) (+ 1/24 (* -1/720 (pow lambda1 2))))))
#s(approx (+ 1/24 (* -1/720 (* lambda1 lambda1))) #s(hole binary64 1/24))
#s(approx (+ 1/24 (* -1/720 (* lambda1 lambda1))) #s(hole binary64 (+ 1/24 (* -1/720 (pow lambda1 2)))))
#s(approx (* -1/720 (* lambda1 lambda1)) #s(hole binary64 (* -1/720 (pow lambda1 2))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (cos (* -1 lambda2))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* -1 (* lambda1 (* (cos phi2) (sin (* -1 lambda2))))) (* (cos phi2) (cos (* -1 lambda2)))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (* -1 lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (* -1 lambda2))))))) (* (cos phi2) (cos (* -1 lambda2)))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (* -1 lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (* -1 lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (* -1 lambda2))))))))) (* (cos phi2) (cos (* -1 lambda2)))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (sin (- (* 1/2 (PI)) lambda2))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda1 (* (cos phi2) (cos (- (* 1/2 (PI)) lambda2)))) (* (cos phi2) (sin (- (* 1/2 (PI)) lambda2)))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (- (* 1/2 (PI)) lambda2))))) (* (cos phi2) (cos (- (* 1/2 (PI)) lambda2))))) (* (cos phi2) (sin (- (* 1/2 (PI)) lambda2)))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (- (* 1/2 (PI)) lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (- (* 1/2 (PI)) lambda2))))))) (* (cos phi2) (cos (- (* 1/2 (PI)) lambda2))))) (* (cos phi2) (sin (- (* 1/2 (PI)) lambda2)))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) lambda2))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) lambda2)) (* lambda1 (cos (- (* 1/2 (PI)) lambda2))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) lambda2)) (* lambda1 (+ (cos (- (* 1/2 (PI)) lambda2)) (* -1/2 (* lambda1 (sin (- (* 1/2 (PI)) lambda2)))))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) lambda2)) (* lambda1 (+ (cos (- (* 1/2 (PI)) lambda2)) (* lambda1 (+ (* -1/2 (sin (- (* 1/2 (PI)) lambda2))) (* -1/6 (* lambda1 (cos (- (* 1/2 (PI)) lambda2)))))))))))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) #s(hole binary64 (- (* 1/2 (PI)) lambda2)))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) #s(hole binary64 (- (+ lambda1 (* 1/2 (PI))) lambda2)))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (* (cos (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (+ (* -1 (* 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))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/2 (* 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))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* 1/6 (* 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))))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (* (cos (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (* -1 (* 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)))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/2 (* 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)))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* 1/6 (* 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)))))))
#s(approx (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos (neg lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos (neg lambda2)) (+ (* -1 (* lambda1 (sin (neg lambda2)))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos (neg lambda2)) (+ (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos (neg lambda2)) (+ (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (/ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (/ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (/ (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda1 (- (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* lambda1 (- (+ (* 1/2 (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (+ (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* lambda1 (- (+ (* 1/2 (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* lambda1 (- (+ (* -1/6 (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (+ (* 1/2 (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (* -1/2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (+ (* -1/6 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (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)))))))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (+ (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (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 (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (/ (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (- (+ (* lambda1 (- (* 2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ 1 (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* 2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* lambda1 (- (* -1 (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* 2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ 1 (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* 2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* lambda1 (- (+ (* -1 (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- 1 (* (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))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (+ (* -1/6 (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda2)) (- (* 2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (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))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* 2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* 2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ 1 (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- (+ 1 (* 2 (* lambda1 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- (+ 1 (* 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 phi2) 2) (pow (cos (neg lambda2)) 2)))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- (+ 1 (* 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 phi2) 2) (pow (cos (neg lambda2)) 2)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) #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 (* (cos phi2) (cos (- lambda1 lambda2))) 2) #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 (* (cos phi2) (cos (- lambda1 lambda2))) 2) #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 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- 1 (* (cos phi2) (cos (neg lambda2))))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* lambda1 (- (* 1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* 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) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2)) (- (cos phi1) (cos (neg lambda2))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda1 (- (* 2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (sin (neg lambda2)) (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos (neg lambda2))))) (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2)))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* 2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (* lambda1 (- (* -1 (/ (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (cos (neg lambda2))))) (+ (* 1/2 (/ (* (cos (neg lambda2)) (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2))) (/ (* (sin (neg lambda2)) (- (* 2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (sin (neg lambda2)) (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (- (cos phi1) (cos (neg lambda2)))))))) (/ (* (sin (neg lambda2)) (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos (neg lambda2))))) (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2)))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* 2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (* lambda1 (- (+ (* -1 (/ (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (cos (neg lambda2))))) (* lambda1 (- (* -1 (/ (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (cos (neg lambda2))))) (+ (* -1/6 (/ (* (sin (neg lambda2)) (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2))) (+ (* 1/2 (/ (* (cos (neg lambda2)) (- (* 2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (sin (neg lambda2)) (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (sin (neg lambda2)) (- (* -1 (/ (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (cos (neg lambda2))))) (+ (* 1/2 (/ (* (cos (neg lambda2)) (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2))) (/ (* (sin (neg lambda2)) (- (* 2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (sin (neg lambda2)) (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (- (cos phi1) (cos (neg lambda2))))))) (- (cos phi1) (cos (neg lambda2))))))))) (+ (* 1/2 (/ (* (cos (neg lambda2)) (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2))) (/ (* (sin (neg lambda2)) (- (* 2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (sin (neg lambda2)) (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (- (cos phi1) (cos (neg lambda2)))))))) (/ (* (sin (neg lambda2)) (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos (neg lambda2))))) (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2)))))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ (* 2 (* lambda1 (* (cos (neg lambda2)) (sin (neg lambda2))))) (pow (cos phi1) 2)) (pow (cos (neg lambda2)) 2))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* -2 (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (cos phi1) 2)) (pow (cos (neg lambda2)) 2))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* -2 (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (cos phi1) 2)) (pow (cos (neg lambda2)) 2))))
#s(approx (pow (cos (- lambda1 lambda2)) 2) #s(hole binary64 (pow (cos (neg lambda2)) 2)))
#s(approx (pow (cos (- lambda1 lambda2)) 2) #s(hole binary64 (+ (* -2 (* lambda1 (* (cos (neg lambda2)) (sin (neg lambda2))))) (pow (cos (neg lambda2)) 2))))
#s(approx (pow (cos (- lambda1 lambda2)) 2) #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 (pow (cos (- lambda1 lambda2)) 2) #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 phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (cos phi1) (cos (neg lambda2)))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ (cos phi1) (* lambda1 (sin (neg lambda2)))) (cos (neg lambda2)))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ (cos phi1) (* lambda1 (+ (sin (neg lambda2)) (* 1/2 (* lambda1 (cos (neg lambda2))))))) (cos (neg lambda2)))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ (cos phi1) (* lambda1 (+ (sin (neg lambda2)) (* lambda1 (- (* -1/6 (* lambda1 (sin (neg lambda2)))) (* -1/2 (cos (neg lambda2)))))))) (cos (neg lambda2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (/ (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #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)))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #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)))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (+ (/ (* (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* -1/2 (* (cos phi2) (cos (neg lambda2)))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)) (/ (* (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (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)))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (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)))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #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))))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (+ (/ (* (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* 1/6 (* (cos phi2) (sin (neg lambda2)))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)) (+ (/ (* (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (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)))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (+ (/ (* (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* -1/2 (* (cos phi2) (cos (neg lambda2)))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)) (/ (* (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (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)))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (- (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* -1/2 (* (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)))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (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)))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))))) (+ (/ (* (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* -1/2 (* (cos phi2) (cos (neg lambda2)))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)) (/ (* (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (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)))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (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)))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) #s(hole binary64 (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) #s(hole binary64 (+ 1 (+ (* 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))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) #s(hole binary64 (+ 1 (+ (* 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))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) #s(hole binary64 (+ 1 (+ (* 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))))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3) #s(hole binary64 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 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)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 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)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 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)))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* lambda1 (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* 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 phi2) (cos (neg lambda2))))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* 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 phi2) (sin (neg lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* -1/2 (* (cos phi2) (cos (neg lambda2))))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (+ (* -2 (* lambda1 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (+ (* 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 (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (+ (* 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 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (neg lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (neg lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (neg lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (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 phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (neg lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (/ (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))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (/ (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))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (/ (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (/ (* (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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 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) (- (* -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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) 2)) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) 3))) (+ (/ (* (- (* -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) (- (* -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 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)) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 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))))))) (/ (* (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 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) (- (* -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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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)))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) 2)) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (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) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (* (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (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)))))))) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) 3))) (+ (/ (* (- (* -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)))))) (+ (/ (* (- (* -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) (- (* -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) (* (pow (cos (neg lambda2)) 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))))) (- (+ (* (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) (- (* -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 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)) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 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))))))))) (/ (* (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))))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) 2)) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) 3))) (+ (/ (* (- (* -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) (- (* -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 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)) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 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))))))) (/ (* (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 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) (- (* -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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* -1 (/ (* lambda1 (* (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 phi1) 3) (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) 2)) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (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))))) (/ (* (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 phi1) 3) (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (/ (* (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) 2)) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (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) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (* (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (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)))))))) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) 2)) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (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))))) (/ (* (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 phi1) 3) (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* lambda1 (- (* -1 (/ (* (cos phi2) (sin (neg lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))) (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* lambda1 (- (+ (* -1 (/ (* (cos phi2) (sin (neg lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))) (* lambda1 (- (* -1/2 (/ (* (cos phi2) (cos (neg lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2))))) (- (* -1 (/ (* (cos phi2) (sin (neg lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))) (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* lambda1 (- (+ (* -1 (/ (* (cos phi2) (sin (neg lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))) (* lambda1 (- (+ (* -1/2 (/ (* (cos phi2) (cos (neg lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))) (* lambda1 (- (* 1/6 (/ (* (cos phi2) (sin (neg lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2))))) (- (* -1/2 (/ (* (cos phi2) (cos (neg lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2))))) (- (* -1 (/ (* (cos phi2) (sin (neg lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))) (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (+ (/ (* (- (* -1 (/ (* (cos phi2) (sin (neg lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))) (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)))) (- (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* -1/2 (* (cos phi2) (cos (neg lambda2)))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))))))) (+ (/ (* (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2))))) (- (* -1 (/ (* (cos phi2) (sin (neg lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))) (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (* (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))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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) (- (* -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)))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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)))))) (+ (/ (* (- (* -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) (- (* -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) (* (pow (cos (neg lambda2)) 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))))) (/ (* (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) (- (* -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)))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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)))))) (+ (/ (* (- (* -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)))))) (+ (/ (* (- (* -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) (- (* -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) (* (pow (cos (neg lambda2)) 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))))) (- (+ (* (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) (- (* -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) (* (pow (cos (neg lambda2)) 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)))))) (/ (* (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))))))) (+ (/ (* (- (* -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) (- (* -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) (* (pow (cos (neg lambda2)) 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))))) (/ (* (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) (- (* -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)))))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) #s(hole binary64 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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)))))
#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 phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (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))) (* -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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (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))))) (* 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 (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #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))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (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))) (* -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))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (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))))) (* 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))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 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 (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #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 (+ (sin lambda2) (/ (cos lambda2) lambda1))) #s(hole binary64 (cos lambda2)))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) #s(hole binary64 (/ (cos lambda2) lambda1)))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) #s(hole binary64 (/ (+ (cos lambda2) (* lambda1 (sin lambda2))) lambda1)))
#s(approx (/ (cos lambda2) lambda1) #s(hole binary64 (/ (cos lambda2) lambda1)))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) #s(hole binary64 (cos lambda2)))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) #s(hole binary64 (/ (cos lambda2) (pow lambda1 2))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) #s(hole binary64 (/ (+ (cos lambda2) (* lambda1 (sin lambda2))) (pow lambda1 2))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) #s(hole binary64 (/ (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))) (pow lambda1 2))))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) #s(hole binary64 (* -1 (/ (cos lambda2) (pow lambda1 2)))))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) #s(hole binary64 (/ (+ (* -1 (cos lambda2)) (* -1 (* lambda1 (sin lambda2)))) (pow lambda1 2))))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) #s(hole binary64 (* -1 (/ (cos lambda2) lambda1))))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) #s(hole binary64 (/ (+ (* -1 (cos lambda2)) (* -1 (* lambda1 (sin lambda2)))) lambda1)))
#s(approx (* -1 (/ (cos lambda2) lambda1)) #s(hole binary64 (* -1 (/ (cos lambda2) lambda1))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* -1 (* lambda1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* 1/6 (* lambda1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))))) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* 1/6 (* lambda1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))))) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* (cos phi2) (cos (neg lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (+ (* (cos phi2) (cos (neg lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (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))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (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))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* -1 (/ (* lambda1 (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (* -1/2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (* -1/6 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- 1 (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* -1 (/ (* lambda1 (* (cos phi2) (sin (neg lambda2)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (/ (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 3))) (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (/ (* (cos phi2) (sin (neg lambda2))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ 1 (- 1 (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -1 (/ (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 3))) (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (+ (* -1/2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 3))) (* -1/6 (/ (* (cos phi2) (sin (neg lambda2))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (+ (* -1 (/ (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 3))) (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (/ (* (cos phi2) (sin (neg lambda2))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ 1 (- 1 (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (+ (* 1/2 (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (+ (* lambda1 (- (/ (* (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 (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (+ (* 1/2 (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (* 1/2 (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- (cos phi1) (* (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 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (- (* -2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2)))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (- (+ (* -2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (* lambda1 (- (+ (* -1 (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2))))) (/ (pow (sin (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2))))) (+ (* 1/2 (/ (pow (cos (neg lambda2)) 3) (pow (- (cos phi1) (cos (neg lambda2))) 2))) (/ (* (sin (neg lambda2)) (- (* -2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (- (cos phi1) (cos (neg lambda2)))))))) (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2)))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (- (+ (* -2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (* lambda1 (- (+ (* -1 (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2))))) (+ (* lambda1 (- (+ (* 1/3 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (+ (* -1/6 (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (pow (- (cos phi1) (cos (neg lambda2))) 2))) (+ (* 1/2 (/ (* (cos (neg lambda2)) (- (* -2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (sin (neg lambda2)) (- (+ (* -1 (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2))))) (/ (pow (sin (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2))))) (+ (* 1/2 (/ (pow (cos (neg lambda2)) 3) (pow (- (cos phi1) (cos (neg lambda2))) 2))) (/ (* (sin (neg lambda2)) (- (* -2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (- (cos phi1) (cos (neg lambda2))))))) (- (cos phi1) (cos (neg lambda2)))))))) (/ (pow (sin (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2)))))) (+ (* 1/2 (/ (pow (cos (neg lambda2)) 3) (pow (- (cos phi1) (cos (neg lambda2))) 2))) (/ (* (sin (neg lambda2)) (- (* -2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (- (cos phi1) (cos (neg lambda2)))))))) (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) #s(hole binary64 (+ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (pow (cos phi1) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (pow (cos phi1) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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))) (- (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (/ (- (* (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))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda1 (- (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (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))))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* lambda1 (- (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (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))))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (/ (* (+ (* (cos phi2) (* (cos (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (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)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 4)) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (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))))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* lambda1 (- (+ (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (* lambda1 (- (* -1/6 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (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))))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (/ (* (+ (* (cos phi2) (* (cos (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (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)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 4)) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (/ (* (+ (* -1/3 (* (cos phi2) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (- (* (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)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 4)) (+ (/ (* (+ (* (cos phi2) (* (cos (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (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))))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/6 (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))))) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (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))))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (/ (* (+ (* (cos phi2) (* (cos (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (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)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 4)) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (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))))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ (* lambda1 (- (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* lambda1 (- (* 1/2 (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))) (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* lambda1 (- (+ (* 1/2 (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2))))) (* lambda1 (- (* -1/6 (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2))))) (* (pow (cos phi2) 2) (+ (* -1 (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/6 (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))) (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda1 (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2))))) (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda1 (+ (* 1/2 (* lambda1 (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))))) (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))))) (* 1/2 (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2))))))) (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))))) (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* -1 (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/6 (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* 2 (* lambda1 (* (cos phi2) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda1 (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* lambda1 (+ (* (cos phi2) (* (cos (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda1 (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* lambda1 (+ (* lambda1 (+ (* -1/3 (* (cos phi2) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (+ (* (cos phi2) (* (cos (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (* lambda1 (- (* 2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))) (* 1/2 (/ 1 (- (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 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (* 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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))) (* 1/2 (/ 1 (- (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 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (* 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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))) (* 1/2 (/ 1 (- (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 (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* 2 (* lambda1 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* 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 phi2) 2) (pow (cos (neg lambda2)) 2)))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* 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 phi2) 2) (pow (cos (neg lambda2)) 2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #s(hole binary64 (- (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))))
#s(approx (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #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 (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #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 (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #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 (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #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 (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (* 2 (log (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (+ (* -2 (/ (* lambda1 (sin (neg lambda2))) (cos (neg lambda2)))) (* 2 (log (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (+ (* 2 (log (* (cos phi2) (cos (neg lambda2))))) (* lambda1 (+ (* -2 (/ (sin (neg lambda2)) (cos (neg lambda2)))) (* lambda1 (- (* -1 (/ (pow (sin (neg lambda2)) 2) (pow (cos (neg lambda2)) 2))) 1)))))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (+ (* 2 (log (* (cos phi2) (cos (neg lambda2))))) (* lambda1 (+ (* -2 (/ (sin (neg lambda2)) (cos (neg lambda2)))) (* lambda1 (- (+ (* -1 (/ (pow (sin (neg lambda2)) 2) (pow (cos (neg lambda2)) 2))) (* 1/3 (* lambda1 (+ (* -3 (/ (sin (neg lambda2)) (cos (neg lambda2)))) (+ (* -2 (/ (pow (sin (neg lambda2)) 3) (pow (cos (neg lambda2)) 3))) (/ (sin (neg lambda2)) (cos (neg lambda2)))))))) 1)))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (log (* (cos phi2) (cos (neg lambda2))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (+ (log (* (cos phi2) (cos (neg lambda2)))) (* -1 (/ (* lambda1 (sin (neg lambda2))) (cos (neg lambda2)))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (+ (log (* (cos phi2) (cos (neg lambda2)))) (* lambda1 (+ (* -1 (/ (sin (neg lambda2)) (cos (neg lambda2)))) (* 1/2 (* lambda1 (- (* -1 (/ (pow (sin (neg lambda2)) 2) (pow (cos (neg lambda2)) 2))) 1))))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (+ (log (* (cos phi2) (cos (neg lambda2)))) (* lambda1 (+ (* -1 (/ (sin (neg lambda2)) (cos (neg lambda2)))) (* lambda1 (+ (* 1/6 (* lambda1 (+ (* -3 (/ (sin (neg lambda2)) (cos (neg lambda2)))) (+ (* -2 (/ (pow (sin (neg lambda2)) 3) (pow (cos (neg lambda2)) 3))) (/ (sin (neg lambda2)) (cos (neg lambda2))))))) (* 1/2 (- (* -1 (/ (pow (sin (neg lambda2)) 2) (pow (cos (neg lambda2)) 2))) 1)))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* lambda1 (- (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ (pow (cos phi1) 6) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* lambda1 (- (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4)))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (- (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ (pow (cos phi1) 6) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* lambda1 (- (+ (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* lambda1 (- (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -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))))))) (* 2 (* (pow (cos (neg lambda2)) 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 phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4)))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4)))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (- (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (- (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4)))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (- (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4)))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (- (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ (pow (cos phi1) 6) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) #s(hole binary64 (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) #s(hole binary64 (- (+ (* lambda1 (- (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (/ (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2)))) (/ (pow (cos phi1) 6) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (/ (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4)))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* lambda1 (- (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (+ (/ (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (/ (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2)))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4)))) (/ (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2)))))) (/ (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2)))) (/ (pow (cos phi1) 6) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (/ (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4)))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* lambda1 (- (+ (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* lambda1 (- (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -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))))))) (* 2 (* (pow (cos (neg lambda2)) 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 phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (+ (/ (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (+ (/ (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (/ (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2)))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4)))) (/ (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2))))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4)))) (+ (/ (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (/ (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2)))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4)))) (/ (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2))))))) (+ (/ (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (/ (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2)))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4)))) (/ (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2)))))) (/ (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2)))) (/ (pow (cos phi1) 6) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (/ (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4)))))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) #s(hole binary64 (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) #s(hole binary64 (- (+ (* -2 (* lambda1 (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))))) (pow (cos phi1) 6)) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) #s(hole binary64 (- (+ (* lambda1 (- (* -1 (* lambda1 (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))))) (* 2 (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))))) (pow (cos phi1) 6)) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) #s(hole binary64 (- (+ (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (* (pow (cos phi2) 6) (+ (* 2 (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -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))))))) (* 2 (* (pow (cos (neg lambda2)) 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) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))))) (* 2 (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))))) (pow (cos phi1) 6)) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))))
#s(approx (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) #s(hole binary64 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))
#s(approx (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) #s(hole binary64 (+ (* 2 (* lambda1 (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))))) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))))
#s(approx (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) #s(hole binary64 (+ (* lambda1 (+ (* 2 (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (* lambda1 (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))))) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))))
#s(approx (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) #s(hole binary64 (+ (* lambda1 (+ (* 2 (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 6) (+ (* 2 (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -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))))))) (* 2 (* (pow (cos (neg lambda2)) 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) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))))))) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) #s(hole binary64 (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4)))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) #s(hole binary64 (+ (* lambda1 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) #s(hole binary64 (+ (* lambda1 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (+ (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (* lambda1 (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) #s(hole binary64 (+ (* lambda1 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (+ (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (* lambda1 (+ (* lambda1 (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))))))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))))))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (+ (* lambda1 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (+ (* lambda1 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (+ (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (* lambda1 (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (+ (* lambda1 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (+ (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (* lambda1 (+ (* lambda1 (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))))))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))))))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* -2 (* lambda1 (* (pow (cos phi1) 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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* lambda1 (+ (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (* lambda1 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* lambda1 (+ (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (* -1 (pow lambda2 3))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (- (pow lambda1 3) (pow lambda2 3))))
#s(approx (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) #s(hole binary64 (* -1 (pow lambda2 3))))
#s(approx (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) #s(hole binary64 (+ (* -1 (pow lambda2 3)) (pow lambda1 3))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (pow lambda2 2)))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 lambda2) (pow lambda2 2))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ lambda1 lambda2)) (pow lambda2 2))))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) #s(hole binary64 (pow lambda2 2)))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) #s(hole binary64 (+ (* lambda1 lambda2) (pow lambda2 2))))
#s(approx (* lambda1 lambda2) #s(hole binary64 (* lambda1 lambda2)))
#s(approx (pow lambda1 3) #s(hole binary64 (pow lambda1 3)))
#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 (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 (* (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 (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (sin (+ phi2 (* 1/2 (PI)))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (sin (+ phi2 (* 1/2 (PI)))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (sin (+ phi2 (* 1/2 (PI)))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/6 (* lambda1 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) #s(hole binary64 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/6 (* lambda1 (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 3)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) #s(hole binary64 (+ (pow lambda1 3) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 3))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 3)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (+ (* -1 (* lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (+ (* lambda1 (- lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) #s(hole binary64 (* -1 (* lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) #s(hole binary64 (* lambda1 (- 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))) lambda1) #s(hole binary64 (* lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (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 (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) #s(hole binary64 (* -1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2))))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) #s(hole binary64 (- (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2))))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) #s(hole binary64 (* -1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) #s(hole binary64 (- lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) #s(hole binary64 (* -1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) #s(hole binary64 (+ lambda1 (* -1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) #s(hole binary64 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))))
#s(approx (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) #s(hole binary64 (/ (+ lambda1 (* -1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) lambda1)))
#s(approx (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) #s(hole binary64 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))))
#s(approx (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) #s(hole binary64 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#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))) lambda1) 1) lambda1) #s(hole binary64 lambda1))
#s(approx (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) 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))) lambda1) 1) #s(hole binary64 1))
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) #s(hole binary64 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))))
#s(approx (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1) #s(hole binary64 1))
#s(approx (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1) #s(hole binary64 (+ 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 (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (- lambda1 lambda2)))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos phi1) (cos (- lambda1 lambda2)))))
#s(approx (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) lambda1) #s(hole binary64 lambda1))
#s(approx (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) lambda1) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))) lambda1)))))
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) #s(hole binary64 1))
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) #s(hole binary64 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))) lambda1))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 lambda1))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* lambda1 (- (+ 1 (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda2 2)) (pow lambda1 2)))) (/ lambda2 lambda1)))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* lambda1 (- (+ 1 (/ (* lambda2 (+ (* -1 (pow lambda2 2)) (pow lambda2 2))) (pow lambda1 3))) (+ (* -1 (/ (pow lambda2 2) (pow lambda1 2))) (+ (/ lambda2 lambda1) (/ (pow lambda2 2) (pow lambda1 2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))) lambda1)))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))) lambda1)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) lambda1)))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* 1/2 (+ (sin (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2)) (sin (- (+ lambda2 (+ phi2 (* 1/2 (PI)))) lambda1)))))) lambda1)))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (cos phi1) (* 1/2 (+ (sin (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2)) (sin (- (+ lambda2 (+ phi2 (* 1/2 (PI)))) lambda1)))))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) #s(hole binary64 (* 1/2 (+ (sin (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2)) (sin (- (+ lambda2 (+ phi2 (* 1/2 (PI)))) lambda1))))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2)) (sin (- (+ lambda2 (+ phi2 (* 1/2 (PI)))) lambda1)))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (sin (- (+ lambda2 (+ phi2 (* 1/2 (PI)))) lambda1))))
#s(approx (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (* -1 lambda1)))
#s(approx (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (* lambda1 (- (+ (* 1/2 (/ (PI) lambda1)) (+ (/ lambda2 lambda1) (/ phi2 lambda1))) 1))))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (sin (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2))))
#s(approx (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 lambda1))
#s(approx (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (* lambda1 (- (+ 1 (+ (* 1/2 (/ (PI) lambda1)) (/ phi2 lambda1))) (/ lambda2 lambda1)))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- 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 lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (* lambda1 (cos lambda2))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (* lambda1 (+ (cos lambda2) (* -1 (/ (sin lambda2) lambda1))))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (* lambda1 (* (cos phi2) (sin lambda2)))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (* lambda1 (+ (* (cos phi2) (sin lambda2)) (/ (* (cos lambda2) (cos phi2)) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 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 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) 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 (cos lambda1) #s(hole binary64 (cos lambda1)))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* (sin lambda1) (sin lambda2))))
#s(approx (sin lambda1) #s(hole binary64 (sin lambda1)))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (* lambda1 (sin (+ lambda2 (* 1/2 (PI)))))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (* lambda1 (+ (sin (+ lambda2 (* 1/2 (PI)))) (* -1 (/ (sin lambda2) lambda1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) #s(hole binary64 (* lambda1 (cos lambda2))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) #s(hole binary64 (* lambda1 (+ (cos lambda2) (* -1 (/ (sin lambda2) lambda1))))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (* lambda1 (sin lambda2))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1)))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* -1/2 (* (pow lambda1 2) (cos lambda2)))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (/ (sin lambda2) lambda1)))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (+ (/ (cos lambda2) (pow lambda1 2)) (/ (sin lambda2) lambda1))))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (* -1/2 (* lambda1 (cos lambda2)))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (* lambda1 (+ (* -1/2 (cos lambda2)) (/ (sin lambda2) lambda1)))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* -1/6 (* (pow lambda1 3) (sin lambda2)))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* (pow lambda1 3) (+ (* -1/2 (/ (cos lambda2) lambda1)) (* -1/6 (sin lambda2))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* (pow lambda1 3) (+ (* -1/2 (/ (cos lambda2) lambda1)) (+ (* -1/6 (sin lambda2)) (/ (sin lambda2) (pow lambda1 2)))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* (pow lambda1 3) (+ (* -1/2 (/ (cos lambda2) lambda1)) (+ (* -1/6 (sin lambda2)) (+ (/ (cos lambda2) (pow lambda1 3)) (/ (sin lambda2) (pow lambda1 2))))))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (* -1/6 (* (pow lambda1 2) (sin lambda2)))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1/2 (/ (cos lambda2) lambda1)) (* -1/6 (sin lambda2))))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1/2 (/ (cos lambda2) lambda1)) (+ (* -1/6 (sin lambda2)) (/ (sin lambda2) (pow lambda1 2)))))))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) #s(hole binary64 (* -1/6 (* (pow lambda1 2) (sin lambda2)))))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) #s(hole binary64 (* (pow lambda1 2) (+ (* -1/2 (/ (cos lambda2) lambda1)) (* -1/6 (sin lambda2))))))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) #s(hole binary64 (* -1/6 (* lambda1 (sin lambda2)))))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) #s(hole binary64 (* lambda1 (+ (* -1/2 (/ (cos lambda2) lambda1)) (* -1/6 (sin lambda2))))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) #s(hole binary64 (* 1/2 (* (pow lambda1 2) (sin lambda2)))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) #s(hole binary64 (* (pow lambda1 2) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))))))
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) #s(hole binary64 (* 1/2 (* (pow lambda1 2) (sin lambda2)))))
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) #s(hole binary64 (* (pow lambda1 2) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) #s(hole binary64 (* 1/2 (* lambda1 (sin lambda2)))))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) #s(hole binary64 (* lambda1 (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) #s(hole binary64 lambda1))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) #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 (* lambda1 (- (pow lambda2 -1) (pow lambda1 -1))) #s(hole binary64 (/ lambda1 lambda2)))
#s(approx (* lambda1 (- (pow lambda2 -1) (pow lambda1 -1))) #s(hole binary64 (* lambda1 (- (/ 1 lambda2) (/ 1 lambda1)))))
#s(approx (- (pow lambda2 -1) (pow lambda1 -1)) #s(hole binary64 (/ 1 lambda2)))
#s(approx (- (pow lambda2 -1) (pow lambda1 -1)) #s(hole binary64 (- (/ 1 lambda2) (/ 1 lambda1))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 lambda1))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* lambda1 (- (+ 1 (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda2 2)) (pow lambda1 2)))) (/ lambda2 lambda1)))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* lambda1 (- (+ 1 (/ (* lambda2 (+ (* -1 (pow lambda2 2)) (pow lambda2 2))) (pow lambda1 3))) (+ (* -1 (/ (pow lambda2 2) (pow lambda1 2))) (+ (/ lambda2 lambda1) (/ (pow lambda2 2) (pow lambda1 2))))))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (/ lambda1 lambda2)))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (* lambda1 (- (/ 1 lambda2) (/ 1 lambda1)))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (* lambda1 (- (+ (* -1 (/ (+ lambda2 (* -1 lambda2)) (pow lambda1 2))) (/ 1 lambda2)) (/ 1 lambda1)))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (* lambda1 (- (+ (/ 1 lambda2) (/ (* lambda2 (+ lambda2 (* -1 lambda2))) (pow lambda1 3))) (+ (* -1 (/ lambda2 (pow lambda1 2))) (+ (/ 1 lambda1) (/ lambda2 (pow lambda1 2))))))))
#s(approx (- (pow (/ lambda1 lambda2) 3) 1) #s(hole binary64 (/ (pow lambda1 3) (pow lambda2 3))))
#s(approx (- (pow (/ lambda1 lambda2) 3) 1) #s(hole binary64 (* (pow lambda1 3) (- (/ 1 (pow lambda2 3)) (/ 1 (pow lambda1 3))))))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) #s(hole binary64 (/ (pow lambda1 2) (pow lambda2 2))))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) #s(hole binary64 (* (pow lambda1 2) (+ (/ 1 (* lambda1 lambda2)) (/ 1 (pow lambda2 2))))))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) #s(hole binary64 (* (pow lambda1 2) (+ (/ 1 (* lambda1 lambda2)) (+ (/ 1 (pow lambda1 2)) (/ 1 (pow lambda2 2)))))))
#s(approx (+ 1 (* (/ lambda1 lambda2) 1)) #s(hole binary64 (/ lambda1 lambda2)))
#s(approx (+ 1 (* (/ lambda1 lambda2) 1)) #s(hole binary64 (* lambda1 (+ (/ 1 lambda1) (/ 1 lambda2)))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (cos phi2)))))
#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 (+ 1 (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (cos (- lambda1 lambda2)))))
#s(approx (+ 1 (* -1/2 (* lambda1 lambda1))) #s(hole binary64 (* -1/2 (pow lambda1 2))))
#s(approx (+ 1 (* -1/2 (* lambda1 lambda1))) #s(hole binary64 (* (pow lambda1 2) (- (/ 1 (pow lambda1 2)) 1/2))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) #s(hole binary64 (* 1/24 (pow lambda1 4))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) #s(hole binary64 (* (pow lambda1 4) (- 1/24 (* 1/2 (/ 1 (pow lambda1 2)))))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) #s(hole binary64 (* (pow lambda1 4) (- (+ 1/24 (/ 1 (pow lambda1 4))) (* 1/2 (/ 1 (pow lambda1 2)))))))
#s(approx (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2)) #s(hole binary64 (* 1/24 (pow lambda1 4))))
#s(approx (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2)) #s(hole binary64 (* (pow lambda1 4) (- 1/24 (* 1/2 (/ 1 (pow lambda1 2)))))))
#s(approx (- (* 1/24 (* lambda1 lambda1)) 1/2) #s(hole binary64 (* 1/24 (pow lambda1 2))))
#s(approx (- (* 1/24 (* lambda1 lambda1)) 1/2) #s(hole binary64 (* (pow lambda1 2) (- 1/24 (* 1/2 (/ 1 (pow lambda1 2)))))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) #s(hole binary64 (* -1/720 (pow lambda1 6))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) #s(hole binary64 (* (pow lambda1 6) (- (* 1/24 (/ 1 (pow lambda1 2))) 1/720))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) #s(hole binary64 (* (pow lambda1 6) (- (* 1/24 (/ 1 (pow lambda1 2))) (+ 1/720 (/ 1/2 (pow lambda1 4)))))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) #s(hole binary64 (* (pow lambda1 6) (- (+ (* 1/24 (/ 1 (pow lambda1 2))) (/ 1 (pow lambda1 6))) (+ 1/720 (/ 1/2 (pow lambda1 4)))))))
#s(approx (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) #s(hole binary64 (* -1/720 (pow lambda1 6))))
#s(approx (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) #s(hole binary64 (* (pow lambda1 6) (- (* 1/24 (/ 1 (pow lambda1 2))) 1/720))))
#s(approx (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) #s(hole binary64 (* (pow lambda1 6) (- (* 1/24 (/ 1 (pow lambda1 2))) (+ 1/720 (/ 1/2 (pow lambda1 4)))))))
#s(approx (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) #s(hole binary64 (* -1/720 (pow lambda1 4))))
#s(approx (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) #s(hole binary64 (* (pow lambda1 4) (- (* 1/24 (/ 1 (pow lambda1 2))) 1/720))))
#s(approx (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) #s(hole binary64 (* (pow lambda1 4) (- (* 1/24 (/ 1 (pow lambda1 2))) (+ 1/720 (/ 1/2 (pow lambda1 4)))))))
#s(approx (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) #s(hole binary64 (* -1/720 (pow lambda1 4))))
#s(approx (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) #s(hole binary64 (* (pow lambda1 4) (- (* 1/24 (/ 1 (pow lambda1 2))) 1/720))))
#s(approx (+ 1/24 (* -1/720 (* lambda1 lambda1))) #s(hole binary64 (* -1/720 (pow lambda1 2))))
#s(approx (+ 1/24 (* -1/720 (* lambda1 lambda1))) #s(hole binary64 (* (pow lambda1 2) (- (* 1/24 (/ 1 (pow lambda1 2))) 1/720))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) #s(hole binary64 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) #s(hole binary64 lambda1))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) #s(hole binary64 (* lambda1 (- (+ 1 (* 1/2 (/ (PI) lambda1))) (/ lambda2 lambda1)))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) lambda1)))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (/ (- 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (pow (cos (- lambda1 lambda2)) 2) #s(hole binary64 (pow (cos (- lambda1 lambda2)) 2)))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (cos phi1) (cos (- lambda1 lambda2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #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 (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) #s(hole binary64 (+ 1 (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3) #s(hole binary64 (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))) lambda1)))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (/ (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (/ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (/ (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (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 (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) #s(hole binary64 (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (cos (- lambda1 lambda2)))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) #s(hole binary64 (* lambda1 (sin lambda2))))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) #s(hole binary64 (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1)))))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) #s(hole binary64 (sin lambda2)))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) #s(hole binary64 (+ (sin lambda2) (/ (cos lambda2) lambda1))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) #s(hole binary64 (* -1/2 (* (pow lambda1 2) (cos lambda2)))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (/ (sin lambda2) lambda1)))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (+ (/ (cos lambda2) (pow lambda1 2)) (/ (sin lambda2) lambda1))))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) #s(hole binary64 (* -1/2 (cos lambda2))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) #s(hole binary64 (+ (* -1/2 (cos lambda2)) (/ (sin lambda2) lambda1))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) #s(hole binary64 (+ (* -1/2 (cos lambda2)) (+ (/ (cos lambda2) (pow lambda1 2)) (/ (sin lambda2) lambda1)))))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) #s(hole binary64 (* -1 (/ (sin lambda2) lambda1))))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) #s(hole binary64 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) #s(hole binary64 (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) lambda1)))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))) lambda1)))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (* (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 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) #s(hole binary64 (+ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (pow (cos phi1) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (pow (cos phi1) 3))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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))) (- (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 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) lambda1)))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))
#s(approx (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (pow (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #s(hole binary64 (- (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (* 2 (log (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (log (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) lambda1)))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) #s(hole binary64 (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) (pow (cos phi1) 4))))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) #s(hole binary64 (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))))
#s(approx (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) #s(hole binary64 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) #s(hole binary64 (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) (pow (cos phi1) 4)))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (pow lambda1 3)))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (* (pow lambda1 3) (+ 1 (* -1 (/ (pow lambda2 3) (pow lambda1 3)))))))
#s(approx (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) #s(hole binary64 (pow lambda1 3)))
#s(approx (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) #s(hole binary64 (* (pow lambda1 3) (+ 1 (* -1 (/ (pow lambda2 3) (pow lambda1 3)))))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (pow lambda1 2)))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (* (pow lambda1 2) (+ 1 (/ lambda2 lambda1)))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (* (pow lambda1 2) (+ 1 (+ (/ lambda2 lambda1) (/ (pow lambda2 2) (pow lambda1 2)))))))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) #s(hole binary64 (* lambda1 lambda2)))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) #s(hole binary64 (* lambda1 (+ lambda2 (/ (pow lambda2 2) 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))
#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 (* (cos lambda1) (sin lambda2)) #s(hole binary64 (* (cos lambda1) (sin lambda2))))
#s(approx (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (sin (+ phi2 (* 1/2 (PI)))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (* (sin (+ phi2 (* 1/2 (PI)))) (sin (- lambda1 lambda2)))))
#s(approx (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (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) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) #s(hole binary64 (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 lambda1))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (* lambda1 (- (+ 1 (* -1 (/ (+ (* -1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)) (pow lambda1 2)))) (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (* lambda1 (- (+ 1 (* -1 (/ (* (+ (* -1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (pow lambda1 3)))) (+ (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) (+ (* -1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2))) (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2))))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) #s(hole binary64 (pow lambda1 3)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) #s(hole binary64 (* (pow lambda1 3) (+ 1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 3) (pow lambda1 3))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (pow lambda1 2)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (* (pow lambda1 2) (- (+ 1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2))) (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) #s(hole binary64 (pow lambda1 2)))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))))))
#s(approx (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) #s(hole binary64 lambda1))
#s(approx (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) #s(hole binary64 (pow lambda1 2)))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)))))))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) #s(hole binary64 lambda1))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))))))
#s(approx (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) #s(hole binary64 lambda1))
#s(approx (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))))))
#s(approx (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) #s(hole binary64 1))
#s(approx (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) #s(hole binary64 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #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))) lambda1) 1) 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))) lambda1) 1) #s(hole binary64 (+ 1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1))))
#s(approx (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1) #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 (* (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 (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) #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))) #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 (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))))
#s(approx (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) lambda1) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))) lambda1)) 1)))))
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) #s(hole binary64 (+ 1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))) lambda1))))
#s(approx (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) #s(hole binary64 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))) lambda1)))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (cos (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (+ (* -1 lambda2) (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda2 2)) lambda1))) lambda1)) 1)))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (+ (* -1 lambda2) (* -1 (/ (+ (* -1 (/ (* lambda2 (+ (* -1 (pow lambda2 2)) (pow lambda2 2))) lambda1)) (+ (* -1 (pow lambda2 2)) (pow lambda2 2))) lambda1))) lambda1)) 1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (cos (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI))))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* 1/2 (+ (sin (+ lambda2 (+ phi2 (+ (* -1 lambda1) (* 1/2 (PI)))))) (sin (- (+ phi2 (* 1/2 (PI))) (+ lambda2 (* -1 lambda1)))))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* 1/2 (+ (sin (+ lambda2 (+ phi2 (+ (* -1 lambda1) (* 1/2 (PI)))))) (sin (- (+ phi2 (* 1/2 (PI))) (+ lambda2 (* -1 lambda1))))))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (cos phi1) (* 1/2 (+ (sin (+ lambda2 (+ phi2 (+ (* -1 lambda1) (* 1/2 (PI)))))) (sin (- (+ phi2 (* 1/2 (PI))) (+ lambda2 (* -1 lambda1)))))))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) #s(hole binary64 (* 1/2 (+ (sin (+ lambda2 (+ phi2 (+ (* -1 lambda1) (* 1/2 (PI)))))) (sin (- (+ phi2 (* 1/2 (PI))) (+ lambda2 (* -1 lambda1))))))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (+ lambda2 (+ phi2 (+ (* -1 lambda1) (* 1/2 (PI)))))) (sin (- (+ phi2 (* 1/2 (PI))) (+ lambda2 (* -1 lambda1)))))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (sin (+ lambda2 (+ phi2 (+ (* -1 lambda1) (* 1/2 (PI))))))))
#s(approx (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (* -1 (* lambda1 (+ 1 (* -1 (/ (+ lambda2 (+ phi2 (* 1/2 (PI)))) lambda1)))))))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (sin (- (+ phi2 (* 1/2 (PI))) (+ lambda2 (* -1 lambda1))))))
#s(approx (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (- (+ phi2 (* 1/2 (PI))) lambda2) lambda1)) 1)))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (neg (+ lambda2 (* -1 lambda1)))) (* -1/2 (* (pow phi2 2) (sin (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 lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (cos lambda2)) (/ (sin lambda2) lambda1))))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (* (cos phi2) (sin lambda2))) (* -1 (/ (* (cos lambda2) (cos phi2)) lambda1)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (sin (+ lambda2 (* 1/2 (PI))))) (/ (sin lambda2) lambda1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (sin (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (sin (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (cos lambda2)) (/ (sin lambda2) lambda1))))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1)))))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (/ (sin lambda2) lambda1)) (* 1/2 (cos lambda2)))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* -1 (* (pow lambda1 3) (+ (* 1/6 (sin lambda2)) (* 1/2 (/ (cos lambda2) lambda1)))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* -1 (* (pow lambda1 3) (+ (* -1 (/ (+ (* -1/2 (cos lambda2)) (/ (sin lambda2) lambda1)) lambda1)) (* 1/6 (sin lambda2)))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* -1 (* (pow lambda1 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) lambda1)) (* 1/6 (sin lambda2)))))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (/ (sin lambda2) lambda1)) (* 1/2 (cos lambda2))) lambda1)) (* -1/6 (sin lambda2))))))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) #s(hole binary64 (* -1 (* lambda1 (+ (* 1/6 (sin lambda2)) (* 1/2 (/ (cos lambda2) lambda1)))))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (cos lambda2)) (/ (sin lambda2) lambda1)) lambda1)) (* 1/2 (sin lambda2))))))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (/ (cos lambda2) lambda1)) (* -1/2 (sin lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) #s(hole binary64 (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))))
#s(approx (- (/ lambda1 lambda2) 1) #s(hole binary64 (* -1 (* lambda1 (- (/ 1 lambda1) (/ 1 lambda2))))))
#s(approx (* lambda1 (- (pow lambda2 -1) (pow lambda1 -1))) #s(hole binary64 (* -1 (* lambda1 (- (/ 1 lambda1) (/ 1 lambda2))))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (+ (* -1 lambda2) (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda2 2)) lambda1))) lambda1)) 1)))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (+ (* -1 lambda2) (* -1 (/ (+ (* -1 (/ (* lambda2 (+ (* -1 (pow lambda2 2)) (pow lambda2 2))) lambda1)) (+ (* -1 (pow lambda2 2)) (pow lambda2 2))) lambda1))) lambda1)) 1)))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (* -1 (* lambda1 (- (/ 1 lambda1) (/ 1 lambda2))))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (- (* -1 (/ (+ lambda2 (* -1 lambda2)) lambda1)) 1) lambda1)) (/ 1 lambda2))))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (- (* -1 (/ (+ lambda2 (+ (* -1 lambda2) (* -1 (/ (* lambda2 (+ lambda2 (* -1 lambda2))) lambda1)))) lambda1)) 1) lambda1)) (/ 1 lambda2))))))
#s(approx (- (pow (/ lambda1 lambda2) 3) 1) #s(hole binary64 (* -1 (* (pow lambda1 3) (- (/ 1 (pow lambda1 3)) (/ 1 (pow lambda2 3)))))))
#s(approx (* lambda2 (- (/ lambda1 lambda2) 1)) #s(hole binary64 (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (cos (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (sin (- (* 1/2 (PI)) (+ lambda2 (* -1 lambda1))))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (+ lambda2 (* -1 lambda1))))))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (- (* 1/2 (PI)) lambda2) lambda1)) 1)))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (/ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (/ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (/ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (/ (- 1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- 1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (- (pow (cos phi1) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (- (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (pow (cos phi1) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))))
#s(approx (pow (cos (- lambda1 lambda2)) 2) #s(hole binary64 (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (/ (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 3))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) #s(hole binary64 (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 3)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3) #s(hole binary64 (* (pow (cos phi2) 3) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 3))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (* (cos (* 1/2 (PI))) (sin phi1))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) #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 phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))) (/ (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))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (/ (* (pow (cos phi2) 3) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 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)))))))) (/ (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (/ (* (pow (cos phi2) 3) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 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)))))))) (/ (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (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 (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (* (pow (cos phi2) 3) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 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 (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) #s(hole binary64 (* (pow (cos phi2) 3) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 3))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))))
#s(approx (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1)))))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) #s(hole binary64 (* -1 (/ (+ (sin lambda2) (/ (cos lambda2) lambda1)) lambda1))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (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))))) (* (cos (* 1/2 (PI))) (sin phi1))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (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))))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (- (cos phi1) (* (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 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2) (- (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) #s(hole binary64 (+ (* (pow (cos phi2) 3) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 3)) (pow (cos phi1) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ (* (pow (cos phi2) 3) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 3)) (pow (cos phi1) 3))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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))) (- (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 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* (pow (cos phi2) 2) (* (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) 2))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* (pow (cos phi2) 2) (* (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) 2)))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* (pow (cos phi2) 2) (* (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) 2))))
#s(approx (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (* (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (pow (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) 2)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #s(hole binary64 (- (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (* 2 (log (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (log (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) #s(hole binary64 (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 6))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)) (pow (cos phi1) 4))))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) #s(hole binary64 (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 6)))))
#s(approx (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) #s(hole binary64 (* (pow (cos phi2) 6) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 6))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) #s(hole binary64 (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)) (pow (cos phi1) 4)))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (* -1 (* (pow lambda1 3) (- (/ (pow lambda2 3) (pow lambda1 3)) 1)))))
#s(approx (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) #s(hole binary64 (* -1 (* (pow lambda1 3) (- (/ (pow lambda2 3) (pow lambda1 3)) 1)))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -1 (/ (+ (* -1 lambda2) (* -1 (/ (pow lambda2 2) lambda1))) lambda1))))))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 lambda2) (* -1 (/ (pow lambda2 2) 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 (* -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 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))))
#s(approx (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (sin (neg (+ lambda2 (* -1 lambda1)))) (+ (cos phi2) (* (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) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (sin (neg (+ lambda2 (* -1 lambda1)))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) #s(hole binary64 (* (sin (neg (+ lambda2 (* -1 lambda1)))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 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 (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (- (+ (* -1 (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2) lambda1)) (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2) lambda1)) (* -1 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))) lambda1)) 1)))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (- (* -1 (/ (- (* -1 (/ (* (+ (* -1 (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2)) (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2)) (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))) lambda1)) (+ (* -1 (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2)) (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2))) lambda1)) (* -1 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))) lambda1)) 1)))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) #s(hole binary64 (* -1 (* (pow lambda1 3) (- (* -1 (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 3) (pow lambda1 3))) 1)))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 3)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -1 (/ (- (* -1 (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2) lambda1)) (* -1 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))) lambda1))))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2)))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -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))) lambda1) #s(hole binary64 (* lambda1 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))))
#s(approx (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -1 (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2) (pow lambda1 2)))))))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) #s(hole binary64 (* -1 (* lambda1 (- (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1) 1)))))
#s(approx (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) #s(hole binary64 (* -1 (* lambda1 (- (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1) 1)))))
#s(approx (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) #s(hole binary64 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)))))
#s(approx (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) #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 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) #s(hole binary64 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 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 (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (+ (* (cos (- 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 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos lambda1) (cos phi2)))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* 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))) #s(hole binary64 (+ (cos lambda1) (cos phi1))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* lambda2 (sin lambda1))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1))))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (cos phi2)))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (cos lambda1)))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (cos lambda1) (* lambda2 (sin lambda1)))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (sin lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* 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)))))) (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/6 (* 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)))))) (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos lambda1) (cos phi2))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (+ (* 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 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1/2 (pow phi1 2)) (* (cos lambda1) (cos phi2)))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1/2 (pow phi1 2)) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1/2 (pow phi1 2)) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1/2 (pow phi1 2)) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos 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)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (* (sin lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* (cos 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)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* 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)))))) (* (cos 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)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/6 (* 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)))))) (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (cos phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos lambda1) (cos phi2))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/6 (* lambda2 (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))))) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/6 (* lambda2 (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))))) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (cos phi1) (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) lambda1)))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (cos phi1) (+ (* 1/2 (* lambda2 (+ (cos (- (+ phi2 (* 1/2 (PI))) lambda1)) (* -1 (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))))) (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) lambda1))))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (cos phi1) (+ (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) lambda1)))) (* lambda2 (+ (* 1/2 (* lambda2 (+ (* -1/2 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1/2 (sin (- (+ phi2 (* 1/2 (PI))) lambda1)))))) (* 1/2 (+ (cos (- (+ phi2 (* 1/2 (PI))) lambda1)) (* -1 (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))))))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (cos phi1) (+ (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) lambda1)))) (* lambda2 (+ (* 1/2 (+ (cos (- (+ phi2 (* 1/2 (PI))) lambda1)) (* -1 (cos (+ lambda1 (+ phi2 (* 1/2 (PI)))))))) (* lambda2 (+ (* 1/2 (* lambda2 (+ (* -1/6 (cos (- (+ phi2 (* 1/2 (PI))) lambda1))) (* 1/6 (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))))) (* 1/2 (+ (* -1/2 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1/2 (sin (- (+ phi2 (* 1/2 (PI))) lambda1)))))))))))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) #s(hole binary64 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) lambda1))))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) #s(hole binary64 (+ (* 1/2 (* lambda2 (+ (cos (- (+ phi2 (* 1/2 (PI))) lambda1)) (* -1 (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))))) (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) lambda1)))))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) #s(hole binary64 (+ (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) lambda1)))) (* lambda2 (+ (* 1/2 (* lambda2 (+ (* -1/2 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1/2 (sin (- (+ phi2 (* 1/2 (PI))) lambda1)))))) (* 1/2 (+ (cos (- (+ phi2 (* 1/2 (PI))) lambda1)) (* -1 (cos (+ lambda1 (+ phi2 (* 1/2 (PI)))))))))))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) #s(hole binary64 (+ (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) lambda1)))) (* lambda2 (+ (* 1/2 (+ (cos (- (+ phi2 (* 1/2 (PI))) lambda1)) (* -1 (cos (+ lambda1 (+ phi2 (* 1/2 (PI)))))))) (* lambda2 (+ (* 1/2 (* lambda2 (+ (* -1/6 (cos (- (+ phi2 (* 1/2 (PI))) lambda1))) (* 1/6 (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))))) (* 1/2 (+ (* -1/2 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1/2 (sin (- (+ phi2 (* 1/2 (PI))) lambda1))))))))))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (+ lambda1 (+ phi2 (* 1/2 (PI))))) (sin (- (+ phi2 (* 1/2 (PI))) lambda1)))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (+ lambda1 (+ phi2 (* 1/2 (PI))))) (+ (sin (- (+ phi2 (* 1/2 (PI))) lambda1)) (* lambda2 (+ (cos (- (+ phi2 (* 1/2 (PI))) lambda1)) (* -1 (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))))))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (+ lambda1 (+ phi2 (* 1/2 (PI))))) (+ (sin (- (+ phi2 (* 1/2 (PI))) lambda1)) (* lambda2 (+ (cos (- (+ phi2 (* 1/2 (PI))) lambda1)) (+ (* -1 (cos (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1/2 (sin (- (+ phi2 (* 1/2 (PI))) lambda1))))))))))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (+ lambda1 (+ phi2 (* 1/2 (PI))))) (+ (sin (- (+ phi2 (* 1/2 (PI))) lambda1)) (* lambda2 (+ (cos (- (+ phi2 (* 1/2 (PI))) lambda1)) (+ (* -1 (cos (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (+ (* -1/2 (sin (- (+ phi2 (* 1/2 (PI))) lambda1))) (* lambda2 (+ (* -1/6 (cos (- (+ phi2 (* 1/2 (PI))) lambda1))) (* 1/6 (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))))))))))))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (sin (- (+ phi2 (* 1/2 (PI))) lambda1))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- (+ phi2 (* 1/2 (PI))) lambda1)) (* lambda2 (cos (- (+ phi2 (* 1/2 (PI))) lambda1))))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- (+ phi2 (* 1/2 (PI))) lambda1)) (* lambda2 (+ (cos (- (+ phi2 (* 1/2 (PI))) lambda1)) (* -1/2 (* lambda2 (sin (- (+ phi2 (* 1/2 (PI))) lambda1)))))))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- (+ phi2 (* 1/2 (PI))) lambda1)) (* lambda2 (+ (cos (- (+ phi2 (* 1/2 (PI))) lambda1)) (* lambda2 (+ (* -1/2 (sin (- (+ phi2 (* 1/2 (PI))) lambda1))) (* -1/6 (* lambda2 (cos (- (+ phi2 (* 1/2 (PI))) lambda1)))))))))))
#s(approx (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (- (+ phi2 (* 1/2 (PI))) lambda1)))
#s(approx (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (- (+ lambda2 (+ phi2 (* 1/2 (PI)))) lambda1)))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (+ (sin (+ lambda1 (+ phi2 (* 1/2 (PI))))) (* -1 (* lambda2 (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))))))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (+ (sin (+ lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (+ (* -1 (cos (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* -1/2 (* lambda2 (sin (+ lambda1 (+ phi2 (* 1/2 (PI))))))))))))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (+ (sin (+ lambda1 (+ phi2 (* 1/2 (PI))))) (* lambda2 (+ (* -1 (cos (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 (+ phi2 (* 1/2 (PI)))))) (* 1/6 (* lambda2 (cos (+ lambda1 (+ phi2 (* 1/2 (PI))))))))))))))
#s(approx (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (+ lambda1 (+ phi2 (* 1/2 (PI))))))
#s(approx (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (+ lambda1 (+ phi2 (+ (* -1 lambda2) (* 1/2 (PI)))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin lambda1) (* -1/2 (* (pow phi2 2) (sin lambda1))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin lambda1) (+ (* -1/2 (* (pow phi2 2) (sin lambda1))) (* lambda2 (+ (* -1 (cos lambda1)) (* 1/2 (* (pow phi2 2) (cos lambda1)))))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin lambda1) (+ (* -1/2 (* (pow phi2 2) (sin lambda1))) (* lambda2 (+ (* -1 (cos lambda1)) (+ (* 1/2 (* (pow phi2 2) (cos lambda1))) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/4 (* (pow phi2 2) (sin lambda1))))))))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin lambda1) (+ (* -1/2 (* (pow phi2 2) (sin lambda1))) (* lambda2 (+ (* -1 (cos lambda1)) (+ (* 1/2 (* (pow phi2 2) (cos lambda1))) (* lambda2 (+ (* -1/2 (sin lambda1)) (+ (* 1/4 (* (pow phi2 2) (sin lambda1))) (* lambda2 (+ (* -1/12 (* (pow phi2 2) (cos lambda1))) (* 1/6 (cos lambda1))))))))))))))
#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 lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 lambda1))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ lambda1 (* lambda2 (- (* -1/2 (* lambda1 lambda2)) 1)))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)))))
#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 (neg (sin lambda2)) #s(hole binary64 (* -1 lambda2)))
#s(approx (neg (sin lambda2)) #s(hole binary64 (* lambda2 (- (* 1/6 (pow lambda2 2)) 1))))
#s(approx (neg (sin lambda2)) #s(hole binary64 (* lambda2 (- (* (pow lambda2 2) (+ 1/6 (* -1/120 (pow lambda2 2)))) 1))))
#s(approx (neg (sin lambda2)) #s(hole binary64 (* lambda2 (- (* (pow lambda2 2) (+ 1/6 (* (pow lambda2 2) (- (* 1/5040 (pow lambda2 2)) 1/120)))) 1))))
#s(approx (sin lambda2) #s(hole binary64 lambda2))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* -1/6 (pow lambda2 2))))))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* (pow lambda2 2) (- (* 1/120 (pow lambda2 2)) 1/6))))))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/120 (* -1/5040 (pow lambda2 2)))) 1/6))))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (cos phi2)))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (+ (cos phi2) (* lambda1 (* lambda2 (cos phi2))))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (+ (cos phi2) (* lambda2 (+ (* -1/2 (* lambda2 (cos phi2))) (* lambda1 (cos phi2)))))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (+ (cos phi2) (* lambda2 (+ (* lambda1 (cos phi2)) (* lambda2 (+ (* -1/2 (cos phi2)) (* -1/6 (* lambda1 (* lambda2 (cos phi2)))))))))))
#s(approx (* lambda1 (* (cos phi2) (neg (sin lambda2)))) #s(hole binary64 (* -1 (* lambda1 (* lambda2 (cos phi2))))))
#s(approx (* lambda1 (* (cos phi2) (neg (sin lambda2)))) #s(hole binary64 (* lambda2 (+ (* -1 (* lambda1 (cos phi2))) (* 1/6 (* lambda1 (* (pow lambda2 2) (cos phi2))))))))
#s(approx (* lambda1 (* (cos phi2) (neg (sin lambda2)))) #s(hole binary64 (* lambda2 (+ (* -1 (* lambda1 (cos phi2))) (* (pow lambda2 2) (+ (* -1/120 (* lambda1 (* (pow lambda2 2) (cos phi2)))) (* 1/6 (* lambda1 (cos phi2)))))))))
#s(approx (* lambda1 (* (cos phi2) (neg (sin lambda2)))) #s(hole binary64 (* lambda2 (+ (* -1 (* lambda1 (cos phi2))) (* (pow lambda2 2) (+ (* 1/6 (* lambda1 (cos phi2))) (* (pow lambda2 2) (+ (* -1/120 (* lambda1 (cos phi2))) (* 1/5040 (* lambda1 (* (pow lambda2 2) (cos phi2))))))))))))
#s(approx (* (cos phi2) (neg (sin lambda2))) #s(hole binary64 (* -1 (* lambda2 (cos phi2)))))
#s(approx (* (cos phi2) (neg (sin lambda2))) #s(hole binary64 (* lambda2 (+ (* -1 (cos phi2)) (* 1/6 (* (pow lambda2 2) (cos phi2)))))))
#s(approx (* (cos phi2) (neg (sin lambda2))) #s(hole binary64 (* lambda2 (+ (* -1 (cos phi2)) (* (pow lambda2 2) (+ (* -1/120 (* (pow lambda2 2) (cos phi2))) (* 1/6 (cos phi2))))))))
#s(approx (* (cos phi2) (neg (sin lambda2))) #s(hole binary64 (* lambda2 (+ (* -1 (cos phi2)) (* (pow lambda2 2) (+ (* 1/6 (cos phi2)) (* (pow lambda2 2) (+ (* -1/120 (cos phi2)) (* 1/5040 (* (pow lambda2 2) (cos phi2)))))))))))
#s(approx (* (cos phi2) (cos lambda2)) #s(hole binary64 (cos phi2)))
#s(approx (* (cos phi2) (cos lambda2)) #s(hole binary64 (+ (cos phi2) (* -1/2 (* (pow lambda2 2) (cos phi2))))))
#s(approx (* (cos phi2) (cos lambda2)) #s(hole binary64 (+ (cos phi2) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda2 2) (cos phi2))))))))
#s(approx (* (cos phi2) (cos lambda2)) #s(hole binary64 (+ (cos phi2) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (cos phi2))) (* 1/24 (cos phi2)))))))))
#s(approx (+ (cos 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 (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (* lambda1 (sin (* 1/2 (PI))))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ (* lambda1 (sin (* 1/2 (PI)))) (* lambda2 (- (* lambda1 (cos (* 1/2 (PI)))) 1)))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ (* lambda1 (sin (* 1/2 (PI)))) (* lambda2 (- (+ (* -1/2 (* lambda1 (* lambda2 (sin (* 1/2 (PI)))))) (* lambda1 (cos (* 1/2 (PI))))) 1)))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ (* lambda1 (sin (* 1/2 (PI)))) (* lambda2 (- (+ (* lambda1 (cos (* 1/2 (PI)))) (* lambda2 (+ (* -1/2 (* lambda1 (sin (* 1/2 (PI))))) (* lambda2 (+ 1/6 (* -1/6 (* lambda1 (cos (* 1/2 (PI)))))))))) 1)))))
#s(approx (sin (+ lambda2 (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ lambda2 (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* lambda2 (cos (* 1/2 (PI)))))))
#s(approx (sin (+ lambda2 (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* lambda2 (+ (cos (* 1/2 (PI))) (* -1/2 (* lambda2 (sin (* 1/2 (PI))))))))))
#s(approx (sin (+ lambda2 (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* lambda2 (+ (cos (* 1/2 (PI))) (* lambda2 (+ (* -1/2 (sin (* 1/2 (PI)))) (* -1/6 (* lambda2 (cos (* 1/2 (PI))))))))))))
#s(approx (+ lambda2 (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ lambda2 (/ (PI) 2)) #s(hole binary64 (+ lambda2 (* 1/2 (PI)))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (sin lambda1)))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (cos phi2))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* -1/2 (* (pow lambda2 2) (cos phi2)))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda2 2) (cos phi2)))))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (cos phi2))) (* 1/24 (cos phi2))))))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos lambda1) (cos phi2)))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* 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 (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) #s(hole binary64 lambda1))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) #s(hole binary64 (+ lambda1 (* lambda2 (- (* -1/2 (* lambda1 lambda2)) 1)))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) #s(hole binary64 (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)))))
#s(approx (* lambda1 (cos lambda2)) #s(hole binary64 lambda1))
#s(approx (* lambda1 (cos lambda2)) #s(hole binary64 (+ lambda1 (* -1/2 (* lambda1 (pow lambda2 2))))))
#s(approx (* lambda1 (cos lambda2)) #s(hole binary64 (+ lambda1 (* (pow lambda2 2) (+ (* -1/2 lambda1) (* 1/24 (* lambda1 (pow lambda2 2))))))))
#s(approx (* lambda1 (cos lambda2)) #s(hole binary64 (+ lambda1 (* (pow lambda2 2) (+ (* -1/2 lambda1) (* (pow lambda2 2) (+ (* -1/720 (* lambda1 (pow lambda2 2))) (* 1/24 lambda1))))))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 1))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (+ 1 (* lambda1 lambda2))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2))))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (+ 1 (* lambda2 (+ lambda1 (* lambda2 (- (* -1/6 (* lambda1 lambda2)) 1/2)))))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ 1 (* -1/2 (pow lambda1 2)))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda1 lambda2)))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ lambda1 (* lambda2 (- (* 1/4 (pow lambda1 2)) 1/2))))))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ lambda1 (* lambda2 (- (+ (* -1/6 (* lambda1 lambda2)) (* 1/4 (pow lambda1 2))) 1/2))))))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (* -1/2 lambda1)))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (+ lambda2 (* -1/2 lambda1))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ 1 (* 1/4 (* lambda1 lambda2)))))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ 1 (* lambda2 (+ (* -1/6 lambda2) (* 1/4 lambda1))))))))
#s(approx (* (* (cos lambda2) lambda1) -1/2) #s(hole binary64 (* -1/2 lambda1)))
#s(approx (* (* (cos lambda2) lambda1) -1/2) #s(hole binary64 (+ (* -1/2 lambda1) (* 1/4 (* lambda1 (pow lambda2 2))))))
#s(approx (* (* (cos lambda2) lambda1) -1/2) #s(hole binary64 (+ (* -1/2 lambda1) (* (pow lambda2 2) (+ (* -1/48 (* lambda1 (pow lambda2 2))) (* 1/4 lambda1))))))
#s(approx (* (* (cos lambda2) lambda1) -1/2) #s(hole binary64 (+ (* -1/2 lambda1) (* (pow lambda2 2) (+ (* 1/4 lambda1) (* (pow lambda2 2) (+ (* -1/48 lambda1) (* 1/1440 (* lambda1 (pow lambda2 2))))))))))
#s(approx (* (cos lambda2) lambda1) #s(hole binary64 lambda1))
#s(approx (* (cos lambda2) lambda1) #s(hole binary64 (+ lambda1 (* -1/2 (* lambda1 (pow lambda2 2))))))
#s(approx (* (cos lambda2) lambda1) #s(hole binary64 (+ lambda1 (* (pow lambda2 2) (+ (* -1/2 lambda1) (* 1/24 (* lambda1 (pow lambda2 2))))))))
#s(approx (* (cos lambda2) lambda1) #s(hole binary64 (+ lambda1 (* (pow lambda2 2) (+ (* -1/2 lambda1) (* (pow lambda2 2) (+ (* -1/720 (* lambda1 (pow lambda2 2))) (* 1/24 lambda1))))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ 1 (* -1/2 (pow lambda1 2)))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda1 (* lambda2 (+ 1 (* -1/6 (pow lambda1 2)))))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ (* lambda1 (+ 1 (* -1/6 (pow lambda1 2)))) (* lambda2 (- (* 1/4 (pow lambda1 2)) 1/2))))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ (* lambda1 (+ 1 (* -1/6 (pow lambda1 2)))) (* lambda2 (- (+ (* 1/4 (pow lambda1 2)) (* lambda1 (* lambda2 (- (* 1/36 (pow lambda1 2)) 1/6)))) 1/2))))))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (* -1/2 lambda1)))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ 1 (* -1/6 (pow lambda1 2)))))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ 1 (+ (* -1/6 (pow lambda1 2)) (* 1/4 (* lambda1 lambda2))))))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ 1 (+ (* -1/6 (pow lambda1 2)) (* lambda2 (+ (* 1/4 lambda1) (* lambda2 (- (* 1/36 (pow lambda1 2)) 1/6))))))))))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) #s(hole binary64 (* -1/2 lambda1)))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) #s(hole binary64 (+ (* -1/2 lambda1) (* -1/6 (* (pow lambda1 2) lambda2)))))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ (* -1/6 (pow lambda1 2)) (* 1/4 (* lambda1 lambda2)))))))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ (* -1/6 (pow lambda1 2)) (* lambda2 (+ (* 1/36 (* (pow lambda1 2) lambda2)) (* 1/4 lambda1))))))))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) #s(hole binary64 -1/2))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) #s(hole binary64 (- (* -1/6 (* lambda1 lambda2)) 1/2)))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) #s(hole binary64 (- (* lambda2 (+ (* -1/6 lambda1) (* 1/4 lambda2))) 1/2)))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) #s(hole binary64 (- (* lambda2 (+ (* -1/6 lambda1) (* lambda2 (+ 1/4 (* 1/36 (* lambda1 lambda2)))))) 1/2)))
#s(approx (* -1/2 (cos lambda2)) #s(hole binary64 -1/2))
#s(approx (* -1/2 (cos lambda2)) #s(hole binary64 (- (* 1/4 (pow lambda2 2)) 1/2)))
#s(approx (* -1/2 (cos lambda2)) #s(hole binary64 (- (* (pow lambda2 2) (+ 1/4 (* -1/48 (pow lambda2 2)))) 1/2)))
#s(approx (* -1/2 (cos lambda2)) #s(hole binary64 (- (* (pow lambda2 2) (+ 1/4 (* (pow lambda2 2) (- (* 1/1440 (pow lambda2 2)) 1/48)))) 1/2)))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) #s(hole binary64 lambda1))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) #s(hole binary64 (+ lambda1 (* lambda2 (- (* 1/2 (pow lambda1 2)) 1)))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) #s(hole binary64 (+ lambda1 (* lambda2 (- (+ (* -1/2 (* lambda1 lambda2)) (* 1/2 (pow lambda1 2))) 1)))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) #s(hole binary64 (+ lambda1 (* lambda2 (- (+ (* 1/2 (pow lambda1 2)) (* lambda2 (+ (* -1/2 lambda1) (* lambda2 (+ 1/6 (* -1/12 (pow lambda1 2))))))) 1)))))
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) #s(hole binary64 lambda1))
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) #s(hole binary64 (+ lambda1 (* 1/2 (* (pow lambda1 2) lambda2)))))
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) #s(hole binary64 (+ lambda1 (* lambda2 (+ (* -1/2 (* lambda1 lambda2)) (* 1/2 (pow lambda1 2)))))))
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) #s(hole binary64 (+ lambda1 (* lambda2 (+ (* 1/2 (pow lambda1 2)) (* lambda2 (+ (* -1/2 lambda1) (* -1/12 (* (pow lambda1 2) lambda2)))))))))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) #s(hole binary64 1))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) #s(hole binary64 (+ 1 (* 1/2 (* lambda1 lambda2)))))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) #s(hole binary64 (+ 1 (* lambda2 (+ (* -1/2 lambda2) (* 1/2 lambda1))))))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) #s(hole binary64 (+ 1 (* lambda2 (+ (* 1/2 lambda1) (* lambda2 (- (* -1/12 (* lambda1 lambda2)) 1/2)))))))
#s(approx (* -1/2 (* lambda1 (neg (sin lambda2)))) #s(hole binary64 (* 1/2 (* lambda1 lambda2))))
#s(approx (* -1/2 (* lambda1 (neg (sin lambda2)))) #s(hole binary64 (* lambda2 (+ (* -1/12 (* lambda1 (pow lambda2 2))) (* 1/2 lambda1)))))
#s(approx (* -1/2 (* lambda1 (neg (sin lambda2)))) #s(hole binary64 (* lambda2 (+ (* 1/2 lambda1) (* (pow lambda2 2) (+ (* -1/12 lambda1) (* 1/240 (* lambda1 (pow lambda2 2)))))))))
#s(approx (* -1/2 (* lambda1 (neg (sin lambda2)))) #s(hole binary64 (* lambda2 (+ (* 1/2 lambda1) (* (pow lambda2 2) (+ (* -1/12 lambda1) (* (pow lambda2 2) (+ (* -1/10080 (* lambda1 (pow lambda2 2))) (* 1/240 lambda1)))))))))
#s(approx (* lambda1 (neg (sin lambda2))) #s(hole binary64 (* -1 (* lambda1 lambda2))))
#s(approx (* lambda1 (neg (sin lambda2))) #s(hole binary64 (* lambda2 (+ (* -1 lambda1) (* 1/6 (* lambda1 (pow lambda2 2)))))))
#s(approx (* lambda1 (neg (sin lambda2))) #s(hole binary64 (* lambda2 (+ (* -1 lambda1) (* (pow lambda2 2) (+ (* -1/120 (* lambda1 (pow lambda2 2))) (* 1/6 lambda1)))))))
#s(approx (* lambda1 (neg (sin lambda2))) #s(hole binary64 (* lambda2 (+ (* -1 lambda1) (* (pow lambda2 2) (+ (* 1/6 lambda1) (* (pow lambda2 2) (+ (* -1/120 lambda1) (* 1/5040 (* lambda1 (pow lambda2 2)))))))))))
#s(approx (- (/ lambda1 lambda2) 1) #s(hole binary64 (/ (+ lambda1 (* -1 lambda2)) lambda2)))
#s(approx (* lambda1 (- (pow lambda2 -1) (pow lambda1 -1))) #s(hole binary64 (/ (+ lambda1 (* -1 lambda2)) lambda2)))
#s(approx (- (pow lambda2 -1) (pow lambda1 -1)) #s(hole binary64 (/ (+ 1 (* -1 (/ lambda2 lambda1))) lambda2)))
#s(approx (pow lambda2 -1) #s(hole binary64 (/ 1 lambda2)))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (/ (+ lambda1 (* -1 lambda2)) lambda2)))
#s(approx (- (pow (/ lambda1 lambda2) 3) 1) #s(hole binary64 (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (pow lambda2 3))))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) #s(hole binary64 (/ (+ (* lambda1 lambda2) (pow lambda1 2)) (pow lambda2 2))))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) #s(hole binary64 (/ (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)) (pow lambda2 2))))
#s(approx (+ 1 (* (/ lambda1 lambda2) 1)) #s(hole binary64 (/ (+ lambda1 lambda2) lambda2)))
#s(approx (+ (cos lambda2) (cos phi1)) #s(hole binary64 (+ 1 (cos phi1))))
#s(approx (+ (cos lambda2) (cos phi1)) #s(hole binary64 (+ 1 (+ (cos phi1) (* -1/2 (pow lambda2 2))))))
#s(approx (+ (cos lambda2) (cos phi1)) #s(hole binary64 (+ 1 (+ (cos phi1) (* (pow lambda2 2) (- (* 1/24 (pow lambda2 2)) 1/2))))))
#s(approx (+ (cos lambda2) (cos phi1)) #s(hole binary64 (+ 1 (+ (cos phi1) (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/24 (* -1/720 (pow lambda2 2)))) 1/2))))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (cos lambda1))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (+ (cos lambda1) (* lambda2 (sin lambda1))))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1))))))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos lambda1) (cos phi2)))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (sin (+ lambda1 (* 1/2 (PI))))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* -1 (* lambda2 (* (cos phi2) (cos (+ lambda1 (* 1/2 (PI))))))) (* (cos phi2) (sin (+ lambda1 (* 1/2 (PI)))))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* -1 (* (cos phi2) (cos (+ lambda1 (* 1/2 (PI)))))) (* -1/2 (* lambda2 (* (cos phi2) (sin (+ lambda1 (* 1/2 (PI))))))))) (* (cos phi2) (sin (+ lambda1 (* 1/2 (PI)))))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* -1 (* (cos phi2) (cos (+ lambda1 (* 1/2 (PI)))))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin (+ lambda1 (* 1/2 (PI)))))) (* 1/6 (* lambda2 (* (cos phi2) (cos (+ lambda1 (* 1/2 (PI))))))))))) (* (cos phi2) (sin (+ lambda1 (* 1/2 (PI)))))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) #s(hole binary64 (sin (+ lambda1 (* 1/2 (PI))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ lambda1 (* 1/2 (PI)))) (* -1 (* lambda2 (cos (+ lambda1 (* 1/2 (PI)))))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ lambda1 (* 1/2 (PI)))) (* lambda2 (+ (* -1 (cos (+ lambda1 (* 1/2 (PI))))) (* -1/2 (* lambda2 (sin (+ lambda1 (* 1/2 (PI)))))))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ lambda1 (* 1/2 (PI)))) (* lambda2 (+ (* -1 (cos (+ lambda1 (* 1/2 (PI))))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 (* 1/2 (PI))))) (* 1/6 (* lambda2 (cos (+ lambda1 (* 1/2 (PI)))))))))))))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) #s(hole binary64 (+ lambda1 (* 1/2 (PI)))))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) #s(hole binary64 (+ lambda1 (+ (* -1 lambda2) (* 1/2 (PI))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (+ (* lambda2 (* (sin lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* -1/2 (* 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)))))) (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/6 (* 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)))))) (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (* lambda2 (* (sin lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* 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)))))) (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/6 (* 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)))))) (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos lambda1) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos lambda1) (+ (* lambda2 (sin lambda1)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos lambda1) (+ (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos lambda1) (+ (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi2) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi2) (+ (* -1/2 (* (pow lambda2 2) (cos phi2))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi2) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda2 2) (cos phi2))))))))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi2) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (cos phi2))) (* 1/24 (cos phi2)))))))))))
#s(approx (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi1)))))
#s(approx (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos phi2) (+ (* -1/2 (* (pow lambda2 2) (cos phi2))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos phi2) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda2 2) (cos phi2)))))))))
#s(approx (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos phi2) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (cos phi2))) (* 1/24 (cos phi2))))))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (/ (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda2 (- (* -1 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (/ (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -1 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* lambda2 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* -1 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* 1/2 (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (+ (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (/ (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -1 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* lambda2 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* -1 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (* 1/2 (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* lambda2 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (/ (* (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 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* 1/2 (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (* 1/6 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (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 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (+ (* 1/6 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1)))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (+ (/ (* (cos phi2) (* (sin lambda1) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (+ (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (/ (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 (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (/ (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (- 1 (* (cos lambda1) (cos phi2))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (- (+ (* lambda2 (- (* -2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- 1 (* (cos lambda1) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda1) (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ 1 (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- 1 (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- 1 (* (cos lambda1) (cos phi2))))) (* lambda2 (- (* -1 (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (* -2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- 1 (* (cos lambda1) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda1) (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (- 1 (* (cos lambda1) (cos phi2))))) (* 1/2 (/ (* (cos lambda1) (* (cos phi2) (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))) (* -1 (/ (* (cos phi2) (* (sin lambda1) (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ 1 (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- 1 (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- 1 (* (cos lambda1) (cos phi2))))) (* lambda2 (- (+ (* -1 (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (- 1 (* (cos lambda1) (cos phi2))))) (* lambda2 (- (* -1 (/ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (* -1 (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (* -2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- 1 (* (cos lambda1) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda1) (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (- 1 (* (cos lambda1) (cos phi2))))) (* 1/2 (/ (* (cos lambda1) (* (cos phi2) (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* 1/6 (/ (* (cos phi2) (* (sin lambda1) (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (* 1/2 (/ (* (cos lambda1) (* (cos phi2) (- (* -2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- 1 (* (cos lambda1) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda1) (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (- 1 (* (cos lambda1) (cos phi2)))))))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (* -2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- 1 (* (cos lambda1) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda1) (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (- 1 (* (cos lambda1) (cos phi2))))) (* 1/2 (/ (* (cos lambda1) (* (cos phi2) (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))) (* -1 (/ (* (cos phi2) (* (sin lambda1) (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ 1 (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- 1 (* (cos lambda1) (cos phi2)))))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- (+ 1 (* -2 (* lambda2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- (+ 1 (* 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 lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- (+ 1 (* 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 lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) #s(hole binary64 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) #s(hole binary64 (+ (* 2 (* lambda2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) #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 (* (cos phi2) (cos (- lambda1 lambda2))) 2) #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 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- 1 (* (cos lambda1) (cos phi2)))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* -1 (* lambda2 (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (cos phi2)))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* lambda2 (- (* 1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (cos phi2)))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* 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) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (- (pow (cos phi1) 2) (pow (cos lambda1) 2)) (- (cos phi1) (cos lambda1)))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda2 (- (* -2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (sin lambda1) (- (pow (cos phi1) 2) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos lambda1)))) (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* lambda2 (- (* -1 (/ (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (cos lambda1)))) (+ (* -1 (/ (* (sin lambda1) (- (* -2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (sin lambda1) (- (pow (cos phi1) 2) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))) (- (cos phi1) (cos lambda1)))) (* 1/2 (/ (* (cos lambda1) (- (pow (cos phi1) 2) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))))) (* -1 (/ (* (sin lambda1) (- (pow (cos phi1) 2) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos lambda1)))) (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* lambda2 (- (+ (* -1 (/ (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (cos lambda1)))) (* lambda2 (- (* -1 (/ (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))) (- (cos phi1) (cos lambda1)))) (+ (* -1 (/ (* (sin lambda1) (- (* -1 (/ (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (cos lambda1)))) (+ (* -1 (/ (* (sin lambda1) (- (* -2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (sin lambda1) (- (pow (cos phi1) 2) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))) (- (cos phi1) (cos lambda1)))) (* 1/2 (/ (* (cos lambda1) (- (pow (cos phi1) 2) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2)))))) (- (cos phi1) (cos lambda1)))) (+ (* 1/6 (/ (* (sin lambda1) (- (pow (cos phi1) 2) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))) (* 1/2 (/ (* (cos lambda1) (- (* -2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (sin lambda1) (- (pow (cos phi1) 2) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))) (- (cos phi1) (cos lambda1))))))))) (+ (* -1 (/ (* (sin lambda1) (- (* -2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (sin lambda1) (- (pow (cos phi1) 2) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))) (- (cos phi1) (cos lambda1)))) (* 1/2 (/ (* (cos lambda1) (- (pow (cos phi1) 2) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))))) (* -1 (/ (* (sin lambda1) (- (pow (cos phi1) 2) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos lambda1)))) (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1))))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (pow (cos phi1) 2) (pow (cos lambda1) 2))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ (* -2 (* lambda2 (* (cos lambda1) (sin lambda1)))) (pow (cos phi1) 2)) (pow (cos lambda1) 2))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ (* lambda2 (- (* -1 (* lambda2 (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 2 (* (cos lambda1) (sin lambda1))))) (pow (cos phi1) 2)) (pow (cos lambda1) 2))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 2 (* (cos lambda1) (sin lambda1))))) (pow (cos phi1) 2)) (pow (cos lambda1) 2))))
#s(approx (pow (cos (- lambda1 lambda2)) 2) #s(hole binary64 (pow (cos lambda1) 2)))
#s(approx (pow (cos (- lambda1 lambda2)) 2) #s(hole binary64 (+ (* 2 (* lambda2 (* (cos lambda1) (sin lambda1)))) (pow (cos lambda1) 2))))
#s(approx (pow (cos (- lambda1 lambda2)) 2) #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 (pow (cos (- lambda1 lambda2)) 2) #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 phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (cos phi1) (cos lambda1))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ (cos phi1) (* -1 (* lambda2 (sin lambda1)))) (cos lambda1))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ (cos phi1) (* lambda2 (+ (* -1 (sin lambda1)) (* 1/2 (* lambda2 (cos lambda1)))))) (cos lambda1))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ (cos phi1) (* lambda2 (+ (* -1 (sin lambda1)) (* lambda2 (- (* 1/6 (* lambda2 (sin lambda1))) (* -1/2 (cos lambda1))))))) (cos lambda1))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (/ (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* lambda2 (- (/ (* (pow (cos phi2) 3) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1)))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)))) (+ (/ 1 (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #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)))))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (+ (/ (* (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* -1/2 (* (cos lambda1) (cos phi2))))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)) (/ (* (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1))) (- (/ (* (pow (cos phi2) 3) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1)))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))))))) (/ (* (pow (cos phi2) 3) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))))) (/ (* (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1)))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)))) (+ (/ 1 (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #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))))))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (+ (/ (* (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* -1/6 (* (cos phi2) (sin lambda1))))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)) (+ (/ (* (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (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)))))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (+ (/ (* (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* -1/2 (* (cos lambda1) (cos phi2))))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)) (/ (* (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1))) (- (/ (* (pow (cos phi2) 3) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1)))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))))))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (- (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* -1/2 (* (cos lambda1) (cos phi2)))) (- (/ (* (pow (cos phi2) 3) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1)))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (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)))))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))))) (+ (/ (* (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* -1/2 (* (cos lambda1) (cos phi2))))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)) (/ (* (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1))) (- (/ (* (pow (cos phi2) 3) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1)))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))))))) (/ (* (pow (cos phi2) 3) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))))) (/ (* (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1)))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)))) (+ (/ 1 (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) #s(hole binary64 (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3)))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) #s(hole binary64 (+ 1 (+ (* 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))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) #s(hole binary64 (+ 1 (+ (* 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))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) #s(hole binary64 (+ 1 (+ (* 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))))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3) #s(hole binary64 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 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)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 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)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 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)))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* lambda2 (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1)))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))) (* (cos lambda1) (cos phi2)))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* 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 phi2)))))) (* (cos phi2) (sin lambda1)))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))) (* (cos lambda1) (cos phi2)))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* 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 phi2) (sin lambda1))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* -1/2 (* (cos lambda1) (cos phi2)))))) (* (cos phi2) (sin lambda1)))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))) (* (cos lambda1) (cos phi2)))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (+ (* 2 (* lambda2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (+ (* 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 (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (+ (* 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 (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos lambda1) (cos phi2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (* (cos phi2) (sin lambda1))) (+ (* (cos lambda1) (cos phi2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (cos phi2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (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)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (/ (* (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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) (- (* 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 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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi1) (* (cos phi2) (sin lambda1)))) 2)) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2)))) 3))) (+ (/ (* (- (* 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) (- (* 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) 3) (* (pow (cos phi2) 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)) (/ (* (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))))))) (/ (* (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) (- (* 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 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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi1) (* (cos phi2) (sin lambda1)))) 2)) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (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 lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (* (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (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))))))) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2)))) 3))) (+ (/ (* (- (* 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))))) (+ (/ (* (- (* 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) (- (* 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) 3) (* (pow (cos phi2) 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))))) (- (+ (* (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) (- (* 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) 3) (* (pow (cos phi2) 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)) (/ (* (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))))))))) (/ (* (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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi1) (* (cos phi2) (sin lambda1)))) 2)) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2)))) 3))) (+ (/ (* (- (* 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) (- (* 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) 3) (* (pow (cos phi2) 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)) (/ (* (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))))))) (/ (* (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) (- (* 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 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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (pow (cos phi1) 3) (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2)))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* -1 (/ (* lambda2 (* (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 phi1) 3) (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* lambda2 (- (* -1 (* lambda2 (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi1) (* (cos phi2) (sin lambda1)))) 2)) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (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))))) (/ (* (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 phi1) 3) (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (+ (* -1 (/ (* (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi1) (* (cos phi2) (sin lambda1)))) 2)) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (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 lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (* (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (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))))))) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi1) (* (cos phi2) (sin lambda1)))) 2)) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (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))))) (/ (* (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 phi1) 3) (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2))))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* lambda2 (- (/ (* (cos phi2) (sin lambda1)) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))))) (/ 1 (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* lambda2 (- (+ (* lambda2 (- (* -1/2 (/ (* (cos lambda1) (cos phi2)) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))) (+ (/ (* (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1))) (- (/ (* (cos phi2) (sin lambda1)) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))))) (/ (* (cos phi2) (sin lambda1)) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))))) (/ 1 (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* lambda2 (- (+ (* lambda2 (- (+ (* -1/2 (/ (* (cos lambda1) (cos phi2)) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))) (* lambda2 (- (* -1/6 (/ (* (cos phi2) (sin lambda1)) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))) (+ (/ (* (- (* -1/2 (/ (* (cos lambda1) (cos phi2)) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))) (+ (/ (* (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1))) (- (/ (* (cos phi2) (sin lambda1)) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)))) (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (+ (/ (* (- (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* -1/2 (* (cos lambda1) (cos phi2)))) (- (/ (* (cos phi2) (sin lambda1)) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))))))) (+ (/ (* (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1))) (- (/ (* (cos phi2) (sin lambda1)) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))))) (/ (* (cos phi2) (sin lambda1)) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))))) (/ 1 (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (* (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)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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) (- (* 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))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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))))) (+ (/ (* (- (* 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) (- (* 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) 3) (* (pow (cos phi2) 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))))) (/ (* (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) (- (* 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))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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))))) (+ (/ (* (- (* 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))))) (+ (/ (* (- (* 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) (- (* 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) 3) (* (pow (cos phi2) 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))))) (- (+ (* (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) (- (* 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) 3) (* (pow (cos phi2) 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)))))) (/ (* (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)))))) (+ (/ (* (- (* 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) (- (* 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) 3) (* (pow (cos phi2) 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))))) (/ (* (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) (- (* 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))))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) #s(hole binary64 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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)))))
#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 phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (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))) (* -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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (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))))) (* -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 (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #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))) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (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))) (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (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))))) (* -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))) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #s(hole binary64 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #s(hole binary64 (+ (* 2 (* lambda2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (* (cos lambda1) (* (cos phi1) (cos phi2)))))
#s(approx (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #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 (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) #s(hole binary64 1))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) #s(hole binary64 (+ 1 (* lambda1 lambda2))))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) #s(hole binary64 (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2))))))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) #s(hole binary64 (+ 1 (* lambda2 (+ lambda1 (* lambda2 (- (* -1/6 (* lambda1 lambda2)) 1/2)))))))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) #s(hole binary64 (/ 1 lambda1)))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) #s(hole binary64 (+ lambda2 (/ 1 lambda1))))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) #s(hole binary64 (+ (* lambda2 (+ 1 (* -1/2 (/ lambda2 lambda1)))) (/ 1 lambda1))))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) #s(hole binary64 (+ (* lambda2 (+ 1 (* lambda2 (- (* -1/6 lambda2) (* 1/2 (/ 1 lambda1)))))) (/ 1 lambda1))))
#s(approx (/ (cos lambda2) lambda1) #s(hole binary64 (/ 1 lambda1)))
#s(approx (/ (cos lambda2) lambda1) #s(hole binary64 (+ (* -1/2 (/ (pow lambda2 2) lambda1)) (/ 1 lambda1))))
#s(approx (/ (cos lambda2) lambda1) #s(hole binary64 (+ (* (pow lambda2 2) (- (* 1/24 (/ (pow lambda2 2) lambda1)) (* 1/2 (/ 1 lambda1)))) (/ 1 lambda1))))
#s(approx (/ (cos lambda2) lambda1) #s(hole binary64 (+ (* (pow lambda2 2) (- (* (pow lambda2 2) (+ (* -1/720 (/ (pow lambda2 2) lambda1)) (* 1/24 (/ 1 lambda1)))) (* 1/2 (/ 1 lambda1)))) (/ 1 lambda1))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) #s(hole binary64 (* (pow lambda1 2) (- (/ 1 (pow lambda1 2)) 1/2))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) #s(hole binary64 (+ (* lambda1 lambda2) (* (pow lambda1 2) (- (/ 1 (pow lambda1 2)) 1/2)))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) #s(hole binary64 (+ (* lambda2 (+ lambda1 (* (pow lambda1 2) (* lambda2 (- 1/4 (* 1/2 (/ 1 (pow lambda1 2)))))))) (* (pow lambda1 2) (- (/ 1 (pow lambda1 2)) 1/2)))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) #s(hole binary64 (+ (* lambda2 (+ lambda1 (* lambda2 (+ (* -1/6 (* lambda1 lambda2)) (* (pow lambda1 2) (- 1/4 (* 1/2 (/ 1 (pow lambda1 2))))))))) (* (pow lambda1 2) (- (/ 1 (pow lambda1 2)) 1/2)))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) #s(hole binary64 (- (/ 1 (pow lambda1 2)) 1/2)))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) #s(hole binary64 (- (+ (/ 1 (pow lambda1 2)) (/ lambda2 lambda1)) 1/2)))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) #s(hole binary64 (- (+ (* lambda2 (+ (* lambda2 (- 1/4 (* 1/2 (/ 1 (pow lambda1 2))))) (/ 1 lambda1))) (/ 1 (pow lambda1 2))) 1/2)))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) #s(hole binary64 (- (+ (* lambda2 (+ (* lambda2 (- (+ 1/4 (* -1/6 (/ lambda2 lambda1))) (* 1/2 (/ 1 (pow lambda1 2))))) (/ 1 lambda1))) (/ 1 (pow lambda1 2))) 1/2)))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) #s(hole binary64 (/ -1 (pow lambda1 2))))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) #s(hole binary64 (- (* -1 (/ lambda2 lambda1)) (/ 1 (pow lambda1 2)))))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) #s(hole binary64 (- (* lambda2 (- (* 1/2 (/ lambda2 (pow lambda1 2))) (/ 1 lambda1))) (/ 1 (pow lambda1 2)))))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) #s(hole binary64 (- (* lambda2 (- (* lambda2 (+ (* 1/6 (/ lambda2 lambda1)) (* 1/2 (/ 1 (pow lambda1 2))))) (/ 1 lambda1))) (/ 1 (pow lambda1 2)))))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) #s(hole binary64 (/ -1 lambda1)))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) #s(hole binary64 (- (* -1 lambda2) (/ 1 lambda1))))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) #s(hole binary64 (- (* lambda2 (- (* 1/2 (/ lambda2 lambda1)) 1)) (/ 1 lambda1))))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) #s(hole binary64 (- (* lambda2 (- (* lambda2 (+ (* 1/6 lambda2) (* 1/2 (/ 1 lambda1)))) 1)) (/ 1 lambda1))))
#s(approx (* -1 (/ (cos lambda2) lambda1)) #s(hole binary64 (/ -1 lambda1)))
#s(approx (* -1 (/ (cos lambda2) lambda1)) #s(hole binary64 (- (* 1/2 (/ (pow lambda2 2) lambda1)) (/ 1 lambda1))))
#s(approx (* -1 (/ (cos lambda2) lambda1)) #s(hole binary64 (- (* (pow lambda2 2) (+ (* -1/24 (/ (pow lambda2 2) lambda1)) (* 1/2 (/ 1 lambda1)))) (/ 1 lambda1))))
#s(approx (* -1 (/ (cos lambda2) lambda1)) #s(hole binary64 (- (* (pow lambda2 2) (+ (* (pow lambda2 2) (- (* 1/720 (/ (pow lambda2 2) lambda1)) (* 1/24 (/ 1 lambda1)))) (* 1/2 (/ 1 lambda1)))) (/ 1 lambda1))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/6 (* lambda2 (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))) (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/6 (* lambda2 (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))) (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* (cos lambda1) (cos phi2)) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (+ (* (cos lambda1) (cos phi2)) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (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)) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (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)) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (/ (* lambda2 (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1)))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda2 (- (* -1 (* lambda2 (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (+ (* 1/6 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1)))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (/ (* (cos phi2) (* (sin lambda1) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- 1 (* (cos lambda1) (cos phi2))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (/ 1 (- 1 (* (cos lambda1) (cos phi2)))) (/ (* lambda2 (* (cos phi2) (sin lambda1))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* lambda2 (- (* -1 (* lambda2 (+ (* -1 (/ (* (pow (cos phi2) 2) (pow (sin lambda1) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 3))) (* 1/2 (/ (* (cos lambda1) (cos phi2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (* -1 (/ (* (cos phi2) (sin lambda1)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ 1 (- 1 (* (cos lambda1) (cos phi2)))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (+ (* 1/6 (/ (* (cos phi2) (sin lambda1)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (+ (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (pow (- 1 (* (cos lambda1) (cos phi2))) 3))) (/ (* (cos phi2) (* (sin lambda1) (+ (* -1 (/ (* (pow (cos phi2) 2) (pow (sin lambda1) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 3))) (* 1/2 (/ (* (cos lambda1) (cos phi2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* -1 (/ (* (pow (cos phi2) 2) (pow (sin lambda1) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 3))) (* 1/2 (/ (* (cos lambda1) (cos phi2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (* -1 (/ (* (cos phi2) (sin lambda1)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ 1 (- 1 (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (/ (* (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 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* 1/2 (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))))) (* -1 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (+ (* lambda2 (- (/ (* (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) (- (/ (* (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 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* 1/2 (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (* 1/6 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (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 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))) (/ (* (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 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* 1/2 (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))))) (* -1 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- (cos phi1) (* (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 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1)))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (- (* 2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (pow (- (cos phi1) (cos lambda1)) 2))))) (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (- (+ (* 2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* lambda2 (- (+ (* -1 (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1)))) (/ (pow (sin lambda1) 2) (- (cos phi1) (cos lambda1)))) (+ (* -1 (/ (* (sin lambda1) (- (* 2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (pow (- (cos phi1) (cos lambda1)) 2))))) (- (cos phi1) (cos lambda1)))) (* 1/2 (/ (pow (cos lambda1) 3) (pow (- (cos phi1) (cos lambda1)) 2))))))) (* -1 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (pow (- (cos phi1) (cos lambda1)) 2))))) (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (- (+ (* 2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* lambda2 (- (+ (* -1 (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1)))) (+ (* lambda2 (- (+ (* -1 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1/3 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1))))) (+ (* -1 (/ (* (sin lambda1) (- (+ (* -1 (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1)))) (/ (pow (sin lambda1) 2) (- (cos phi1) (cos lambda1)))) (+ (* -1 (/ (* (sin lambda1) (- (* 2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (pow (- (cos phi1) (cos lambda1)) 2))))) (- (cos phi1) (cos lambda1)))) (* 1/2 (/ (pow (cos lambda1) 3) (pow (- (cos phi1) (cos lambda1)) 2)))))) (- (cos phi1) (cos lambda1)))) (+ (* 1/6 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (pow (- (cos phi1) (cos lambda1)) 2))) (* 1/2 (/ (* (cos lambda1) (- (* 2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (pow (- (cos phi1) (cos lambda1)) 2))))) (- (cos phi1) (cos lambda1)))))))) (/ (pow (sin lambda1) 2) (- (cos phi1) (cos lambda1))))) (+ (* -1 (/ (* (sin lambda1) (- (* 2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (pow (- (cos phi1) (cos lambda1)) 2))))) (- (cos phi1) (cos lambda1)))) (* 1/2 (/ (pow (cos lambda1) 3) (pow (- (cos phi1) (cos lambda1)) 2))))))) (* -1 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (pow (- (cos phi1) (cos lambda1)) 2))))) (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) #s(hole binary64 (+ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (cos phi1) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (cos phi1) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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))) (- (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda2 (- (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* lambda2 (- (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (/ (* (+ (* (cos lambda1) (* (cos phi2) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 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))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 4)) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* lambda2 (- (+ (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* lambda2 (- (* 1/6 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (/ (* (+ (* (cos lambda1) (* (cos phi2) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 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))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 4)) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (/ (* (+ (* -1 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 1/3 (* (cos phi2) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 4)) (+ (/ (* (+ (* (cos lambda1) (* (cos phi2) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 1/6 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (+ (* (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (/ (* (+ (* (cos lambda1) (* (cos phi2) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 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))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 4)) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ (* lambda2 (- (* -1 (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1)))) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))))) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -1 (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1)))) (* lambda2 (- (* 1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2)))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))))) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))))) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -1 (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1)))) (* lambda2 (- (+ (* 1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2)))) (* lambda2 (- (* 1/6 (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1)))) (* (pow (cos phi2) 2) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 1/6 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (+ (* (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))))))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))))) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))))) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* -1 (* lambda2 (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))))) (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1)))) (* 1/2 (* lambda2 (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))))))) (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1)))) (* lambda2 (+ (* 1/6 (* lambda2 (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))))) (* 1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2)))))))) (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* lambda2 (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* lambda2 (* (pow (cos phi2) 2) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 1/6 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (+ (* (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* -2 (* lambda2 (* (cos phi2) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda2 (+ (* -2 (* (cos phi2) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (* lambda2 (+ (* (cos lambda1) (* (cos phi2) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda2 (+ (* -2 (* (cos phi2) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (* lambda2 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 1/3 (* (cos phi2) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (+ (* (cos lambda1) (* (cos phi2) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (* lambda2 (- (* -2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (* 1/2 (/ 1 (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (* 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) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))))) (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (* 1/2 (/ 1 (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (* 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) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))))) (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (* 1/2 (/ 1 (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (+ 1/2 (+ (* -2 (* lambda2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))))) (* 1/2 (cos (* 2 phi1))))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* 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 lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* 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 lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #s(hole binary64 (- (pow (cos phi1) 2) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #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 (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #s(hole binary64 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #s(hole binary64 (+ (* 2 (* lambda2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #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 (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #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 (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (* 2 (log (* (cos lambda1) (cos phi2))))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (+ (* 2 (log (* (cos lambda1) (cos phi2)))) (* 2 (/ (* lambda2 (sin lambda1)) (cos lambda1))))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (+ (* 2 (log (* (cos lambda1) (cos phi2)))) (* lambda2 (+ (* 2 (/ (sin lambda1) (cos lambda1))) (* lambda2 (- (* -1 (/ (pow (sin lambda1) 2) (pow (cos lambda1) 2))) 1)))))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (+ (* 2 (log (* (cos lambda1) (cos phi2)))) (* lambda2 (+ (* 2 (/ (sin lambda1) (cos lambda1))) (* lambda2 (- (+ (* -1 (/ (pow (sin lambda1) 2) (pow (cos lambda1) 2))) (* 1/3 (* lambda2 (+ (* -1 (/ (sin lambda1) (cos lambda1))) (+ (* 2 (/ (pow (sin lambda1) 3) (pow (cos lambda1) 3))) (* 3 (/ (sin lambda1) (cos lambda1)))))))) 1)))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (log (* (cos lambda1) (cos phi2)))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (+ (log (* (cos lambda1) (cos phi2))) (/ (* lambda2 (sin lambda1)) (cos lambda1)))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (+ (log (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* 1/2 (* lambda2 (- (* -1 (/ (pow (sin lambda1) 2) (pow (cos lambda1) 2))) 1))) (/ (sin lambda1) (cos lambda1)))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (+ (log (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* lambda2 (+ (* 1/6 (* lambda2 (+ (* -1 (/ (sin lambda1) (cos lambda1))) (+ (* 2 (/ (pow (sin lambda1) 3) (pow (cos lambda1) 3))) (* 3 (/ (sin lambda1) (cos lambda1))))))) (* 1/2 (- (* -1 (/ (pow (sin lambda1) 2) (pow (cos lambda1) 2))) 1)))) (/ (sin lambda1) (cos lambda1)))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* lambda2 (- (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (/ (pow (cos phi1) 6) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (/ (* (pow (cos lambda1) 6) (pow (cos phi2) 6)) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (* lambda2 (- (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (+ (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (- (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))) (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (/ (pow (cos phi1) 6) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (/ (* (pow (cos lambda1) 6) (pow (cos phi2) 6)) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (* lambda2 (- (+ (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (* lambda2 (- (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (+ (* -1/2 (pow (cos lambda1) 3)) (+ (* 2 (* (cos lambda1) (pow (sin lambda1) 2))) (* (cos lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* 2 (* (pow (cos lambda1) 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 phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (+ (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (- (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (- (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (+ (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (- (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))))) (+ (* 1/6 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))))) (+ (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (- (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))) (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (/ (pow (cos phi1) 6) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (/ (* (pow (cos lambda1) 6) (pow (cos phi2) 6)) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) #s(hole binary64 (/ (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6))) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) #s(hole binary64 (- (+ (* lambda2 (- (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))))) (/ (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2)))) (/ (pow (cos phi1) 6) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))))) (/ (* (pow (cos lambda1) 6) (pow (cos phi2) 6)) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))))) (* lambda2 (- (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))))) (+ (/ (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))))) (/ (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2)))) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))) (/ (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2)))))) (/ (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2)))) (/ (pow (cos phi1) 6) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))))) (/ (* (pow (cos lambda1) 6) (pow (cos phi2) 6)) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))))) (* lambda2 (- (+ (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))))) (* lambda2 (- (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (+ (* -1/2 (pow (cos lambda1) 3)) (+ (* 2 (* (cos lambda1) (pow (sin lambda1) 2))) (* (cos lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* 2 (* (pow (cos lambda1) 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 phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))))) (+ (/ (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))))) (+ (/ (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))))) (/ (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2)))) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))) (/ (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2))))) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))) (+ (/ (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2)) (/ (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))))) (/ (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2)))) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))))))))) (+ (/ (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))))) (/ (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2)))) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))) (/ (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2)))))) (/ (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2)))) (/ (pow (cos phi1) 6) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))))) (/ (* (pow (cos lambda1) 6) (pow (cos phi2) 6)) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) #s(hole binary64 (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) #s(hole binary64 (- (+ (* -2 (* lambda2 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))))) (pow (cos phi1) 6)) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) #s(hole binary64 (- (+ (* lambda2 (- (* -1 (* lambda2 (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))))) (* 2 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))))) (pow (cos phi1) 6)) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) #s(hole binary64 (- (+ (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (* (pow (cos phi2) 6) (+ (* 2 (* (+ (* -1/2 (pow (cos lambda1) 3)) (+ (* 2 (* (cos lambda1) (pow (sin lambda1) 2))) (* (cos lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* 2 (* (pow (cos lambda1) 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) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))))) (* 2 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))))) (pow (cos phi1) 6)) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))))
#s(approx (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) #s(hole binary64 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))
#s(approx (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) #s(hole binary64 (+ (* 2 (* lambda2 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))))) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))))
#s(approx (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) #s(hole binary64 (+ (* lambda2 (+ (* 2 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* lambda2 (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))))) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))))
#s(approx (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) #s(hole binary64 (+ (* lambda2 (+ (* 2 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* lambda2 (+ (* lambda2 (* (pow (cos phi2) 6) (+ (* 2 (* (+ (* -1/2 (pow (cos lambda1) 3)) (+ (* 2 (* (cos lambda1) (pow (sin lambda1) 2))) (* (cos lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* 2 (* (pow (cos lambda1) 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) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))))))) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) #s(hole binary64 (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) #s(hole binary64 (+ (* lambda2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) #s(hole binary64 (+ (* lambda2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (+ (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))) (* lambda2 (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))))) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) #s(hole binary64 (+ (* lambda2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (+ (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))) (* lambda2 (+ (* lambda2 (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))))))) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (+ (* lambda2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (+ (* lambda2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (+ (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))) (* lambda2 (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))))) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (+ (* lambda2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (+ (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))) (* lambda2 (+ (* lambda2 (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))))))) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* 2 (* lambda2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1)))))) (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* lambda2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* lambda2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))) (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* lambda2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* lambda2 (+ (* lambda2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))) (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (+ (* -1 (pow lambda2 3)) (pow lambda1 3))))
#s(approx (pow lambda2 3) #s(hole binary64 (pow lambda2 3)))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 lambda2) (pow lambda1 2))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) #s(hole binary64 (* lambda2 (+ lambda1 lambda2))))
#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 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 (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/2 (* lambda2 (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))))) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))) (* lambda2 (+ (* -1/2 (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))) (* 1/6 (* lambda2 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))))))) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) #s(hole binary64 (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/2 (* lambda2 (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))) (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* lambda2 (+ (* -1/2 (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* 1/6 (* lambda2 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))))) (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (/ (+ (pow lambda1 3) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 3)) (- (+ (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)) (* lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (- (+ (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)) (* lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) #s(hole binary64 (- (pow lambda1 2) (* lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) #s(hole binary64 (/ (- (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)) (- lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* lambda2 (- (* -1 (/ (+ (* -1 (pow lambda1 2)) (pow lambda1 2)) (pow lambda2 2))) (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* lambda2 (- (/ (* lambda1 (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) (pow lambda2 3)) (+ 1 (+ (* -1 (/ lambda1 lambda2)) (+ (* -1 (/ (pow lambda1 2) (pow lambda2 2))) (/ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 lambda2))
#s(approx (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (* lambda2 (- (+ 1 (+ (* 1/2 (/ (PI) lambda2)) (/ phi2 lambda2))) (/ lambda1 lambda2)))))
#s(approx (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (* -1 lambda2)))
#s(approx (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (* lambda2 (- (+ (* 1/2 (/ (PI) lambda2)) (+ (/ lambda1 lambda2) (/ phi2 lambda2))) 1))))
#s(approx (cos lambda2) #s(hole binary64 (cos lambda2)))
#s(approx (neg (sin lambda2)) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (sin lambda2) #s(hole binary64 (sin lambda2)))
#s(approx (* (cos phi2) (neg (sin lambda2))) #s(hole binary64 (* -1 (* (cos phi2) (sin lambda2)))))
#s(approx (* (cos phi2) (cos lambda2)) #s(hole binary64 (* (cos lambda2) (cos phi2))))
#s(approx (sin (+ lambda2 (/ (PI) 2))) #s(hole binary64 (sin (+ lambda2 (* 1/2 (PI))))))
#s(approx (+ lambda2 (/ (PI) 2)) #s(hole binary64 lambda2))
#s(approx (+ lambda2 (/ (PI) 2)) #s(hole binary64 (* lambda2 (+ 1 (* 1/2 (/ (PI) lambda2))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos lambda2) (cos phi2)))))
#s(approx (* -1/2 (cos lambda2)) #s(hole binary64 (* -1/2 (cos lambda2))))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* lambda2 (- (* -1 (/ (+ (* -1 (pow lambda1 2)) (pow lambda1 2)) (pow lambda2 2))) (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* lambda2 (- (/ (* lambda1 (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) (pow lambda2 3)) (+ 1 (+ (* -1 (/ lambda1 lambda2)) (+ (* -1 (/ (pow lambda1 2) (pow lambda2 2))) (/ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (- (* -1 (/ (+ (* -1 (pow lambda1 2)) (pow lambda1 2)) (pow lambda2 2))) (+ 1 (* -1 (/ lambda1 lambda2))))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (- (/ (* lambda1 (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) (pow lambda2 3)) (+ 1 (+ (* -1 (/ lambda1 lambda2)) (+ (* -1 (/ (pow lambda1 2) (pow lambda2 2))) (/ (pow lambda1 2) (pow lambda2 2))))))))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) #s(hole binary64 (+ 1 (+ (/ lambda1 lambda2) (/ (pow lambda1 2) (pow lambda2 2))))))
#s(approx (* lambda2 (- (/ lambda1 lambda2) 1)) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1))))
#s(approx (+ (cos lambda2) (cos phi1)) #s(hole binary64 (+ (cos lambda2) (cos phi1))))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) #s(hole binary64 (* -1 lambda2)))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) #s(hole binary64 (* lambda2 (- (+ (* 1/2 (/ (PI) lambda2)) (/ lambda1 lambda2)) 1))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (* (cos lambda2) (cos phi2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (* (cos lambda2) (cos phi2)) (* (cos (* 1/2 (PI))) (sin phi1)))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (* (pow lambda2 3) (- (/ (pow lambda1 3) (pow lambda2 3)) 1))))
#s(approx (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) #s(hole binary64 (* (pow lambda2 3) (- (/ (pow lambda1 3) (pow lambda2 3)) 1))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (* (pow lambda2 2) (+ 1 (/ lambda1 lambda2)))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (* (pow lambda2 2) (+ 1 (+ (/ lambda1 lambda2) (/ (pow lambda1 2) (pow lambda2 2)))))))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) #s(hole binary64 (* (pow lambda2 2) (+ 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))) lambda1) 1) 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))) lambda1) 1) #s(hole binary64 (+ 1 (/ (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) lambda1))))
#s(approx (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1) #s(hole binary64 (/ (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) lambda1)))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (* (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 (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) #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))) #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 (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos phi1) (cos (+ lambda1 (* -1 lambda2))))))
#s(approx (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) lambda1) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))) lambda1)))))
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) #s(hole binary64 (+ 1 (/ (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))) lambda1))))
#s(approx (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) #s(hole binary64 (/ (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))) lambda1)))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (cos (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ (- (+ (* -1 (/ (pow lambda1 2) lambda2)) (/ (pow lambda1 2) lambda2)) (* -1 lambda1)) lambda2)))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ (- (* -1 (/ (- (/ (* lambda1 (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) lambda2) (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) lambda2)) (* -1 lambda1)) lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (+ lambda1 (* -1 lambda2))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (cos (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI))))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* 1/2 (+ (sin (+ lambda1 (+ phi2 (+ (* -1 lambda2) (* 1/2 (PI)))))) (sin (- (+ phi2 (* 1/2 (PI))) (+ lambda1 (* -1 lambda2)))))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* 1/2 (+ (sin (+ lambda1 (+ phi2 (+ (* -1 lambda2) (* 1/2 (PI)))))) (sin (- (+ phi2 (* 1/2 (PI))) (+ lambda1 (* -1 lambda2))))))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (cos phi1) (* 1/2 (+ (sin (+ lambda1 (+ phi2 (+ (* -1 lambda2) (* 1/2 (PI)))))) (sin (- (+ phi2 (* 1/2 (PI))) (+ lambda1 (* -1 lambda2)))))))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) #s(hole binary64 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (+ (* -1 lambda2) (* 1/2 (PI)))))) (sin (- (+ phi2 (* 1/2 (PI))) (+ lambda1 (* -1 lambda2))))))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (+ lambda1 (+ phi2 (+ (* -1 lambda2) (* 1/2 (PI)))))) (sin (- (+ phi2 (* 1/2 (PI))) (+ lambda1 (* -1 lambda2)))))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (sin (- (+ phi2 (* 1/2 (PI))) (+ lambda1 (* -1 lambda2))))))
#s(approx (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (* -1 (* lambda2 (- (* -1 (/ (- (+ phi2 (* 1/2 (PI))) lambda1) lambda2)) 1)))))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (sin (+ lambda1 (+ phi2 (+ (* -1 lambda2) (* 1/2 (PI))))))))
#s(approx (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2)))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (+ lambda1 (* -1 lambda2))) (* -1/2 (* (pow phi2 2) (sin (+ 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 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (- (* lambda1 (sin (- (* 1/2 (PI)) (* -1 lambda2)))) (sin lambda2))))
#s(approx (sin (+ lambda2 (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (* -1 lambda2)))))
#s(approx (+ lambda2 (/ (PI) 2)) #s(hole binary64 (* -1 (* lambda2 (- (* -1/2 (/ (PI) lambda2)) 1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (sin (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ (+ lambda1 (* -1 (/ (+ (* -1 (pow lambda1 2)) (pow lambda1 2)) lambda2))) lambda2)))))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ (+ lambda1 (* -1 (/ (+ (* -1 (/ (* lambda1 (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) lambda2)) (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) lambda2))) lambda2)))))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (- (* -1 (/ (- (+ (* -1 (/ (pow lambda1 2) lambda2)) (/ (pow lambda1 2) lambda2)) lambda1) lambda2)) 1)))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (- (* -1 (/ (- (* -1 (/ (- (/ (* lambda1 (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) lambda2) (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) lambda2)) lambda1) lambda2)) 1)))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) #s(hole binary64 (+ 1 (* -1 (/ (+ (* -1 lambda1) (* -1 (/ (pow lambda1 2) lambda2))) lambda2)))))
#s(approx (* lambda2 (- (/ lambda1 lambda2) 1)) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (cos (+ lambda1 (* -1 lambda2))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (cos (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (sin (+ lambda1 (+ (* -1 lambda2) (* 1/2 (PI)))))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) #s(hole binary64 (sin (+ lambda1 (+ (* -1 lambda2) (* 1/2 (PI)))))))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ (+ lambda1 (* 1/2 (PI))) lambda2)))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (* (cos (+ lambda1 (* -1 lambda2))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (* (cos (+ lambda1 (* -1 lambda2))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos (+ lambda1 (* -1 lambda2))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (/ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (/ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (/ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (/ (- 1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- 1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (- (pow (cos phi1) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (- (cos phi1) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (pow (cos phi1) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))))
#s(approx (pow (cos (- lambda1 lambda2)) 2) #s(hole binary64 (pow (cos (+ lambda1 (* -1 lambda2))) 2)))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (cos phi1) (cos (+ lambda1 (* -1 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (/ (+ 1 (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 3))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) #s(hole binary64 (+ 1 (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 3)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3) #s(hole binary64 (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 3))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (/ (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (/ (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))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (/ (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (/ (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (/ (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (/ (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (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 (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 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 (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) #s(hole binary64 (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 3))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (+ lambda1 (* -1 lambda2))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (+ (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (+ (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (- (cos phi1) (* (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 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (pow (cos (+ lambda1 (* -1 lambda2))) 2) (- (cos phi1) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) #s(hole binary64 (+ (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 3)) (pow (cos phi1) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 3)) (pow (cos phi1) 3))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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))) (- (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 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* (pow (cos phi2) 2) (* (pow (cos (+ lambda1 (* -1 lambda2))) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) 2))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* (pow (cos phi2) 2) (* (pow (cos (+ lambda1 (* -1 lambda2))) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) 2)))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* (pow (cos phi2) 2) (* (pow (cos (+ lambda1 (* -1 lambda2))) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) 2))))
#s(approx (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (* (pow (cos (+ lambda1 (* -1 lambda2))) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (pow (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) 2)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #s(hole binary64 (- (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (* 2 (log (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (log (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (+ lambda1 (* -1 lambda2))) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (+ lambda1 (* -1 lambda2))) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (+ lambda1 (* -1 lambda2))) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) #s(hole binary64 (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (+ lambda1 (* -1 lambda2))) 6))) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)) (pow (cos phi1) 4))))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) #s(hole binary64 (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (+ lambda1 (* -1 lambda2))) 6)))))
#s(approx (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) #s(hole binary64 (* (pow (cos phi2) 6) (pow (cos (+ lambda1 (* -1 lambda2))) 6))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) #s(hole binary64 (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)) (pow (cos phi1) 4)))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (* -1 (* (pow lambda2 3) (+ 1 (* -1 (/ (pow lambda1 3) (pow lambda2 3))))))))
#s(approx (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) #s(hole binary64 (* -1 (* (pow lambda2 3) (+ 1 (* -1 (/ (pow lambda1 3) (pow lambda2 3))))))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (* (pow lambda2 2) (+ 1 (* -1 (/ (+ (* -1 lambda1) (* -1 (/ (pow lambda1 2) lambda2))) lambda2))))))
#s(approx (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (sin (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (sin (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (* (sin (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (sin (+ lambda1 (* -1 lambda2))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (sin (+ lambda1 (* -1 lambda2))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) #s(hole binary64 (* (sin (+ lambda1 (* -1 lambda2))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (/ (+ (pow lambda1 3) (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 3)) (- (+ (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 2)) (* lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) #s(hole binary64 (+ (pow lambda1 3) (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 3))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 3)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (- (+ (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 2)) (* lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 2)))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) #s(hole binary64 (- (pow lambda1 2) (* 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))) lambda1) #s(hole binary64 (* lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) #s(hole binary64 (/ (- (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 2)) (- lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) #s(hole binary64 (- (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 2))))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) #s(hole binary64 (- lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) lambda1))))))
#s(approx (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) #s(hole binary64 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) lambda1)))))
#s(approx (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) #s(hole binary64 (* -1 (/ (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) lambda1))))
#s(approx (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) #s(hole binary64 (/ (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) lambda1)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #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 (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (cos (- lambda1 lambda2)))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (* -1/2 (pow phi1 2))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (* (cos phi2) (cos (- lambda1 lambda2)))))
#s(approx (* phi1 phi1) #s(hole binary64 (pow phi1 2)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ 1 (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ 1 (+ (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ 1 (+ (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ 1 (* 1/2 (+ (sin (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2)) (sin (- (+ lambda2 (+ phi2 (* 1/2 (PI)))) lambda1)))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* 1/2 (+ (sin (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2)) (sin (- (+ lambda2 (+ phi2 (* 1/2 (PI)))) lambda1))))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ 1 (+ (* 1/2 (+ (sin (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2)) (sin (- (+ lambda2 (+ phi2 (* 1/2 (PI)))) lambda1)))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ 1 (+ (* 1/2 (+ (sin (- (+ lambda1 (+ phi2 (* 1/2 (PI)))) lambda2)) (sin (- (+ lambda2 (+ phi2 (* 1/2 (PI)))) lambda1)))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (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)))))))
#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 lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (* (cos lambda2) (cos phi2)))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos lambda2) (cos phi2))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos lambda2) (cos phi2)) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos lambda2) (cos phi2)) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (* (cos lambda1) (cos phi2)))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos lambda2) (cos phi1)) #s(hole binary64 (+ 1 (cos lambda2))))
#s(approx (+ (cos lambda2) (cos phi1)) #s(hole binary64 (+ 1 (+ (cos lambda2) (* -1/2 (pow phi1 2))))))
#s(approx (+ (cos lambda2) (cos phi1)) #s(hole binary64 (+ 1 (+ (cos lambda2) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos lambda2) (cos phi1)) #s(hole binary64 (+ 1 (+ (cos lambda2) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos phi1) (cos phi2)) #s(hole binary64 (+ 1 (cos phi2))))
#s(approx (+ (cos phi1) (cos phi2)) #s(hole binary64 (+ 1 (+ (cos phi2) (* -1/2 (pow phi1 2))))))
#s(approx (+ (cos phi1) (cos phi2)) #s(hole binary64 (+ 1 (+ (cos phi2) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (cos phi2)) #s(hole binary64 (+ 1 (+ (cos phi2) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))
#s(approx (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (sin (* 1/2 (PI))) (* phi1 (cos (* 1/2 (PI))))))))
#s(approx (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (sin (* 1/2 (PI))) (* phi1 (+ (cos (* 1/2 (PI))) (* -1/2 (* phi1 (sin (* 1/2 (PI)))))))))))
#s(approx (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (sin (* 1/2 (PI))) (* phi1 (+ (cos (* 1/2 (PI))) (* phi1 (+ (* -1/2 (sin (* 1/2 (PI)))) (* -1/6 (* phi1 (cos (* 1/2 (PI)))))))))))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi1 (cos (* 1/2 (PI)))))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi1 (+ (cos (* 1/2 (PI))) (* -1/2 (* phi1 (sin (* 1/2 (PI))))))))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi1 (+ (cos (* 1/2 (PI))) (* phi1 (+ (* -1/2 (sin (* 1/2 (PI)))) (* -1/6 (* phi1 (cos (* 1/2 (PI))))))))))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi1)) #s(hole binary64 (* phi1 (cos (* 1/2 (PI))))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi1)) #s(hole binary64 (* phi1 (+ (cos (* 1/2 (PI))) (* -1/6 (* (pow phi1 2) (cos (* 1/2 (PI)))))))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi1)) #s(hole binary64 (* phi1 (+ (cos (* 1/2 (PI))) (* (pow phi1 2) (+ (* -1/6 (cos (* 1/2 (PI)))) (* 1/120 (* (pow phi1 2) (cos (* 1/2 (PI)))))))))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi1)) #s(hole binary64 (* phi1 (+ (cos (* 1/2 (PI))) (* (pow phi1 2) (+ (* -1/6 (cos (* 1/2 (PI)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (cos (* 1/2 (PI))))) (* 1/120 (cos (* 1/2 (PI))))))))))))
#s(approx (sin phi1) #s(hole binary64 phi1))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* -1/6 (pow phi1 2))))))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* (pow phi1 2) (- (* 1/120 (pow phi1 2)) 1/6))))))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/120 (* -1/5040 (pow phi1 2)))) 1/6))))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* (cos lambda2) (cos phi2)))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (+ (* phi1 (cos (* 1/2 (PI)))) (* (cos lambda2) (cos phi2))))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (+ (* phi1 (+ (cos (* 1/2 (PI))) (* -1/2 (* phi1 (sin (* 1/2 (PI))))))) (* (cos lambda2) (cos phi2))))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (+ (* phi1 (+ (cos (* 1/2 (PI))) (* phi1 (+ (* -1/2 (sin (* 1/2 (PI)))) (* -1/6 (* phi1 (cos (* 1/2 (PI))))))))) (* (cos lambda2) (cos phi2))))))
#s(approx (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (* (cos lambda2) (cos phi2))))
#s(approx (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (* phi1 (cos (* 1/2 (PI)))) (* (cos lambda2) (cos phi2)))))
#s(approx (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (* phi1 (+ (cos (* 1/2 (PI))) (* -1/6 (* (pow phi1 2) (cos (* 1/2 (PI))))))) (* (cos lambda2) (cos phi2)))))
#s(approx (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (* phi1 (+ (cos (* 1/2 (PI))) (* (pow phi1 2) (+ (* -1/6 (cos (* 1/2 (PI)))) (* 1/120 (* (pow phi1 2) (cos (* 1/2 (PI))))))))) (* (cos lambda2) (cos phi2)))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (/ 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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 1/2 (/ 1 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* (pow phi1 2) (- (+ (* -1/4 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 1/24 (/ 1 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* (pow phi1 2) (- (+ (* -1/4 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* (pow phi1 2) (- (+ (* -1/720 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/720 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/48 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (* 1/2 (/ (+ (* -1/4 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))) (+ (* -1/2 (/ (- (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 1/24 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* 1/24 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 2/45 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 1/24 (/ 1 (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 (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (- 1 (cos (- lambda1 lambda2))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* -1/2 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2))))))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* 1/3 (/ 1 (- 1 (cos (- lambda1 lambda2))))) (+ (* 1/24 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (+ (* -1/2 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (- 1 (cos (- lambda1 lambda2)))))))) (+ (* -1/2 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2))))))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* -1 (* (pow phi1 2) (+ (* -1/2 (/ (- (* 1/3 (/ 1 (- 1 (cos (- lambda1 lambda2))))) (+ (* 1/24 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (+ (* -1/2 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (- 1 (cos (- lambda1 lambda2))))))) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (/ (+ (* -1/2 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/720 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* 2/45 (/ 1 (- 1 (cos (- lambda1 lambda2)))))))))) (* 1/3 (/ 1 (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/24 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (+ (* -1/2 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (- 1 (cos (- lambda1 lambda2)))))))) (+ (* -1/2 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2))))))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- 1 (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ 1 (* -1 (pow phi1 2))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1))) (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))) #s(hole binary64 (- 1 (cos (- lambda1 lambda2)))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ 1 (* -1/2 (pow phi1 2))) (cos (- lambda1 lambda2)))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))) (cos (- lambda1 lambda2)))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))) (cos (- lambda1 lambda2)))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (+ (* phi1 (cos (* 1/2 (PI)))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (+ (* phi1 (+ (cos (* 1/2 (PI))) (* -1/2 (* phi1 (sin (* 1/2 (PI))))))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (+ (* phi1 (+ (cos (* 1/2 (PI))) (* phi1 (+ (* -1/2 (sin (* 1/2 (PI)))) (* -1/6 (* phi1 (cos (* 1/2 (PI))))))))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi1 (cos (* 1/2 (PI)))))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi1 (+ (cos (* 1/2 (PI))) (* -1/2 (* phi1 (sin (* 1/2 (PI))))))))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi1 (+ (cos (* 1/2 (PI))) (* phi1 (+ (* -1/2 (sin (* 1/2 (PI)))) (* -1/6 (* phi1 (cos (* 1/2 (PI))))))))))))
#s(approx (+ 1 (* -1/2 (* phi1 phi1))) #s(hole binary64 1))
#s(approx (+ 1 (* -1/2 (* phi1 phi1))) #s(hole binary64 (+ 1 (* -1/2 (pow phi1 2)))))
#s(approx (* -1/2 (* phi1 phi1)) #s(hole binary64 (* -1/2 (pow phi1 2))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (/ 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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (+ (* -1 (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 1 (* -1/2 (* (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))))) (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* 1/24 (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 7/8 (/ 1 (- (+ 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) (pow (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* 1/3 (/ 1 (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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))))) (/ (* (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) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 1 (* -1/2 (* (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))))) (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* -1 (* (pow phi1 2) (+ (* -1 (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (- (+ (* 1/24 (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 7/8 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2))))))) (+ (* 1/3 (/ 1 (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (* (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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)))))) (+ (* -1 (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 2/45 (* -1/720 (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* -1 (/ (+ 2/45 (* -1/720 (* (cos phi2) (cos (- lambda1 lambda2))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 61/240 (/ 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 (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (pow (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (/ (* (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))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (- 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)))) 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))) (* 7/8 (/ 1 (- (+ 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) (pow (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* 1/3 (/ 1 (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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))))) (/ (* (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) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 1 (* -1/2 (* (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))))) (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* 1/24 (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 7/8 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2))))))) (+ (* 1/3 (/ 1 (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* -1 (* (pow phi1 2) (+ (* -1 (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (- (+ (* 1/24 (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 7/8 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2))))))) (+ (* 1/3 (/ 1 (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (* (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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)))))) (+ (* -1 (/ (+ 2/45 (* -1/720 (* (cos phi2) (cos (- lambda1 lambda2))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 61/240 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2))))))))))) (+ (* 1/24 (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 7/8 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))))))) (+ (* 1/3 (/ 1 (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (* (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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (/ (* (pow phi1 2) (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (/ (* (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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* (pow phi1 2) (- (* -1 (* (pow phi1 2) (+ (* -1 (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (pow (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (/ (* (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) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (/ (* (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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* -1 (* (pow phi1 2) (+ (* -1 (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 2/45 (* -1/720 (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1 (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (pow (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (/ (* (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))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (- 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)))) 3)))))) (+ (* -1 (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (pow (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (/ (* (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) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (/ (* (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 phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* 1/2 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (* -1/24 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* -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 (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* 1/720 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/24 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (cos phi1) (* (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 (+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #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) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* phi1 (cos (* 1/2 (PI)))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* phi1 (+ (cos (* 1/2 (PI))) (* -1/2 phi1))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* phi1 (+ (cos (* 1/2 (PI))) (* phi1 (- (* -1/6 (* phi1 (cos (* 1/2 (PI))))) 1/2)))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) #s(hole binary64 1))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) #s(hole binary64 (+ 1 (* phi1 (cos (* 1/2 (PI)))))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) #s(hole binary64 (+ 1 (* phi1 (+ (cos (* 1/2 (PI))) (* -1/2 phi1))))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) #s(hole binary64 (+ 1 (* phi1 (+ (cos (* 1/2 (PI))) (* phi1 (- (* -1/6 (* phi1 (cos (* 1/2 (PI))))) 1/2)))))))
#s(approx (* (cos phi1) 1) #s(hole binary64 1))
#s(approx (* (cos phi1) 1) #s(hole binary64 (+ 1 (* -1/2 (pow phi1 2)))))
#s(approx (* (cos phi1) 1) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))))
#s(approx (* (cos phi1) 1) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi1 2) (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi1 2) (- (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* (pow phi1 2) (- (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 1/24 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi1 2) (- (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* (pow phi1 2) (- (+ (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* (pow phi1 2) (- (* 1/720 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* -1/2 (/ (- (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 1/24 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* 1/24 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 2/45 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 1/24 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi1 2) (- (* -1 (* (pow phi1 2) (+ (* -1/4 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* -1 (* (pow phi1 2) (+ (* -1/720 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/48 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (* 1/2 (/ (+ (* -1/4 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))) (+ (* -1/4 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#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 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow phi1 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (pow phi1 2) (- (* -1 (* (pow phi1 2) (+ (* -1/4 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 3))) (* 1/24 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (* -1/2 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* -1 (* (pow phi1 2) (+ (* -1/720 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (+ (* 1/48 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 3))) (* 1/2 (/ (+ (* -1/4 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 3))) (* 1/24 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (- 1 (cos (- lambda1 lambda2))))))))) (+ (* -1/4 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 3))) (* 1/24 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (* -1/2 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) #s(hole binary64 (+ 1 (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) #s(hole binary64 (+ 1 (+ (* -3/2 (pow phi1 2)) (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (exp (* (log (cos phi1)) 3)) #s(hole binary64 1))
#s(approx (exp (* (log (cos phi1)) 3)) #s(hole binary64 (+ 1 (* -3/2 (pow phi1 2)))))
#s(approx (exp (* (log (cos phi1)) 3)) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* 7/8 (pow phi1 2)) 3/2)))))
#s(approx (exp (* (log (cos phi1)) 3)) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 7/8 (* -61/240 (pow phi1 2)))) 3/2)))))
#s(approx (* (log (cos phi1)) 3) #s(hole binary64 (* -3/2 (pow phi1 2))))
#s(approx (* (log (cos phi1)) 3) #s(hole binary64 (* (pow phi1 2) (- (* -1/4 (pow phi1 2)) 3/2))))
#s(approx (* (log (cos phi1)) 3) #s(hole binary64 (* (pow phi1 2) (- (* (pow phi1 2) (- (* -1/15 (pow phi1 2)) 1/4)) 3/2))))
#s(approx (* (log (cos phi1)) 3) #s(hole binary64 (* (pow phi1 2) (- (* (pow phi1 2) (- (* (pow phi1 2) (- (* -17/840 (pow phi1 2)) 1/15)) 1/4)) 3/2))))
#s(approx (log (cos phi1)) #s(hole binary64 (* -1/2 (pow phi1 2))))
#s(approx (log (cos phi1)) #s(hole binary64 (* (pow phi1 2) (- (* -1/12 (pow phi1 2)) 1/2))))
#s(approx (log (cos phi1)) #s(hole binary64 (* (pow phi1 2) (- (* (pow phi1 2) (- (* -1/45 (pow phi1 2)) 1/12)) 1/2))))
#s(approx (log (cos phi1)) #s(hole binary64 (* (pow phi1 2) (- (* (pow phi1 2) (- (* (pow phi1 2) (- (* -17/2520 (pow phi1 2)) 1/45)) 1/12)) 1/2))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ 1 (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ 1 (+ (* -3/2 (pow phi1 2)) (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ 1 (+ (* (pow phi1 2) (- (* 7/8 (pow phi1 2)) 3/2)) (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ 1 (+ (* (pow phi1 2) (- (* (pow phi1 2) (+ 7/8 (* -61/240 (pow phi1 2)))) 3/2)) (* (pow (cos phi2) 3) (pow (cos (- 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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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))) (- (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* -1 (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))) (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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 (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 4))) (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 11/24 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (/ (* (+ 1/4 (* 1/12 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 4))))))))) (+ (* -1 (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))) (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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 (/ (* (+ 1/4 (* 1/12 (- 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)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* -1 (/ (- (* 1/3 (/ 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)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 4))) (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 11/24 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (/ (* (+ 1/4 (* 1/12 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 4)))))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* -1/720 (/ (* (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)))))) (+ (* 151/720 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ (* (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (- (* -1/360 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) 1/24)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 4))))))))) (* 1/3 (/ 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)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 4))) (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 11/24 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (/ (* (+ 1/4 (* 1/12 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 4))))))))) (+ (* -1 (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))) (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- 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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (* -1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ 1/2 (* -1/2 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))))))) (+ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (+ (* -1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow phi1 2) (- (+ 13/24 (* 1/3 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 1/24 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))) (+ 1/2 (* -1/2 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))))))) (+ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (+ (* -1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow phi1 2) (- (+ 13/24 (+ (* 1/3 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow phi1 2) (- (* -2/45 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ 151/720 (* -1/720 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))))) (* 1/24 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))) (+ 1/2 (* -1/2 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))))))) (+ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (* -1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) 1/2))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (+ (* -1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow phi1 2) (+ 13/24 (* 1/3 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) 1/2))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (+ (* -1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow phi1 2) (+ 13/24 (+ (* 1/3 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow phi1 2) (- (* -2/45 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) 151/720)))))) 1/2))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* -1/2 (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* (pow phi1 2) (+ (* -1/2 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 1/24 (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* (pow phi1 2) (+ (* -1/2 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (* 1/24 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))))))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi1 2) (+ (* -1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow phi1 2) (+ 1/4 (* 1/12 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi1 2) (+ (* -1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow phi1 2) (+ 1/4 (+ (* 1/12 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow phi1 2) (- (* -1/360 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) 1/24))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (+ 1 (* -1 (pow phi1 2))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #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 (+ 1/2 (* 1/2 (cos (* 2 phi1)))) #s(hole binary64 1))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 phi1)))) #s(hole binary64 (+ 1 (* -1 (pow phi1 2)))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 phi1)))) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 phi1)))) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))))
#s(approx (* 1/2 (cos (* 2 phi1))) #s(hole binary64 1/2))
#s(approx (* 1/2 (cos (* 2 phi1))) #s(hole binary64 (+ 1/2 (* -1 (pow phi1 2)))))
#s(approx (* 1/2 (cos (* 2 phi1))) #s(hole binary64 (+ 1/2 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)))))
#s(approx (* 1/2 (cos (* 2 phi1))) #s(hole binary64 (+ 1/2 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))))
#s(approx (cos (* 2 phi1)) #s(hole binary64 1))
#s(approx (cos (* 2 phi1)) #s(hole binary64 (+ 1 (* -2 (pow phi1 2)))))
#s(approx (cos (* 2 phi1)) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* 2/3 (pow phi1 2)) 2)))))
#s(approx (cos (* 2 phi1)) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/3 (* -4/45 (pow phi1 2)))) 2)))))
#s(approx (* 2 phi1) #s(hole binary64 (* 2 phi1)))
#s(approx (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #s(hole binary64 (- 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #s(hole binary64 (- (+ 1 (* -1 (pow phi1 2))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #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 (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* 4 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (+ (* -1 (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (+ (* 1/24 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ 5/3 (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* -1 (* (pow phi1 2) (+ (* -1 (/ (* (+ (* -1/2 (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (+ (* 1/24 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ 5/3 (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (+ (* 47/15 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- (* 4 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (+ (* -1 (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (+ (* 1/24 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ 5/3 (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (/ (* (+ (* -1/2 (+ 5/3 (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))))) (+ (* -1/720 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/24 (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -2/45 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 34/45))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))))) (* 4 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (+ (* -1 (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (+ (* 1/24 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ 5/3 (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) #s(hole binary64 (/ (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))) (/ (* (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2))))) (/ 1 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* 4 (/ 1 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))) (+ (* -1 (/ (* (+ (* 3 (/ 1 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))) (/ (* (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))) (/ (* (+ 5/3 (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2))))) (+ (* 3 (/ 1 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))) (/ (* (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2))))) (/ 1 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* -1 (* (pow phi1 2) (+ (* -1 (/ (* (+ 5/3 (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 3 (/ 1 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))) (/ (* (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2)))) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))) (+ (* 47/15 (/ 1 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))) (+ (/ (* (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (- (* -2/45 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 34/45)) (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2)) (/ (* (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) (- (* 4 (/ 1 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))) (+ (* -1 (/ (* (+ (* 3 (/ 1 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))) (/ (* (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))) (/ (* (+ 5/3 (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2))))) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))))))) (* 4 (/ 1 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))))) (+ (* -1 (/ (* (+ (* 3 (/ 1 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))) (/ (* (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))) (/ (* (+ 5/3 (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2))))) (+ (* 3 (/ 1 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))) (/ (* (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2))))) (/ 1 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) #s(hole binary64 (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) #s(hole binary64 (- (+ 1 (* -3 (pow phi1 2))) (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (* 4 (pow phi1 2)) 3))) (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 4 (* -47/15 (pow phi1 2)))) 3))) (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))))
#s(approx (pow (pow (cos phi1) 2) 3) #s(hole binary64 1))
#s(approx (pow (pow (cos phi1) 2) 3) #s(hole binary64 (+ 1 (* -3 (pow phi1 2)))))
#s(approx (pow (pow (cos phi1) 2) 3) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* 4 (pow phi1 2)) 3)))))
#s(approx (pow (pow (cos phi1) 2) 3) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 4 (* -47/15 (pow phi1 2)))) 3)))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) #s(hole binary64 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) #s(hole binary64 (+ 1 (+ (* (pow phi1 2) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) #s(hole binary64 (+ 1 (+ (* (pow phi1 2) (- (+ (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (pow phi1 2) (+ 5/3 (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))) 2)) (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) #s(hole binary64 (+ 1 (+ (* (pow phi1 2) (- (+ (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (pow phi1 2) (+ 5/3 (+ (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (pow phi1 2) (- (* -2/45 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 34/45)))))) 2)) (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (+ (* (pow phi1 2) (+ (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 1/3 (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))) (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (+ (* (pow phi1 2) (+ (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (pow phi1 2) (+ (* -2/45 (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))))))) (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* (pow phi1 2) (+ (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 1/3 (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* (pow phi1 2) (+ (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (pow phi1 2) (+ (* -2/45 (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))))))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (cos phi1) #s(hole binary64 (cos phi1)))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (* -1/2 (pow phi1 2))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (* (pow phi1 2) (- (+ (/ 1 (pow phi1 2)) (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow phi1 2))) 1/2))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (* -1/2 (pow phi1 2))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (* (pow phi1 2) (- (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow phi1 2)) 1/2))))
#s(approx (+ (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi1) (cos phi2))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi1)) #s(hole binary64 (* (cos (* 1/2 (PI))) (sin phi1))))
#s(approx (sin phi1) #s(hole binary64 (sin phi1)))
#s(approx (pow (cos phi1) 2) #s(hole binary64 (pow (cos phi1) 2)))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))
#s(approx (+ 1 (* -1/2 (* phi1 phi1))) #s(hole binary64 (* -1/2 (pow phi1 2))))
#s(approx (+ 1 (* -1/2 (* phi1 phi1))) #s(hole binary64 (* (pow phi1 2) (- (/ 1 (pow phi1 2)) 1/2))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) #s(hole binary64 (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))
#s(approx (* (cos phi1) 1) #s(hole binary64 (cos phi1)))
#s(approx (exp (* (log (cos phi1)) 3)) #s(hole binary64 (pow (cos phi1) 3)))
#s(approx (* (log (cos phi1)) 3) #s(hole binary64 (* 3 (log (cos phi1)))))
#s(approx (log (cos phi1)) #s(hole binary64 (log (cos phi1))))
#s(approx (pow (cos phi1) 3) #s(hole binary64 (pow (cos phi1) 3)))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 phi1)))) #s(hole binary64 (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
#s(approx (* 1/2 (cos (* 2 phi1))) #s(hole binary64 (* 1/2 (cos (* 2 phi1)))))
#s(approx (cos (* 2 phi1)) #s(hole binary64 (cos (* 2 phi1))))
#s(approx (pow (pow (cos phi1) 2) 3) #s(hole binary64 (pow (cos phi1) 6)))
#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 (* (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 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (cos (- lambda1 lambda2)))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* -1/2 (* (pow phi2 2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* (pow phi2 2) (+ (* -1/2 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* 1/24 (* (pow phi2 2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* (pow phi2 2) (+ (* -1/2 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (* 1/24 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (* -1/2 (pow phi1 2))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (+ (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* -1/2 (pow phi1 2)))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (+ (* -1/2 (pow phi1 2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2)))))))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (+ (* -1/2 (pow phi1 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 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (* -1/2 (pow phi1 2)))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* -1/2 (pow phi1 2))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (* -1/2 (pow phi1 2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (* -1/2 (pow phi1 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 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#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 (+ 1 (* -1/2 (* phi2 phi2))) #s(hole binary64 1))
#s(approx (+ 1 (* -1/2 (* phi2 phi2))) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (* -1/2 (* phi2 phi2)) #s(hole binary64 (* -1/2 (pow phi2 2))))
#s(approx (* phi2 phi2) #s(hole binary64 (pow phi2 2)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (+ (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* -1/2 (* (pow phi2 2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (+ (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* (pow phi2 2) (+ (* -1/2 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* 1/24 (* (pow phi2 2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (+ (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* (pow phi2 2) (+ (* -1/2 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (* 1/24 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* -1/2 (* (pow phi2 2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* (pow phi2 2) (+ (* -1/2 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* 1/24 (* (pow phi2 2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* (pow phi2 2) (+ (* -1/2 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (* 1/24 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (sin (+ phi2 (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ phi2 (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi2 (cos (* 1/2 (PI)))))))
#s(approx (sin (+ phi2 (/ (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 (/ (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 (+ phi2 (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ phi2 (/ (PI) 2)) #s(hole binary64 (+ phi2 (* 1/2 (PI)))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (cos phi1) (* 1/2 (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (cos phi1) (+ (* 1/2 (* phi2 (+ (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)) (cos (- (+ lambda2 (* 1/2 (PI))) lambda1))))) (* 1/2 (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (cos phi1) (+ (* 1/2 (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))) (* phi2 (+ (* 1/2 (* phi2 (+ (* -1/2 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* -1/2 (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))))) (* 1/2 (+ (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)) (cos (- (+ lambda2 (* 1/2 (PI))) lambda1))))))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (cos phi1) (+ (* 1/2 (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))) (* phi2 (+ (* 1/2 (+ (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)) (cos (- (+ lambda2 (* 1/2 (PI))) lambda1)))) (* phi2 (+ (* 1/2 (* phi2 (+ (* -1/6 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* -1/6 (cos (- (+ lambda2 (* 1/2 (PI))) lambda1)))))) (* 1/2 (+ (* -1/2 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* -1/2 (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))))))))))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) #s(hole binary64 (* 1/2 (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) #s(hole binary64 (+ (* 1/2 (* phi2 (+ (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)) (cos (- (+ lambda2 (* 1/2 (PI))) lambda1))))) (* 1/2 (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) #s(hole binary64 (+ (* 1/2 (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))) (* phi2 (+ (* 1/2 (* phi2 (+ (* -1/2 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* -1/2 (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))))) (* 1/2 (+ (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)) (cos (- (+ lambda2 (* 1/2 (PI))) lambda1)))))))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) #s(hole binary64 (+ (* 1/2 (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))) (* phi2 (+ (* 1/2 (+ (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)) (cos (- (+ lambda2 (* 1/2 (PI))) lambda1)))) (* phi2 (+ (* 1/2 (* phi2 (+ (* -1/6 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* -1/6 (cos (- (+ lambda2 (* 1/2 (PI))) lambda1)))))) (* 1/2 (+ (* -1/2 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* -1/2 (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))))))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (+ (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)) (* phi2 (+ (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)) (cos (- (+ lambda2 (* 1/2 (PI))) lambda1))))))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (+ (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)) (* phi2 (+ (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)) (+ (cos (- (+ lambda2 (* 1/2 (PI))) lambda1)) (* phi2 (+ (* -1/2 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* -1/2 (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))))))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (+ (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)) (* phi2 (+ (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)) (+ (cos (- (+ lambda2 (* 1/2 (PI))) lambda1)) (* phi2 (+ (* -1/2 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (+ (* -1/2 (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))) (* phi2 (+ (* -1/6 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* -1/6 (cos (- (+ lambda2 (* 1/2 (PI))) lambda1)))))))))))))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)) (* phi2 (cos (- (+ lambda2 (* 1/2 (PI))) lambda1))))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)) (* phi2 (+ (cos (- (+ lambda2 (* 1/2 (PI))) lambda1)) (* -1/2 (* phi2 (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))))))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)) (* phi2 (+ (cos (- (+ lambda2 (* 1/2 (PI))) lambda1)) (* phi2 (+ (* -1/2 (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))) (* -1/6 (* phi2 (cos (- (+ lambda2 (* 1/2 (PI))) lambda1)))))))))))
#s(approx (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (- (+ lambda2 (* 1/2 (PI))) lambda1)))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* phi2 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2))))))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* phi2 (+ (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* -1/2 (* phi2 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))))))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* phi2 (+ (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* phi2 (+ (* -1/2 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* -1/6 (* phi2 (cos (- (+ lambda1 (* 1/2 (PI))) lambda2)))))))))))
#s(approx (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (- (+ lambda1 (* 1/2 (PI))) lambda2)))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (* (* phi2 phi2) -1/2) #s(hole binary64 (* -1/2 (pow phi2 2))))
#s(approx (+ (* (* phi2 phi2) -1/2) 1) #s(hole binary64 1))
#s(approx (+ (* (* phi2 phi2) -1/2) 1) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (* (* phi2 phi2) (- (pow phi2 -2) 1/2)) #s(hole binary64 1))
#s(approx (* (* phi2 phi2) (- (pow phi2 -2) 1/2)) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (- (pow phi2 -2) 1/2) #s(hole binary64 (/ 1 (pow phi2 2))))
#s(approx (- (pow phi2 -2) 1/2) #s(hole binary64 (/ (+ 1 (* -1/2 (pow phi2 2))) (pow phi2 2))))
#s(approx (pow phi2 -2) #s(hole binary64 (/ 1 (pow phi2 2))))
#s(approx (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) #s(hole binary64 1))
#s(approx (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))))
#s(approx (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2)) #s(hole binary64 (* -1/2 (pow phi2 2))))
#s(approx (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2)) #s(hole binary64 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2))))
#s(approx (- (* 1/24 (* phi2 phi2)) 1/2) #s(hole binary64 -1/2))
#s(approx (- (* 1/24 (* phi2 phi2)) 1/2) #s(hole binary64 (- (* 1/24 (pow phi2 2)) 1/2)))
#s(approx (* 1/24 (* phi2 phi2)) #s(hole binary64 (* 1/24 (pow phi2 2))))
#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 (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (+ (cos lambda2) (+ (* lambda1 (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* -1/2 (* lambda1 (sin lambda2)))))))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (+ (cos lambda2) (+ (* lambda1 (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (+ (* -1/2 (* lambda1 (sin lambda2))) (* (pow phi2 2) (+ (* 1/24 (cos lambda2)) (* 1/24 (* lambda1 (sin lambda2))))))))))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (+ (cos lambda2) (+ (* lambda1 (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (+ (* -1/2 (* lambda1 (sin lambda2))) (* (pow phi2 2) (+ (* 1/24 (cos lambda2)) (+ (* 1/24 (* lambda1 (sin lambda2))) (* (pow phi2 2) (+ (* -1/720 (cos lambda2)) (* -1/720 (* lambda1 (sin lambda2)))))))))))))))
#s(approx (* lambda1 (* (cos phi2) (neg (sin lambda2)))) #s(hole binary64 (* -1 (* lambda1 (sin lambda2)))))
#s(approx (* lambda1 (* (cos phi2) (neg (sin lambda2)))) #s(hole binary64 (+ (* -1 (* lambda1 (sin lambda2))) (* 1/2 (* lambda1 (* (pow phi2 2) (sin lambda2)))))))
#s(approx (* lambda1 (* (cos phi2) (neg (sin lambda2)))) #s(hole binary64 (+ (* -1 (* lambda1 (sin lambda2))) (* (pow phi2 2) (+ (* -1/24 (* lambda1 (* (pow phi2 2) (sin lambda2)))) (* 1/2 (* lambda1 (sin lambda2))))))))
#s(approx (* lambda1 (* (cos phi2) (neg (sin lambda2)))) #s(hole binary64 (+ (* -1 (* lambda1 (sin lambda2))) (* (pow phi2 2) (+ (* 1/2 (* lambda1 (sin lambda2))) (* (pow phi2 2) (+ (* -1/24 (* lambda1 (sin lambda2))) (* 1/720 (* lambda1 (* (pow phi2 2) (sin lambda2)))))))))))
#s(approx (* (cos phi2) (neg (sin lambda2))) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (* (cos phi2) (neg (sin lambda2))) #s(hole binary64 (+ (* -1 (sin lambda2)) (* 1/2 (* (pow phi2 2) (sin lambda2))))))
#s(approx (* (cos phi2) (neg (sin lambda2))) #s(hole binary64 (+ (* -1 (sin lambda2)) (* (pow phi2 2) (+ (* -1/24 (* (pow phi2 2) (sin lambda2))) (* 1/2 (sin lambda2)))))))
#s(approx (* (cos phi2) (neg (sin lambda2))) #s(hole binary64 (+ (* -1 (sin lambda2)) (* (pow phi2 2) (+ (* 1/2 (sin lambda2)) (* (pow phi2 2) (+ (* -1/24 (sin lambda2)) (* 1/720 (* (pow phi2 2) (sin lambda2))))))))))
#s(approx (* (cos phi2) (cos lambda2)) #s(hole binary64 (cos lambda2)))
#s(approx (* (cos phi2) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* -1/2 (* (pow phi2 2) (cos lambda2))))))
#s(approx (* (cos phi2) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* 1/24 (* (pow phi2 2) (cos lambda2))))))))
#s(approx (* (cos phi2) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda2))) (* 1/24 (cos lambda2)))))))))
#s(approx (+ (cos 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* -1/2 (* (pow phi2 2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* (pow phi2 2) (+ (* -1/2 (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* 1/24 (* (pow phi2 2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* (pow phi2 2) (+ (* -1/2 (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (* 1/24 (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda2) (cos phi1))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda2) (+ (cos phi1) (* -1/2 (* (pow phi2 2) (cos lambda2)))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda2) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* 1/24 (* (pow phi2 2) (cos lambda2)))))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda2) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda2))) (* 1/24 (cos lambda2))))))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (cos (- lambda1 lambda2)))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (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)) 1) #s(hole binary64 (+ 1 (+ (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) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (cos phi1))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* -1/2 (* (pow phi2 2) (cos lambda1)))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* 1/24 (* (pow phi2 2) (cos lambda1)))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda1))) (* 1/24 (cos lambda1))))))))))
#s(approx (+ (cos phi1) (cos phi2)) #s(hole binary64 (+ 1 (cos phi1))))
#s(approx (+ (cos phi1) (cos phi2)) #s(hole binary64 (+ 1 (+ (cos phi1) (* -1/2 (pow phi2 2))))))
#s(approx (+ (cos phi1) (cos phi2)) #s(hole binary64 (+ 1 (+ (cos phi1) (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2))))))
#s(approx (+ (cos phi1) (cos phi2)) #s(hole binary64 (+ 1 (+ (cos phi1) (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) #s(hole binary64 (+ 1 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* -1/2 (* (pow phi2 2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* (pow phi2 2) (+ (* -1/2 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* 1/24 (* (pow phi2 2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* (pow phi2 2) (+ (* -1/2 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (* 1/24 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* -1/2 (* (pow phi2 2) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* 1/24 (* (pow phi2 2) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))) (* 1/24 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (+ (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi2 (cos (* 1/2 (PI)))))))
#s(approx (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi2 (+ (cos (* 1/2 (PI))) (* -1/2 (* phi2 (sin (* 1/2 (PI))))))))))
#s(approx (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))) #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 (* (cos (* 1/2 (PI))) (sin phi2)) #s(hole binary64 (* phi2 (cos (* 1/2 (PI))))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi2)) #s(hole binary64 (* phi2 (+ (cos (* 1/2 (PI))) (* -1/6 (* (pow phi2 2) (cos (* 1/2 (PI)))))))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi2)) #s(hole binary64 (* phi2 (+ (cos (* 1/2 (PI))) (* (pow phi2 2) (+ (* -1/6 (cos (* 1/2 (PI)))) (* 1/120 (* (pow phi2 2) (cos (* 1/2 (PI)))))))))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi2)) #s(hole binary64 (* phi2 (+ (cos (* 1/2 (PI))) (* (pow phi2 2) (+ (* -1/6 (cos (* 1/2 (PI)))) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (cos (* 1/2 (PI))))) (* 1/120 (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 phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos lambda2) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos lambda2) (+ (* -1/2 (* (pow phi2 2) (cos lambda2))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos lambda2) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* 1/24 (* (pow phi2 2) (cos lambda2))))))))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos lambda2) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda2))) (* 1/24 (cos lambda2)))))))))))
#s(approx (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos lambda2) (* (cos (* 1/2 (PI))) (sin phi1)))))
#s(approx (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos lambda2) (+ (* -1/2 (* (pow phi2 2) (cos lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos lambda2) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* 1/24 (* (pow phi2 2) (cos lambda2)))))))))
#s(approx (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos lambda2) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda2))) (* 1/24 (cos lambda2))))))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (/ (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* (pow phi2 2) (- (+ (* -1/24 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (+ (* -1/4 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3))) (+ (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* (pow phi2 2) (- (+ (* -1/24 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))) (* (pow phi2 2) (- (+ (* -1/24 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/720 (/ (pow (cos (- lambda1 lambda2)) 3) (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 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2)))))))) (- (cos phi1) (cos (- lambda1 lambda2))))))) (+ (* -1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -1/4 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3))) (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* -2/45 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/720 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/48 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3)))))))))) (+ (* -1/4 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3))) (+ (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (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 (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (- 1 (cos (- lambda1 lambda2))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- 1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* (pow phi2 2) (- (* -1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (/ (* (cos (- lambda1 lambda2)) (- 1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- 1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (- 1 (cos (- lambda1 lambda2)))))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- 1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* (pow phi2 2) (- (+ (* -1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (* (pow phi2 2) (- (* 2/45 (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (/ (* (cos (- lambda1 lambda2)) (- (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- 1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (- 1 (cos (- lambda1 lambda2))))) (+ (* 1/720 (/ (* (cos (- lambda1 lambda2)) (- 1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (/ (* (cos (- lambda1 lambda2)) (- 1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- 1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (- 1 (cos (- lambda1 lambda2)))))))) (- 1 (cos (- lambda1 lambda2)))))))))) (+ (* -1/24 (/ (* (cos (- lambda1 lambda2)) (- 1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- 1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (- 1 (cos (- lambda1 lambda2)))))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- 1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- 1 (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- (+ 1 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- (+ 1 (* (pow phi2 2) (- (* -1/3 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- (+ 1 (* (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 (- lambda1 lambda2)) 2))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) #s(hole binary64 (pow (cos (- lambda1 lambda2)) 2)))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) #s(hole binary64 (+ (* -1 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) #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 (* (cos phi2) (cos (- lambda1 lambda2))) 2) #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 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- 1 (cos (- lambda1 lambda2)))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* 1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))) (cos (- lambda1 lambda2)))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* (pow phi2 2) (- (* -1/24 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* -1/2 (cos (- lambda1 lambda2)))))) (cos (- lambda1 lambda2)))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* (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 (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (/ (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* (pow phi2 2) (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))) (/ (* (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2)))) (+ (/ 1 (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* (pow phi2 2) (- (+ (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))) (* (pow phi2 2) (- (* 7/8 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))) (+ (/ (* (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 1/24 (cos (- lambda1 lambda2))))) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2)) (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))) (/ (* (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))))))) (/ (* (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2)))) (+ (/ 1 (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* (pow phi2 2) (- (+ (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))) (* (pow phi2 2) (- (+ (* 7/8 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))) (* (pow phi2 2) (- (* -61/240 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))) (+ (/ (* (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (* -2/45 (pow (cos (- lambda1 lambda2)) 2)) (* -1/720 (cos (- lambda1 lambda2))))) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2)) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))) (/ (* (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (- (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 1/24 (cos (- lambda1 lambda2))))) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) (/ (* (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2)))) (- (* 7/8 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))) (+ (/ (* (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 1/24 (cos (- lambda1 lambda2))))) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2)) (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))) (/ (* (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))))) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))))))) (+ (/ (* (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 1/24 (cos (- lambda1 lambda2))))) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2)) (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))) (/ (* (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))))))) (/ (* (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2)))) (+ (/ 1 (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) #s(hole binary64 (+ 1 (pow (cos (- lambda1 lambda2)) 3))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) #s(hole binary64 (+ 1 (+ (* -3/2 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 3))) (pow (cos (- lambda1 lambda2)) 3)))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) #s(hole binary64 (+ 1 (+ (* (pow phi2 2) (+ (* -3/2 (pow (cos (- lambda1 lambda2)) 3)) (* 7/8 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 3))))) (pow (cos (- lambda1 lambda2)) 3)))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) #s(hole binary64 (+ 1 (+ (* (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 (- lambda1 lambda2)) 3)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3) #s(hole binary64 (pow (cos (- lambda1 lambda2)) 3)))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3) #s(hole binary64 (+ (* -3/2 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 3))) (pow (cos (- lambda1 lambda2)) 3))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 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 (- lambda1 lambda2)) 3))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 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 (- lambda1 lambda2)) 3))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* (pow phi2 2) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (pow (cos (- lambda1 lambda2)) 2))) (cos (- lambda1 lambda2)))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* (pow phi2 2) (- (+ (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* (pow phi2 2) (- (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 1/24 (cos (- lambda1 lambda2)))))) (* -1/2 (cos (- lambda1 lambda2))))) (pow (cos (- lambda1 lambda2)) 2))) (cos (- lambda1 lambda2)))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* (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 (- lambda1 lambda2)))))) (* 1/24 (cos (- lambda1 lambda2)))))) (* -1/2 (cos (- lambda1 lambda2))))) (pow (cos (- lambda1 lambda2)) 2))) (cos (- lambda1 lambda2)))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (+ (* -1 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (+ (* (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 (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (+ (* (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 (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2)))))))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (/ (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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) (- (* -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 (- 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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) 2)) (pow (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))) 3))) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (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) (- (* 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)) (/ (* (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)))))))) (+ (/ (* (pow (cos phi1) 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 (- 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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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)))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) 2)) (pow (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))) 3))) (/ (* (pow (cos phi1) 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))) (- (* -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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (* (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) (- (* 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)))) 3))) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (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)))))) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (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 (- 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))))) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2))))) (+ (/ (* (pow (cos phi1) 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)) (/ (* (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)))))))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) 2)) (pow (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))) 3))) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (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) (- (* 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)) (/ (* (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)))))))) (+ (/ (* (pow (cos phi1) 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 (- 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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (pow (cos phi1) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* -1 (/ (* (pow phi2 2) (* (pow (cos phi1) 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))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* (pow phi2 2) (- (* -1 (* (pow phi2 2) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) 2)) (pow (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))) 3))) (/ (* (pow (cos phi1) 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))))) (/ (* (pow (cos phi1) 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))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* (pow phi2 2) (- (* (pow phi2 2) (- (* -1 (* (pow phi2 2) (+ (* -1 (/ (* (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) 2)) (pow (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))) 3))) (/ (* (pow (cos phi1) 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))) (- (* -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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (* (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) (- (* 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)))) 3))) (/ (* (pow (cos phi1) 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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) 2)) (pow (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))) 3))) (/ (* (pow (cos phi1) 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))))) (/ (* (pow (cos phi1) 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))))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* (pow phi2 2) (- (* -1/2 (/ (cos (- lambda1 lambda2)) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))))) (/ 1 (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* (pow phi2 2) (- (+ (* -1/2 (/ (cos (- lambda1 lambda2)) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (* (pow phi2 2) (- (* 1/24 (/ (cos (- lambda1 lambda2)) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (/ (* (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2)))) (- (* -1/2 (/ (cos (- lambda1 lambda2)) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))))) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))))))) (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))))) (/ 1 (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* (pow phi2 2) (- (+ (* -1/2 (/ (cos (- lambda1 lambda2)) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (* (pow phi2 2) (- (+ (* 1/24 (/ (cos (- lambda1 lambda2)) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (* (pow phi2 2) (- (* -1/720 (/ (cos (- lambda1 lambda2)) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (+ (* -2/45 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (+ (/ (* (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2)))) (- (* 1/24 (/ (cos (- lambda1 lambda2)) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (/ (* (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2)))) (- (* -1/2 (/ (cos (- lambda1 lambda2)) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))))) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))))) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) (/ (* (- (* -1/2 (/ (cos (- lambda1 lambda2)) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2)))) (- (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 1/24 (cos (- lambda1 lambda2))))) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))))))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (/ (* (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2)))) (- (* -1/2 (/ (cos (- lambda1 lambda2)) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))))) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))))))) (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))))) (/ 1 (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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 (- 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 (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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)))))) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (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 (- 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)))))) (/ (* (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 (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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)))))) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (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)))))) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (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 (- 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))))) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2))))) (/ (* (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 (- 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 (- 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)))))) (/ (* (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 (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2))))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) #s(hole binary64 (pow (cos (- lambda1 lambda2)) 3)))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) #s(hole binary64 (+ (* -3/2 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 3))) (pow (cos (- lambda1 lambda2)) 3))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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 (- lambda1 lambda2)) 3))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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 (- lambda1 lambda2)) 3))))
#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 phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (pow (cos (- lambda1 lambda2)) 2) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))))) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #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 (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #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 (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #s(hole binary64 (pow (cos (- lambda1 lambda2)) 2)))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #s(hole binary64 (+ (* -1 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 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 (+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))) (* (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #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 (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (cos (- lambda1 lambda2)))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* phi2 (+ (* -1/2 (* phi2 (cos (- lambda1 lambda2)))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* phi2 (+ (* phi2 (+ (* -1/2 (cos (- lambda1 lambda2))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) #s(hole binary64 (cos (- lambda1 lambda2))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (* phi2 (+ (* -1/2 (* phi2 (cos (- lambda1 lambda2)))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (* phi2 (+ (* phi2 (+ (* -1/2 (cos (- lambda1 lambda2))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))))
#s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) #s(hole binary64 1))
#s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) #s(hole binary64 (+ 1 (* phi2 (cos (* 1/2 (PI)))))))
#s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) #s(hole binary64 (+ 1 (* phi2 (+ (cos (* 1/2 (PI))) (* -1/2 phi2))))))
#s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) #s(hole binary64 (+ 1 (* phi2 (+ (cos (* 1/2 (PI))) (* phi2 (- (* -1/6 (* phi2 (cos (* 1/2 (PI))))) 1/2)))))))
#s(approx (* (cos phi2) 1) #s(hole binary64 1))
#s(approx (* (cos phi2) 1) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (* (cos phi2) 1) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))))
#s(approx (* (cos phi2) 1) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (+ (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2)))))))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (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 (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow phi2 2) (* (pow (cos phi1) 2) (cos (- lambda1 lambda2)))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (- (* -1 (* (pow phi2 2) (+ (* -1/4 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3))) (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2)))))) (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (- (* (pow phi2 2) (- (* -1 (* (pow phi2 2) (+ (* -1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -1/4 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3))) (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/720 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/48 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3))))))) (+ (* -1/4 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3))) (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2)))))) (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- 1 (cos (- lambda1 lambda2))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* -1/2 (/ (* (pow phi2 2) (cos (- lambda1 lambda2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* (pow phi2 2) (- (* -1 (* (pow phi2 2) (+ (* -1/4 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 3))) (* -1/24 (/ (cos (- lambda1 lambda2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ 1 (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* (pow phi2 2) (- (* (pow phi2 2) (- (* -1 (* (pow phi2 2) (+ (* -1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -1/4 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 3))) (* -1/24 (/ (cos (- lambda1 lambda2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (- 1 (cos (- lambda1 lambda2))))) (+ (* 1/720 (/ (cos (- lambda1 lambda2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* 1/48 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 3))))))) (+ (* -1/4 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 3))) (* -1/24 (/ (cos (- lambda1 lambda2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ 1 (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (- (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* (pow phi2 2) (- (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* -1/24 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (- (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* (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)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/720 (/ (pow (cos (- lambda1 lambda2)) 3) (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 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2)))))))) (- (cos phi1) (cos (- lambda1 lambda2)))))))))) (+ (* -1/24 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) #s(hole binary64 (+ (pow (cos phi1) 3) (pow (cos (- lambda1 lambda2)) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ (pow (cos phi1) 3) (pow (cos (- lambda1 lambda2)) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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))) (- (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (* (cos (- lambda1 lambda2)) (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3)))))) (/ (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* (pow phi2 2) (- (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1/24 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (* (cos (- lambda1 lambda2)) (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3)))))) (- (cos phi1) (cos (- lambda1 lambda2)))) (/ (* (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2))) (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 4))))))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (* (cos (- lambda1 lambda2)) (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3)))))) (/ (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* (pow phi2 2) (- (+ (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* (pow phi2 2) (- (* 1/720 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -2/45 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/720 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* 1/24 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* 1/6 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (/ (* (cos (- lambda1 lambda2)) (- (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1/24 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (* (cos (- lambda1 lambda2)) (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3)))))) (- (cos phi1) (cos (- lambda1 lambda2)))) (/ (* (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2))) (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 4)))))))) (- (cos phi1) (cos (- lambda1 lambda2)))) (+ (/ (* (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2))) (- (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (* (cos (- lambda1 lambda2)) (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2)) (/ (* (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 2)) (* 1/360 (* (cos (- lambda1 lambda2)) (- (cos phi1) (cos (- lambda1 lambda2)))))) (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 4))))))))))) (+ (* -1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1/24 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (* (cos (- lambda1 lambda2)) (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3)))))) (- (cos phi1) (cos (- lambda1 lambda2)))) (/ (* (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2))) (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 4))))))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (* (cos (- lambda1 lambda2)) (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3)))))) (/ (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (* 1/2 (* (pow (cos phi1) 2) (cos (- lambda1 lambda2)))) (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* 1/2 (* (pow (cos phi1) 2) (cos (- lambda1 lambda2)))) (* (pow phi2 2) (- (* -1/24 (* (pow (cos phi1) 2) (cos (- lambda1 lambda2)))) (+ (* -1/2 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (* 1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))))) (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* 1/2 (* (pow (cos phi1) 2) (cos (- lambda1 lambda2)))) (* (pow phi2 2) (- (+ (* -1/24 (* (pow (cos phi1) 2) (cos (- lambda1 lambda2)))) (* (pow phi2 2) (- (* 1/720 (* (pow (cos phi1) 2) (cos (- lambda1 lambda2)))) (+ (* -2/45 (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/720 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/24 (pow (cos (- lambda1 lambda2)) 3)) (* 1/6 (pow (cos (- lambda1 lambda2)) 3)))))))) (+ (* -1/2 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (* 1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))))) (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* 1/2 (* (pow phi2 2) (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))))) (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -1/24 (* (pow phi2 2) (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))))) (* 1/2 (* (pow (cos phi1) 2) (cos (- lambda1 lambda2)))))) (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (+ (* 1/2 (* (pow (cos phi1) 2) (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/24 (* (pow (cos phi1) 2) (cos (- lambda1 lambda2)))) (* 1/720 (* (pow phi2 2) (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))))))))) (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/2 (pow (cos (- lambda1 lambda2)) 3)) (* (pow phi2 2) (+ (* -1/2 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (* 1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))))))))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/2 (pow (cos (- lambda1 lambda2)) 3)) (* (pow phi2 2) (+ (* -1/2 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 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/720 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/24 (pow (cos (- lambda1 lambda2)) 3)) (* 1/6 (pow (cos (- lambda1 lambda2)) 3))))))))))))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2)))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (- (cos phi1) (cos (- lambda1 lambda2))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (+ (* (cos (- lambda1 lambda2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (+ (* (cos (- lambda1 lambda2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/4 (pow (cos (- lambda1 lambda2)) 2)) (* (pow phi2 2) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 2)) (* 1/360 (* (cos (- lambda1 lambda2)) (- (cos phi1) (cos (- lambda1 lambda2)))))))))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* (pow phi2 2) (- (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda1 lambda2))))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* (pow phi2 2) (- (+ (* (pow phi2 2) (- (* -1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* -1/24 (/ (* (cos (- lambda1 lambda2)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda1 lambda2))))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/720 (/ (* (cos (- lambda1 lambda2)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda1 lambda2))))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2)))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (pow phi2 2) (- (* -1/3 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))) (* -1 (pow (cos (- lambda1 lambda2)) 2)))))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (- (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (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 (- lambda1 lambda2)) 2))))
#s(approx (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #s(hole binary64 (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #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 (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #s(hole binary64 (pow (cos (- lambda1 lambda2)) 2)))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #s(hole binary64 (+ (* -1 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #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 (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #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 (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (* 2 (log (cos (- lambda1 lambda2))))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (+ (* -1 (pow phi2 2)) (* 2 (log (cos (- lambda1 lambda2)))))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (+ (* 2 (log (cos (- lambda1 lambda2)))) (* (pow phi2 2) (- (* -1/6 (pow phi2 2)) 1)))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (+ (* 2 (log (cos (- lambda1 lambda2)))) (* (pow phi2 2) (- (* (pow phi2 2) (- (* -2/45 (pow phi2 2)) 1/6)) 1)))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (log (cos (- lambda1 lambda2)))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (+ (log (cos (- lambda1 lambda2))) (* -1/2 (pow phi2 2)))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (+ (log (cos (- lambda1 lambda2))) (* (pow phi2 2) (- (* -1/12 (pow phi2 2)) 1/2)))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (+ (log (cos (- lambda1 lambda2))) (* (pow phi2 2) (- (* (pow phi2 2) (- (* -1/45 (pow phi2 2)) 1/12)) 1/2)))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (* 3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos phi1) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* 3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (* (pow phi2 2) (- (* -4 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (+ (/ (* (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))))) (* (+ (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))) (- (* 3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2))))))))) (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos phi1) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* 3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (* (pow phi2 2) (- (+ (* -4 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (* (pow phi2 2) (- (* 47/15 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (+ (/ (* (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))))) (+ (* 1/720 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (/ (* (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))))) (* (+ (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (- (* 3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2))))) (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))) (- (* -4 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (+ (/ (* (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))))) (* (+ (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))) (- (* 3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))))) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))))))) (+ (/ (* (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))))) (* (+ (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))) (- (* 3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2))))))))) (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos phi1) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2))))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) #s(hole binary64 (/ (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (* 3 (/ (pow (cos (- lambda1 lambda2)) 6) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (/ (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2)))) (/ (pow (cos phi1) 6) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (/ (pow (cos (- lambda1 lambda2)) 6) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4)))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* 3 (/ (pow (cos (- lambda1 lambda2)) 6) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (pow phi2 2) (- (* -4 (/ (pow (cos (- lambda1 lambda2)) 6) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (+ (/ (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (* 3 (/ (pow (cos (- lambda1 lambda2)) 6) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (/ (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2)))) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4)))) (/ (* (+ (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2)))))) (/ (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2)))) (/ (pow (cos phi1) 6) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (/ (pow (cos (- lambda1 lambda2)) 6) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4)))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* 3 (/ (pow (cos (- lambda1 lambda2)) 6) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (pow phi2 2) (- (+ (* -4 (/ (pow (cos (- lambda1 lambda2)) 6) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (pow phi2 2) (- (* 47/15 (/ (pow (cos (- lambda1 lambda2)) 6) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (+ (/ (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (* -4 (/ (pow (cos (- lambda1 lambda2)) 6) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (+ (/ (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (* 3 (/ (pow (cos (- lambda1 lambda2)) 6) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (/ (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2)))) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4)))) (/ (* (+ (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2))))) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4)))) (+ (/ (* (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2)) (/ (* (+ (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- (* 3 (/ (pow (cos (- lambda1 lambda2)) 6) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (/ (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2)))) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))))))) (+ (/ (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (* 3 (/ (pow (cos (- lambda1 lambda2)) 6) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (/ (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2)))) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4)))) (/ (* (+ (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2)))))) (/ (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2)))) (/ (pow (cos phi1) 6) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (/ (pow (cos (- lambda1 lambda2)) 6) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4)))))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) #s(hole binary64 (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) #s(hole binary64 (- (+ (* 3 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 6))) (pow (cos phi1) 6)) (pow (cos (- lambda1 lambda2)) 6))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) #s(hole binary64 (- (+ (* (pow phi2 2) (- (* -4 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 6))) (* -3 (pow (cos (- lambda1 lambda2)) 6)))) (pow (cos phi1) 6)) (pow (cos (- lambda1 lambda2)) 6))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) #s(hole binary64 (- (+ (* (pow phi2 2) (- (* (pow phi2 2) (- (* 47/15 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 6))) (* 4 (pow (cos (- lambda1 lambda2)) 6)))) (* -3 (pow (cos (- lambda1 lambda2)) 6)))) (pow (cos phi1) 6)) (pow (cos (- lambda1 lambda2)) 6))))
#s(approx (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) #s(hole binary64 (pow (cos (- lambda1 lambda2)) 6)))
#s(approx (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) #s(hole binary64 (+ (* -3 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 6))) (pow (cos (- lambda1 lambda2)) 6))))
#s(approx (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -3 (pow (cos (- lambda1 lambda2)) 6)) (* 4 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 6))))) (pow (cos (- lambda1 lambda2)) 6))))
#s(approx (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -3 (pow (cos (- lambda1 lambda2)) 6)) (* (pow phi2 2) (+ (* -47/15 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 6))) (* 4 (pow (cos (- lambda1 lambda2)) 6)))))) (pow (cos (- lambda1 lambda2)) 6))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) #s(hole binary64 (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4)))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))))) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (pow phi2 2) (+ (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))))) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (pow phi2 2) (+ (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (+ (* 5/3 (pow (cos (- lambda1 lambda2)) 4)) (* (pow phi2 2) (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))))))))))) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos (- lambda1 lambda2)) 4))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))))) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos (- lambda1 lambda2)) 4)))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (pow phi2 2) (+ (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))))) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos (- lambda1 lambda2)) 4)))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (pow phi2 2) (+ (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (+ (* 5/3 (pow (cos (- lambda1 lambda2)) 4)) (* (pow phi2 2) (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))))))))))) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos (- lambda1 lambda2)) 4)))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* -1 (* (pow phi2 2) (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 1/3 (* (pow phi2 2) (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))))) (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (pow phi2 2) (+ (* -2/45 (* (pow phi2 2) (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))))))) (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 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 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (* (sin (* 1/2 (PI))) (sin (- lambda1 lambda2)))))
#s(approx (* (sin (+ phi2 (/ (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 (/ (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 (/ (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) 1)) (sin (- lambda1 lambda2))) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* phi2 (* (cos (* 1/2 (PI))) (sin (- lambda1 lambda2)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* phi2 (+ (* -1/2 (* phi2 (sin (- lambda1 lambda2)))) (* (cos (* 1/2 (PI))) (sin (- lambda1 lambda2))))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* phi2 (+ (* phi2 (+ (* -1/2 (sin (- lambda1 lambda2))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (sin (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (sin (- lambda1 lambda2))))))))
#s(approx (cos phi2) #s(hole binary64 (cos phi2)))
#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 (+ 1 (* -1/2 (* phi2 phi2))) #s(hole binary64 (* -1/2 (pow phi2 2))))
#s(approx (+ 1 (* -1/2 (* phi2 phi2))) #s(hole binary64 (* (pow phi2 2) (- (/ 1 (pow phi2 2)) 1/2))))
#s(approx (sin (+ phi2 (/ (PI) 2))) #s(hole binary64 (sin (+ phi2 (* 1/2 (PI))))))
#s(approx (+ phi2 (/ (PI) 2)) #s(hole binary64 phi2))
#s(approx (+ phi2 (/ (PI) 2)) #s(hole binary64 (* phi2 (+ 1 (* 1/2 (/ (PI) phi2))))))
#s(approx (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 phi2))
#s(approx (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (* phi2 (- (+ 1 (+ (* 1/2 (/ (PI) phi2)) (/ lambda2 phi2))) (/ lambda1 phi2)))))
#s(approx (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 phi2))
#s(approx (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (* phi2 (- (+ 1 (+ (* 1/2 (/ (PI) phi2)) (/ lambda1 phi2))) (/ lambda2 phi2)))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (/ (sin (- lambda1 lambda2)) (pow phi2 2))))))
#s(approx (+ (* (* phi2 phi2) -1/2) 1) #s(hole binary64 (* -1/2 (pow phi2 2))))
#s(approx (+ (* (* phi2 phi2) -1/2) 1) #s(hole binary64 (* (pow phi2 2) (- (/ 1 (pow phi2 2)) 1/2))))
#s(approx (* (* phi2 phi2) (- (pow phi2 -2) 1/2)) #s(hole binary64 (* -1/2 (pow phi2 2))))
#s(approx (* (* phi2 phi2) (- (pow phi2 -2) 1/2)) #s(hole binary64 (* (pow phi2 2) (- (/ 1 (pow phi2 2)) 1/2))))
#s(approx (- (pow phi2 -2) 1/2) #s(hole binary64 -1/2))
#s(approx (- (pow phi2 -2) 1/2) #s(hole binary64 (- (/ 1 (pow phi2 2)) 1/2)))
#s(approx (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) #s(hole binary64 (* 1/24 (pow phi2 4))))
#s(approx (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) #s(hole binary64 (* (pow phi2 4) (- 1/24 (* 1/2 (/ 1 (pow phi2 2)))))))
#s(approx (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) #s(hole binary64 (* (pow phi2 4) (- (+ 1/24 (/ 1 (pow phi2 4))) (* 1/2 (/ 1 (pow phi2 2)))))))
#s(approx (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2)) #s(hole binary64 (* 1/24 (pow phi2 4))))
#s(approx (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2)) #s(hole binary64 (* (pow phi2 4) (- 1/24 (* 1/2 (/ 1 (pow phi2 2)))))))
#s(approx (- (* 1/24 (* phi2 phi2)) 1/2) #s(hole binary64 (* 1/24 (pow phi2 2))))
#s(approx (- (* 1/24 (* phi2 phi2)) 1/2) #s(hole binary64 (* (pow phi2 2) (- 1/24 (* 1/2 (/ 1 (pow phi2 2)))))))
#s(approx (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))) #s(hole binary64 (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi2)) #s(hole binary64 (* (cos (* 1/2 (PI))) (sin phi2))))
#s(approx (sin phi2) #s(hole binary64 (sin phi2)))
#s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) #s(hole binary64 (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))
#s(approx (* (cos phi2) 1) #s(hole binary64 (cos phi2)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2))))))
#s(approx (sin (+ phi2 (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (* -1 phi2)))))
#s(approx (+ phi2 (/ (PI) 2)) #s(hole binary64 (* -1 (* phi2 (- (* -1/2 (/ (PI) phi2)) 1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* 1/2 (+ (sin (- (+ lambda1 (* 1/2 (PI))) (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda2 (* 1/2 (PI))) (+ lambda1 (* -1 phi2)))))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* 1/2 (+ (sin (- (+ lambda1 (* 1/2 (PI))) (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda2 (* 1/2 (PI))) (+ lambda1 (* -1 phi2))))))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (cos phi1) (* 1/2 (+ (sin (- (+ lambda1 (* 1/2 (PI))) (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda2 (* 1/2 (PI))) (+ lambda1 (* -1 phi2)))))))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) #s(hole binary64 (* 1/2 (+ (sin (- (+ lambda1 (* 1/2 (PI))) (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda2 (* 1/2 (PI))) (+ lambda1 (* -1 phi2))))))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) #s(hole binary64 (+ (sin (- (+ lambda1 (* 1/2 (PI))) (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda2 (* 1/2 (PI))) (+ lambda1 (* -1 phi2)))))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (sin (- (+ lambda2 (* 1/2 (PI))) (+ lambda1 (* -1 phi2))))))
#s(approx (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (* -1 (* phi2 (- (* -1 (/ (- (+ lambda2 (* 1/2 (PI))) lambda1) phi2)) 1)))))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) #s(hole binary64 (sin (- (+ lambda1 (* 1/2 (PI))) (+ lambda2 (* -1 phi2))))))
#s(approx (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) #s(hole binary64 (* -1 (* phi2 (- (* -1 (/ (- (+ lambda1 (* 1/2 (PI))) lambda2) phi2)) 1)))))
#s(approx (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (sin (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (sin (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (* (sin (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2))))))

Outputs
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 #s(approx (+ (/ (atan2 ( (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/.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)) lambda1))
(.f64 #s(approx (+ (/ (atan2 ( (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/.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)) lambda1)
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/.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))
(/.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)
(+.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)))))) (.f64 (+.f64 (/.f64 (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1))
(.f64 (+.f64 (/.f64 (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1)
(+.f64 (/.f64 (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64))
(/.f64 (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
(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 1 binary64)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) lambda1) #s(literal 1 binary64)) lambda1))
(.f64 (+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) lambda1) #s(literal 1 binary64)) lambda1)
(+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ ( (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) lambda1) #s(literal 1 binary64))
(/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ ( (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) lambda1)
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ ( (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.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))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) lambda1) #s(literal 1 binary64)) lambda1))
(.f64 (+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) lambda1) #s(literal 1 binary64)) lambda1)
(+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ ( (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) lambda1) #s(literal 1 binary64))
(/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ ( (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) lambda1)
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1))
(.f64 (+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1)
(+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64))
(/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+.f64 (.f64 (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)) (cos.f64 phi2)) (cos.f64 phi1))
(cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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))))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
#s(literal -1/2 binary64)
(*.f64 phi1 phi1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #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)))) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #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)))) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (cos.f64 phi1) (.f64 #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)))) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 #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)))) (cos.f64 (-.f64 lambda1 lambda2)))
#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))))
(+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2)))
(.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2))
(*.f64 phi2 phi2)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)))))
(+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1))))
(.f64 (cos.f64 phi2) (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (sin.f64 (+.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (sin.f64 (+.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (cos.f64 phi1) (*.f64 (sin.f64 (+.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (sin.f64 (+.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (+.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (/.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)))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (/.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 (cos.f64 phi1) (/.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 (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 (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))))
(sin.f64 (-.f64 (+.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))
(-.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)))
(+.f64 (+.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda1 lambda2))
(+.f64 lambda1 (atan2.f64 #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)))) (+.f64 (cos.f64 phi1) (.f64 #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)))) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 #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)))) (+.f64 (cos.f64 phi1) (.f64 #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)))) (cos.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))))
(fma.f64 (.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
(+.f64 (.f64 (.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) #s(approx (+ ( (* phi2 phi2) -1/2) 1) (.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64))))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 #s(approx (cos phi2) #s(approx (+ ( (* phi2 phi2) -1/2) 1) (.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64))))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 #s(approx (cos phi2) #s(approx (+ ( (* phi2 phi2) -1/2) 1) (.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64))))) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64)))))
#s(approx (+ (* (* phi2 phi2) -1/2) 1) (.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64))))
(.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64)))
(-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64))
(pow.f64 phi2 #s(literal -2 binary64))
#s(literal -2 binary64)
#s(literal 1/2 binary64)
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))
(fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))
(+.f64 (.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #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))))) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #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))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (cos.f64 phi1) (.f64 #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))))) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 #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))))) (cos.f64 (-.f64 lambda1 lambda2)))
#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)))))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64))))
(.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)))
(-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64))
(.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2))
#s(literal 1/24 binary64)
(+.f64 lambda1 (atan2.f64 (.f64 #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)))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 #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)))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 #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)))) (sin.f64 (-.f64 lambda1 lambda2)))
(+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 lambda1 (atan2.f64 (.f64 #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))))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 #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))))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 #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))))) (sin.f64 (-.f64 lambda1 lambda2)))
(+.f64 (cos.f64 phi1) #s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 lambda1 (atan2.f64 (.f64 #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))))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 #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))))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (cos lambda2) lambda1) (neg (sin lambda2))) lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (cos lambda2) lambda1) (neg (sin lambda2))) lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (cos lambda2) lambda1) (neg (sin lambda2))) lambda1)))
#s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) lambda1))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 #s(approx (cos lambda2) #s(literal 1 binary64)) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 #s(approx (cos lambda2) #s(literal 1 binary64)) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 #s(approx (cos lambda2) #s(literal 1 binary64)) lambda1 (neg.f64 (sin.f64 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 #s(approx (cos lambda2) #s(literal 1 binary64)) lambda1 (neg.f64 (sin.f64 lambda2))))
(fma.f64 #s(approx (cos lambda2) #s(literal 1 binary64)) lambda1 (neg.f64 (sin.f64 lambda2)))
(+.f64 (*.f64 #s(approx (cos lambda2) #s(literal 1 binary64)) lambda1) (neg.f64 (sin.f64 lambda2)))
#s(approx (cos lambda2) #s(literal 1 binary64))
(neg.f64 (sin.f64 lambda2))
(sin.f64 lambda2)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 lambda2) lambda1) (neg.f64 (sin.f64 lambda2)))
(cos.f64 lambda2)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) #s(approx ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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)))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) #s(approx ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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))))))
(+.f64 (cos.f64 phi1) #s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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))))
(fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))
(+.f64 (.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))))) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))
#s(literal -1 binary64)
(.f64 lambda1 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))))
(*.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))
(*.f64 (cos.f64 phi2) (cos.f64 lambda2))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (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))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(cos.f64 lambda1)
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(sin.f64 lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (sin.f64 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (sin.f64 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (sin.f64 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) lambda1 (neg.f64 (sin.f64 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (sin.f64 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) lambda1 (neg.f64 (sin.f64 lambda2))))
(fma.f64 (sin.f64 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) lambda1 (neg.f64 (sin.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) lambda1) (neg.f64 (sin.f64 lambda2)))
(sin.f64 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))
(.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (neg.f64 (sin.f64 lambda2))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (neg.f64 (sin.f64 lambda2)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))
(+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 1 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (neg.f64 (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (neg.f64 (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))
(*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 (cos.f64 lambda2))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 (cos.f64 lambda2))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))
(.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (*.f64 lambda1 (cos.f64 lambda2)))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (*.f64 lambda1 (cos.f64 lambda2))))
(+.f64 (neg.f64 (sin.f64 lambda2)) (*.f64 lambda1 (cos.f64 lambda2)))
(*.f64 lambda1 (cos.f64 lambda2))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 (cos.f64 lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 (cos.f64 lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2))))))
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))))
(*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2))))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))
(fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2))
(+.f64 (*.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 lambda2))
(neg.f64 lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 (cos.f64 lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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)))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 (cos.f64 lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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))))))
(+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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)))))
(.f64 (cos.f64 phi2) #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 (.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64)) (neg.f64 (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)))
(fma.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64)) (neg.f64 (sin.f64 lambda2))) lambda1 (cos.f64 lambda2))
(+.f64 (.f64 (-.f64 (.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64)) (neg.f64 (sin.f64 lambda2))) lambda1) (cos.f64 lambda2))
(-.f64 (.f64 (.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64)) (neg.f64 (sin.f64 lambda2)))
(.f64 (.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64))
(*.f64 (cos.f64 lambda2) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 (cos.f64 lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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)))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 (cos.f64 lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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))))))
(+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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)))))
(.f64 (cos.f64 phi2) #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 (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)))
(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))
(+.f64 (.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))
(-.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)))
(.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)
(fma.f64 (.f64 #s(literal 1/6 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))
(+.f64 (.f64 (.f64 #s(literal 1/6 binary64) lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))
(*.f64 #s(literal 1/6 binary64) lambda1)
#s(literal 1/6 binary64)
(*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 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))))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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)))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 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))))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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))))))
(.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 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))))))))
(+.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)))))))
(.f64 lambda1 (+.f64 (cos.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (neg.f64 (sin.f64 lambda2))))))
(+.f64 (cos.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (neg.f64 (sin.f64 lambda2)))))
(.f64 #s(literal -1/2 binary64) (.f64 lambda1 (neg.f64 (sin.f64 lambda2))))
(*.f64 lambda1 (neg.f64 (sin.f64 lambda2)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 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))))))))) (+.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) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 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))))))))) (+.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 #s(approx (- (/ lambda1 lambda2) 1) (.f64 lambda1 (-.f64 (pow.f64 lambda2 #s(literal -1 binary64)) (pow.f64 lambda1 #s(literal -1 binary64))))) lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 #s(approx (- (/ lambda1 lambda2) 1) (.f64 lambda1 (-.f64 (pow.f64 lambda2 #s(literal -1 binary64)) (pow.f64 lambda1 #s(literal -1 binary64))))) lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 #s(approx (- (/ lambda1 lambda2) 1) (*.f64 lambda1 (-.f64 (pow.f64 lambda2 #s(literal -1 binary64)) (pow.f64 lambda1 #s(literal -1 binary64))))) lambda2))))
(sin.f64 #s(approx (- lambda1 lambda2) (.f64 #s(approx (- (/ lambda1 lambda2) 1) (.f64 lambda1 (-.f64 (pow.f64 lambda2 #s(literal -1 binary64)) (pow.f64 lambda1 #s(literal -1 binary64))))) lambda2)))
#s(approx (- lambda1 lambda2) (.f64 #s(approx (- (/ lambda1 lambda2) 1) (.f64 lambda1 (-.f64 (pow.f64 lambda2 #s(literal -1 binary64)) (pow.f64 lambda1 #s(literal -1 binary64))))) lambda2))
(.f64 #s(approx (- (/ lambda1 lambda2) 1) (.f64 lambda1 (-.f64 (pow.f64 lambda2 #s(literal -1 binary64)) (pow.f64 lambda1 #s(literal -1 binary64))))) lambda2)
#s(approx (- (/ lambda1 lambda2) 1) (*.f64 lambda1 (-.f64 (pow.f64 lambda2 #s(literal -1 binary64)) (pow.f64 lambda1 #s(literal -1 binary64)))))
(*.f64 lambda1 (-.f64 (pow.f64 lambda2 #s(literal -1 binary64)) (pow.f64 lambda1 #s(literal -1 binary64))))
(-.f64 (pow.f64 lambda2 #s(literal -1 binary64)) (pow.f64 lambda1 #s(literal -1 binary64)))
(pow.f64 lambda2 #s(literal -1 binary64))
(pow.f64 lambda1 #s(literal -1 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 (/.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))))) lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 (/.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))))) lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 (/.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))))) lambda2))))
(sin.f64 #s(approx (- lambda1 lambda2) (.f64 (/.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))))) lambda2)))
#s(approx (- lambda1 lambda2) (.f64 (/.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))))) lambda2))
(.f64 (/.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))))) lambda2)
(/.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 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64))
(pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64))
(/.f64 lambda1 lambda2)
#s(literal 3 binary64)
(fma.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))
(+.f64 (.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))
(+.f64 #s(literal 1 binary64) (*.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))
(*.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))
(.f64 (cos.f64 phi2) (sin.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)))
(sin.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))
(.f64 (cos.f64 phi2) (sin.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))))
(sin.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda2) (cos.f64 phi1))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda2) (cos.f64 phi1)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda2) (cos.f64 phi1))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(+.f64 (cos.f64 lambda2) (cos.f64 phi1))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))
(+.f64 (cos.f64 phi1) (cos.f64 phi2))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 #s(literal 1 binary64) (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(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1)))) (cos.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1)))) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1)))) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1)))) (cos.f64 phi2) (cos.f64 phi1))
(+.f64 (.f64 #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)))) (cos.f64 phi2)) (cos.f64 phi1))
#s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1))))
(+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1)))
(.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1))
(*.f64 lambda1 lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #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))))) (cos.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #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))))) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #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))))) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 #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))))) (cos.f64 phi2) (cos.f64 phi1))
(+.f64 (.f64 #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))))) (cos.f64 phi2)) (cos.f64 phi1))
#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)))))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 lambda1 lambda1) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 lambda1 lambda1)) #s(literal 1/2 binary64))))
(.f64 (.f64 lambda1 lambda1) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 lambda1 lambda1)) #s(literal 1/2 binary64)))
(-.f64 (.f64 #s(literal 1/24 binary64) (.f64 lambda1 lambda1)) #s(literal 1/2 binary64))
(.f64 #s(literal 1/24 binary64) (.f64 lambda1 lambda1))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #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))))) (cos.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #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))))) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #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))))) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 #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))))) (cos.f64 phi2) (cos.f64 phi1))
(+.f64 (.f64 #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))))) (cos.f64 phi2)) (cos.f64 phi1))
#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)))))
(+.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))))
(.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)))
(-.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))
(.f64 (.f64 lambda1 lambda1) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (.f64 lambda1 lambda1))))
(+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (.f64 lambda1 lambda1)))
(.f64 #s(literal -1/720 binary64) (.f64 lambda1 lambda1))
#s(literal -1/720 binary64)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))
(fma.f64 (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)) (cos.f64 phi2) #s(literal 1 binary64))
(+.f64 (.f64 (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)) (cos.f64 phi2)) #s(literal 1 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2) #s(literal 1 binary64))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2) #s(literal 1 binary64)))
(fma.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2) #s(literal 1 binary64))
(+.f64 (*.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2)) #s(literal 1 binary64))
(sin.f64 (+.f64 (-.f64 lambda1 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (-.f64 lambda1 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
(+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
(.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))
(+.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(sin.f64 phi2)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))
(+.f64 (.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))
(sin.f64 phi1)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
(fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))
(+.f64 (.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))
(+.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) ( (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) ( (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))))))
(/.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)))))
(-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 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))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) ( (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) ( (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))
(-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (/ (+ (pow ( (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (/ (+ (pow ( (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))))))
(/.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)))))
(+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 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))))
(+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
(+.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (cos phi1) #s(literal 1 binary64))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(approx (+ ( (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1)))) #s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(approx (+ ( (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1)))) #s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 #s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1)))) #s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1))))
(+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1)))
(.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(approx (/ (pow (cos phi1) 3) (+ ( (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (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 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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 #s(approx (/ (pow (cos phi1) 3) (+ ( (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (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 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))))
(+.f64 #s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (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 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (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)))
(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 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(+.f64 (.f64 (cos.f64 phi1) (cos.f64 phi1)) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (.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 2 binary64)) (.f64 (cos.f64 phi1) (*.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 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)))))
(+.f64 (cos.f64 phi1) #s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (cos (- lambda1 lambda2))) (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) #s(approx ( (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(+.f64 (cos.f64 phi1) #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 (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 #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) #s(approx (+ ( (* phi2 phi2) -1/2) 1) (.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 #s(approx (cos phi2) #s(approx (+ ( (* phi2 phi2) -1/2) 1) (.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2))))))
(+.f64 (cos.f64 phi1) (.f64 #s(approx (+ ( (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))))
(.f64 #s(approx (+ ( (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2))))
#s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) #s(literal 1 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)))))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1))))))))
(+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ ( (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)))))))
(.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ ( (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1))))))
#s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1))))
(*.f64 lambda1 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)))
(+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1))
(/.f64 (cos.f64 lambda2) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))))))))
(+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ ( (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))))
(.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ ( (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))))
(.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))
(fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))
(+.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))
(/.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1)
(fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1)))
(+.f64 (.f64 #s(literal -1 binary64) (sin.f64 lambda2)) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1)))
(*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (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 #s(approx (cos lambda1) #s(literal 1 binary64)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(.f64 (cos.f64 phi2) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
#s(approx (cos lambda1) #s(literal 1 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (cos.f64 phi1) (.f64 (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))
(fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) #s(literal 1 binary64)))
(+.f64 (.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) #s(literal 1 binary64)))
(cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
(*.f64 (cos.f64 phi2) #s(literal 1 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) #s(literal 1 binary64))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) #s(literal 1 binary64))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) #s(literal 1 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(+.f64 (.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(*.f64 (cos.f64 phi1) #s(literal 1 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (/ (pow (cos phi1) 2) (- (cos phi1) ( (cos (- lambda1 lambda2)) (cos phi2)))) (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 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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 #s(approx (/ (pow (cos phi1) 2) (- (cos phi1) ( (cos (- lambda1 lambda2)) (cos phi2)))) (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 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(-.f64 #s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (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 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (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 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.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)))
(+.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)))) #s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))
(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)))) #s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.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)))) #s(approx (/ (pow ( (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (exp.f64 (.f64 (log.f64 (cos.f64 phi1)) #s(literal 3 binary64)))) (+.f64 (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)) (.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 (+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (exp.f64 (.f64 (log.f64 (cos.f64 phi1)) #s(literal 3 binary64)))) (+.f64 (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)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (exp.f64 (.f64 (log.f64 (cos.f64 phi1)) #s(literal 3 binary64)))) (+.f64 (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)) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))))
(+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (exp.f64 (.f64 (log.f64 (cos.f64 phi1)) #s(literal 3 binary64))))
(exp.f64 (*.f64 (log.f64 (cos.f64 phi1)) #s(literal 3 binary64)))
(*.f64 (log.f64 (cos.f64 phi1)) #s(literal 3 binary64))
(log.f64 (cos.f64 phi1))
(+.f64 (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)) (.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 (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 (+.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))) (+.f64 (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)) (.f64 #s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 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))) (+.f64 (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)) (.f64 #s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1))))))
(/.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))) (+.f64 (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)) (.f64 #s(approx ( (cos (- lambda1 lambda2)) (cos phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1)))))
(+.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)))
(pow.f64 (cos.f64 phi1) #s(literal 3 binary64))
(+.f64 (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)) (.f64 #s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1))))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 #s(approx ( (cos (- lambda1 lambda2)) (cos phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1)))
(.f64 #s(approx ( (cos (- lambda1 lambda2)) (cos phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 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 (.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)))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 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 (.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 (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 (.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 (.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))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (.f64 (-.f64 (cos.f64 phi1) (.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 (-.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)))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (.f64 (-.f64 (cos.f64 phi1) (.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 (-.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))))))
(/.f64 (-.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 (cos.f64 phi1) (.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 (-.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)))))
(-.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 (cos.f64 phi1) (.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 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(.f64 (-.f64 (cos.f64 phi1) (.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 (-.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))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))
(.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))
(cos.f64 (*.f64 #s(literal 2 binary64) phi1))
(*.f64 #s(literal 2 binary64) phi1)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (exp.f64 (.f64 (log.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #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)) (exp.f64 (.f64 (log.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #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)) (exp.f64 (.f64 (log.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #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)) (exp.f64 (.f64 (log.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64))))
(exp.f64 (.f64 (log.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64)))
(.f64 (log.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64))
(log.f64 (*.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 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) #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 (pow.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)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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 (-.f64 (pow.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) #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 (pow.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)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(/.f64 (/.f64 (-.f64 (pow.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) #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 (pow.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)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (-.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 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) #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 (pow.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)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))))))
(-.f64 (pow.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) #s(literal 3 binary64)))
(pow.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #s(literal 3 binary64))
(pow.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) #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 (pow.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)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)))))
(+.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (fma.f64 (pow.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)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)))))
(fma.f64 (pow.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)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))))
(+.f64 (.f64 (pow.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)) (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)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.f64 #s(approx (- (pow lambda1 3) (pow lambda2 3)) (.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64)))) (fma.f64 lambda1 lambda1 (fma.f64 lambda2 lambda2 (.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 #s(approx (- (pow lambda1 3) (pow lambda2 3)) (.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64)))) (fma.f64 lambda1 lambda1 (fma.f64 lambda2 lambda2 (.f64 lambda1 lambda2)))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 (cos.f64 phi2) (sin.f64 (/.f64 #s(approx (- (pow lambda1 3) (pow lambda2 3)) (.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64)))) (fma.f64 lambda1 lambda1 (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda2))))))
(sin.f64 (/.f64 #s(approx (- (pow lambda1 3) (pow lambda2 3)) (.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64)))) (fma.f64 lambda1 lambda1 (fma.f64 lambda2 lambda2 (.f64 lambda1 lambda2)))))
(/.f64 #s(approx (- (pow lambda1 3) (pow lambda2 3)) (.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64)))) (fma.f64 lambda1 lambda1 (fma.f64 lambda2 lambda2 (.f64 lambda1 lambda2))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) (*.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64))))
(*.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64)))
(pow.f64 lambda2 #s(literal 3 binary64))
(fma.f64 lambda1 lambda1 (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda2)))
(+.f64 (.f64 lambda1 lambda1) (fma.f64 lambda2 lambda2 (.f64 lambda1 lambda2)))
(fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda2))
(+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 lambda2))
(*.f64 lambda1 lambda2)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.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)))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.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)))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))
(.f64 (cos.f64 phi2) (sin.f64 (/.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))))))
(sin.f64 (/.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 (-.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 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))
(pow.f64 lambda1 #s(literal 3 binary64))
(+.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)))))))
(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))))
(-.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(*.f64 (cos.f64 lambda1) (sin.f64 lambda2))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 (+.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (sin.f64 (+.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (sin.f64 (+.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)))
(+.f64 lambda1 (atan2.f64 (.f64 (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) #s(literal 1 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) #s(literal 1 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) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2)))
(/.f64 (+.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)) (pow.f64 lambda1 #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))))
(+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))
(pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 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 (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 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) 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 2 binary64))
(-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(.f64 (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(/.f64 (-.f64 (.f64 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 2 binary64))) #s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.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))))))
(-.f64 (.f64 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 2 binary64)))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.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)))))
(.f64 lambda1 (+.f64 #s(literal 1 binary64) (.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))))
(+.f64 #s(literal 1 binary64) (.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)))
(.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))
(/.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)
(/.f64 (-.f64 (.f64 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 2 binary64))) (-.f64 lambda1 (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 lambda1 (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (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)))))) (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))) lambda1) 1) 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))) lambda1) 1) 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))) lambda1) 1) (/.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))) lambda1) 1) (/.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 (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1) (/.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 (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1) (/.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 lambda1 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 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2)))
#s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))
#s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (neg.f64 lambda2)) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (cos.f64 (neg.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)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.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) (sin.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.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) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.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) (sin.f64 (neg.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))
#s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))
#s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2))))))
#s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 lambda1 (-.f64 (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 (neg.f64 lambda2))))))
#s(approx (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (/.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))) (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) (sin.f64 (neg.f64 lambda2))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 (cos.f64 phi2) (sin.f64 (neg.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) (sin.f64 (neg.f64 lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.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) (sin.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.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) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.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) (sin.f64 (neg.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) (+.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2)))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 lambda1 (-.f64 (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 (neg.f64 lambda2)))))))
#s(approx (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) lambda1) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))))
#s(approx (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) 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 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))))
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))) lambda1))
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) (/.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 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))) lambda1))
#s(approx (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))) lambda1))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) lambda2))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) lambda2)))))) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) lambda2))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) lambda2)))))))) (.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos.f64 (*.f64 #s(literal -1 binary64) lambda2)))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (cos.f64 (.f64 #s(literal -1 binary64) lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (cos.f64 (.f64 #s(literal -1 binary64) lambda2)) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 (.f64 #s(literal -1 binary64) lambda2)))) (sin.f64 (.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (cos.f64 (.f64 #s(literal -1 binary64) lambda2)) (.f64 lambda1 (-.f64 (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal -1 binary64) lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (sin.f64 (.f64 #s(literal -1 binary64) lambda2)))))) (sin.f64 (.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) lambda2))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) (+.f64 (cos.f64 phi1) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) lambda2))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) lambda2)))))) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) lambda2))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) lambda2)))))))) (.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) lambda2))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) lambda2))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) lambda2)))))) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) lambda2))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) lambda2)))))))) (.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))) lambda1)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))) lambda1))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))) lambda1)))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) (+.f64 (cos.f64 phi1) (.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 lambda2 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) (+.f64 (cos.f64 phi1) (fma.f64 #s(literal 1/2 binary64) (.f64 lambda1 (+.f64 (cos.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (.f64 #s(literal -1 binary64) (cos.f64 (+.f64 lambda2 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 lambda2 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) (+.f64 (cos.f64 phi1) (fma.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 lambda2 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2))) (.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 lambda2 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2))))) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (.f64 #s(literal -1 binary64) (cos.f64 (+.f64 lambda2 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) (+.f64 (cos.f64 phi1) (fma.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 lambda2 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2))) (.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (.f64 #s(literal -1 binary64) (cos.f64 (+.f64 lambda2 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (.f64 lambda1 (fma.f64 #s(literal -1/6 binary64) (cos.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (.f64 #s(literal 1/6 binary64) (cos.f64 (+.f64 lambda2 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 lambda2 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2))))))))))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) (.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 lambda2 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) (fma.f64 #s(literal 1/2 binary64) (.f64 lambda1 (+.f64 (cos.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (.f64 #s(literal -1 binary64) (cos.f64 (+.f64 lambda2 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 lambda2 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2))))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) (fma.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 lambda2 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2))) (.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 lambda2 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2))))) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (.f64 #s(literal -1 binary64) (cos.f64 (+.f64 lambda2 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) (fma.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 lambda2 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2))) (.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (.f64 #s(literal -1 binary64) (cos.f64 (+.f64 lambda2 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (.f64 lambda1 (fma.f64 #s(literal -1/6 binary64) (cos.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (.f64 #s(literal 1/6 binary64) (cos.f64 (+.f64 lambda2 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 lambda2 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)))))))))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) (+.f64 (sin.f64 (+.f64 lambda2 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) (+.f64 (sin.f64 (+.f64 lambda2 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (+.f64 (sin.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (.f64 lambda1 (+.f64 (cos.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (.f64 #s(literal -1 binary64) (cos.f64 (+.f64 lambda2 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) (+.f64 (sin.f64 (+.f64 lambda2 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (+.f64 (sin.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (.f64 lambda1 (+.f64 (cos.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (fma.f64 #s(literal -1 binary64) (cos.f64 (+.f64 lambda2 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 lambda2 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)))))))))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) (+.f64 (sin.f64 (+.f64 lambda2 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (+.f64 (sin.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (.f64 lambda1 (+.f64 (cos.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (fma.f64 #s(literal -1 binary64) (cos.f64 (+.f64 lambda2 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 lambda2 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (.f64 lambda1 (fma.f64 #s(literal -1/6 binary64) (cos.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (.f64 #s(literal 1/6 binary64) (cos.f64 (+.f64 lambda2 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin.f64 (+.f64 lambda2 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (+.f64 (sin.f64 (+.f64 lambda2 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (cos.f64 (+.f64 lambda2 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (+.f64 (sin.f64 (+.f64 lambda2 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (cos.f64 (+.f64 lambda2 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (sin.f64 (+.f64 lambda2 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (+.f64 (sin.f64 (+.f64 lambda2 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (cos.f64 (+.f64 lambda2 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 lambda2 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (cos.f64 (+.f64 lambda2 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))
#s(approx (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) (+.f64 lambda2 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) (+.f64 lambda2 (+.f64 phi2 (fma.f64 #s(literal -1 binary64) lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (+.f64 (sin.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (.f64 lambda1 (cos.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)))))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (+.f64 (sin.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (.f64 lambda1 (+.f64 (cos.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (sin.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2))))))))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (+.f64 (sin.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (.f64 lambda1 (+.f64 (cos.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (cos.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2))))))))))
#s(approx (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2))
#s(approx (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) (-.f64 (+.f64 lambda1 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) lambda2))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (+.f64 (sin.f64 (neg.f64 lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (+.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (neg.f64 lambda2)))))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (+.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (neg.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (neg.f64 lambda2)) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (+.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (neg.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/6 binary64) (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal 1/12 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (neg.f64 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)))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 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)))))) (+.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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 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))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (fma.f64 lambda1 (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2)))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2)))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) (fma.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 phi2))))
#s(approx (* lambda1 (* (cos phi2) (neg (sin lambda2)))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 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) (fma.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) (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) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 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) (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 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 (fma.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 (fma.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 (cos lambda1) #s(literal 1 binary64))
#s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))
#s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#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 (pow.f64 lambda1 #s(literal 2 binary64)) (sin.f64 lambda2))))))
#s(approx (* (sin lambda1) (sin lambda2)) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 lambda2) (.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (sin.f64 lambda2))))))))
#s(approx (* (sin lambda1) (sin lambda2)) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 lambda2) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (sin.f64 lambda2)) (*.f64 #s(literal 1/120 binary64) (sin.f64 lambda2)))))))))
#s(approx (sin lambda1) lambda1)
#s(approx (sin lambda1) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))))
#s(approx (sin lambda1) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin lambda1) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2)))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) (-.f64 (.f64 lambda1 (sin.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 lambda2)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) lambda2))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (fma.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) lambda2))) (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) lambda2)))) (.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) lambda2))) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) lambda2)))))) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) lambda2)))) (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (sin.f64 (*.f64 #s(literal -1 binary64) lambda2)))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (sin.f64 (.f64 #s(literal -1 binary64) lambda2)) (.f64 lambda1 (cos.f64 (*.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (sin.f64 (.f64 #s(literal -1 binary64) lambda2)) (.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal -1 binary64) lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (sin.f64 (.f64 #s(literal -1 binary64) lambda2))))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (sin.f64 (.f64 #s(literal -1 binary64) lambda2)) (.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal -1 binary64) lambda2)) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal -1 binary64) lambda2)) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (cos.f64 (.f64 #s(literal -1 binary64) lambda2))))))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2)))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2)))
#s(approx (* lambda1 (cos lambda2)) (*.f64 lambda1 (cos.f64 lambda2)))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (cos.f64 lambda2))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
#s(approx (neg lambda1) (*.f64 #s(literal -1 binary64) lambda1))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (cos.f64 lambda2))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos 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 lambda2) lambda1) -1/2) (neg (sin lambda2))) (sin.f64 lambda2))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))
#s(approx (* (* (cos lambda2) lambda1) -1/2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))))
#s(approx (* (cos lambda2) lambda1) (*.f64 lambda1 (cos.f64 lambda2)))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) (cos.f64 lambda2))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2)))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos 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 (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) (sin.f64 lambda2))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) (+.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 (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (.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 (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (sin.f64 lambda2)))))
#s(approx (* 1/6 lambda1) (*.f64 #s(literal 1/6 binary64) lambda1))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2)))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2)))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (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 (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) (*.f64 lambda1 (cos.f64 lambda2)))
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) (.f64 lambda1 (+.f64 (cos.f64 lambda2) (.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (sin.f64 lambda2))))))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) (cos.f64 lambda2))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) (+.f64 (cos.f64 lambda2) (.f64 #s(literal 1/2 binary64) (.f64 lambda1 (sin.f64 lambda2)))))
#s(approx (* -1/2 (* lambda1 (neg (sin lambda2)))) (.f64 #s(literal 1/2 binary64) (.f64 lambda1 (sin.f64 lambda2))))
#s(approx (* lambda1 (neg (sin lambda2))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 lambda2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.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 lambda2) 1) lambda2) (*.f64 #s(literal -1 binary64) lambda2))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) (+.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 (- (pow lambda2 -1) (pow lambda1 -1))) #s(literal -1 binary64))
#s(approx (* lambda1 (- (pow lambda2 -1) (pow lambda1 -1))) (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))
#s(approx (- (pow lambda2 -1) (pow lambda1 -1)) (/.f64 #s(literal -1 binary64) lambda1))
#s(approx (- (pow lambda2 -1) (pow lambda1 -1)) (/.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda1))
#s(approx (pow lambda1 -1) (/.f64 #s(literal 1 binary64) lambda1))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) (*.f64 #s(literal -1 binary64) lambda2))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(literal -1 binary64))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))
#s(approx (- (pow (/ lambda1 lambda2) 3) 1) #s(literal -1 binary64))
#s(approx (- (pow (/ lambda1 lambda2) 3) 1) (-.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) #s(literal 1 binary64)))
#s(approx (pow (/ lambda1 lambda2) 3) (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))))
#s(approx (/ lambda1 lambda2) (/.f64 lambda1 lambda2))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) #s(literal 1 binary64))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) (+.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 (+.f64 (/.f64 #s(literal 1 binary64) lambda2) (/.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64)))))))
#s(approx (+ 1 (* (/ lambda1 lambda2) 1)) #s(literal 1 binary64))
#s(approx (+ 1 (* (/ lambda1 lambda2) 1)) (+.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))
#s(approx (* (/ lambda1 lambda2) 1) (/.f64 lambda1 lambda2))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 phi2) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (cos.f64 phi2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 phi2) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (cos.f64 phi2))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 phi2) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (cos.f64 phi2)) (.f64 #s(literal 1/24 binary64) (cos.f64 phi2)))))))))
#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 (+ 1 (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 lambda2))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2)))))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 lambda1 (-.f64 (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 (neg.f64 lambda2)))))))
#s(approx (+ 1 (* -1/2 (* lambda1 lambda1))) #s(literal 1 binary64))
#s(approx (+ 1 (* -1/2 (* lambda1 lambda1))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))
#s(approx (* -1/2 (* lambda1 lambda1)) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))
#s(approx (* lambda1 lambda1) (pow.f64 lambda1 #s(literal 2 binary64)))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) #s(literal 1 binary64))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2)) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))
#s(approx (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2)) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))
#s(approx (- (* 1/24 (* lambda1 lambda1)) 1/2) #s(literal -1/2 binary64))
#s(approx (- (* 1/24 (* lambda1 lambda1)) 1/2) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))
#s(approx (* 1/24 (* lambda1 lambda1)) (*.f64 #s(literal 1/24 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) #s(literal 1 binary64))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))
#s(approx (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))
#s(approx (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) #s(literal 1/2 binary64))))
#s(approx (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) #s(literal -1/2 binary64))
#s(approx (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))
#s(approx (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) (-.f64 (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))
#s(approx (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) (*.f64 #s(literal 1/24 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))
#s(approx (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))))
#s(approx (+ 1/24 (* -1/720 (* lambda1 lambda1))) #s(literal 1/24 binary64))
#s(approx (+ 1/24 (* -1/720 (* lambda1 lambda1))) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))
#s(approx (* -1/720 (* lambda1 lambda1)) (*.f64 #s(literal -1/720 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) lambda2))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) lambda2)))))) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) lambda2))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) lambda2)))))))) (.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2))) (.f64 (cos.f64 phi2) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)))) (.f64 (cos.f64 phi2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2))) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)))))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)))) (.f64 (cos.f64 phi2) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (+.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)) (.f64 lambda1 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (+.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)) (.f64 lambda1 (+.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2))))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (+.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)) (.f64 lambda1 (+.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2))))))))))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) (-.f64 (+.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 lambda1 (-.f64 (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 (neg.f64 lambda2))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (neg.f64 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 lambda1 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 3 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (-.f64 (fma.f64 lambda1 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (-.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (-.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (-.f64 (+.f64 #s(literal 1 binary64) (.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (-.f64 (+.f64 #s(literal 1 binary64) (.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) (fma.f64 #s(literal -2 binary64) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 lambda1 (-.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 lambda1 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (/.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (/.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))))))) (/.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (/.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))) (.f64 lambda1 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))) (/.f64 (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))))))) (/.f64 (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (/.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 lambda1 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (-.f64 (fma.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (-.f64 (fma.f64 lambda1 (-.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal -2 binary64) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))
#s(approx (pow (cos (- lambda1 lambda2)) 2) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))
#s(approx (pow (cos (- lambda1 lambda2)) 2) (fma.f64 #s(literal -2 binary64) (.f64 lambda1 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))
#s(approx (pow (cos (- lambda1 lambda2)) 2) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))
#s(approx (pow (cos (- lambda1 lambda2)) 2) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 lambda1 (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) (-.f64 (+.f64 (cos.f64 phi1) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))) (cos.f64 (neg.f64 lambda2))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 lambda1 (+.f64 (sin.f64 (neg.f64 lambda2)) (.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))))) (cos.f64 (neg.f64 lambda2))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 lambda1 (+.f64 (sin.f64 (neg.f64 lambda2)) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)))))))) (cos.f64 (neg.f64 lambda2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (pow.f64 (cos.f64 (-.f64 lambda1 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 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (pow.f64 (cos.f64 (-.f64 lambda1 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 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (pow.f64 (cos.f64 (-.f64 lambda1 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 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (neg.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 (neg.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 (neg.f64 lambda2)))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (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 (neg.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 (neg.f64 lambda2)))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (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 (neg.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 (neg.f64 lambda2)))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (fma.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (-.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))) (+.f64 (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (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 (neg.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 (neg.f64 lambda2)))))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (/.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)))) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (fma.f64 lambda1 (-.f64 (fma.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 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)))) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)))) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (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 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (fma.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)))) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (-.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)))) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)))) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)))) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (+.f64 #s(literal 1 binary64) (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 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (fma.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3) (fma.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 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 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (fma.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (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 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (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))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (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 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (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))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (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 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (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 (neg.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 (neg.f64 lambda2))))))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (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 (neg.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 (neg.f64 lambda2)))))))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (fma.f64 lambda1 (-.f64 (fma.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 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) #s(literal 2 binary64))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))) (+.f64 (/.f64 (.f64 (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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (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 (neg.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 (neg.f64 lambda2)))))))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (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 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (fma.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) #s(literal 2 binary64))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 3 binary64))) (/.f64 (.f64 (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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) #s(literal 2 binary64))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))) (+.f64 (/.f64 (.f64 (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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (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 (neg.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 (neg.f64 lambda2)))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/.f64 (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 (neg.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 (neg.f64 lambda2)))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 lambda1 (.f64 (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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))) (/.f64 (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 (neg.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 (neg.f64 lambda2))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) #s(literal 2 binary64))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 3 binary64))) (/.f64 (.f64 (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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64)))))) (/.f64 (.f64 (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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64)))) (/.f64 (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 (neg.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 (neg.f64 lambda2))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 lambda1 (-.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) #s(literal 2 binary64))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 3 binary64))) (/.f64 (.f64 (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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 3 binary64))) (/.f64 (.f64 (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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) #s(literal 2 binary64))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 3 binary64))) (/.f64 (.f64 (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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64)))))) (/.f64 (.f64 (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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64)))) (/.f64 (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 (neg.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 (neg.f64 lambda2))))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (fma.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (.f64 lambda1 (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (.f64 lambda1 (-.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (-.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 lambda1 (-.f64 (fma.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 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (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 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (fma.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (fma.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (fma.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 lambda1 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 lambda1 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (fma.f64 #s(literal -2 binary64) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))
#s(approx (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) (cos.f64 lambda2))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) (/.f64 (cos.f64 lambda2) lambda1))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) (/.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))) lambda1))
#s(approx (/ (cos lambda2) lambda1) (/.f64 (cos.f64 lambda2) lambda1))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) (cos.f64 lambda2))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2)))))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (/.f64 (cos.f64 lambda2) (pow.f64 lambda1 #s(literal 2 binary64))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (/.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))) (pow.f64 lambda1 #s(literal 2 binary64))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (/.f64 (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2)))))) (pow.f64 lambda1 #s(literal 2 binary64))))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) (pow.f64 lambda1 #s(literal 2 binary64)))))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) (/.f64 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda2) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 lambda2)))) (pow.f64 lambda1 #s(literal 2 binary64))))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1)))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (/.f64 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda2) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 lambda2)))) lambda1))
#s(approx (* -1 (/ (cos lambda2) lambda1)) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))))) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))))) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 lambda1 (-.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 3 binary64))) (.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (fma.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (fma.f64 lambda1 (-.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 3 binary64))) (.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 lambda1 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 lambda1 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 lambda1 (-.f64 (fma.f64 lambda1 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.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 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.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) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (/.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (fma.f64 lambda1 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))) (.f64 lambda1 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))) (/.f64 (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))) (.f64 lambda1 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal 1/3 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))) (/.f64 (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))) (/.f64 (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))))) (/.f64 (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (pow.f64 (cos.f64 (-.f64 lambda1 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 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (pow.f64 (cos.f64 (-.f64 lambda1 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 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (pow.f64 (cos.f64 (-.f64 lambda1 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 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (neg.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 (neg.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 (neg.f64 lambda2)))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (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 (neg.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 (neg.f64 lambda2)))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (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 (neg.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 (neg.f64 lambda2)))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (fma.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (-.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))) (+.f64 (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (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 (neg.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 (neg.f64 lambda2)))))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (fma.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (fma.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (neg.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 (neg.f64 lambda2))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (neg.f64 lambda2)) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (neg.f64 lambda2)) (sin.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.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 (neg.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) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.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 (neg.f64 lambda2)))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.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) (sin.f64 (neg.f64 lambda2)))))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.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) (sin.f64 (neg.f64 lambda2))))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.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) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.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) (sin.f64 (neg.f64 lambda2)))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (fma.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (fma.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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)) (pow.f64 (cos.f64 (-.f64 lambda1 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 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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)) (pow.f64 (cos.f64 (-.f64 lambda1 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 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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)) (pow.f64 (cos.f64 (-.f64 lambda1 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 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (neg.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 (neg.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 (neg.f64 lambda2)))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (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 (neg.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 (neg.f64 lambda2)))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (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 (neg.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 (neg.f64 lambda2)))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (fma.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (-.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))) (+.f64 (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (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 (neg.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 (neg.f64 lambda2)))))))))
#s(approx (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (neg.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 (neg.f64 lambda2))))))
#s(approx (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))
#s(approx (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (neg.f64 lambda2)) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))
#s(approx (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (neg.f64 lambda2)) (sin.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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 (.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 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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 (.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 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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 (.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 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 lambda1 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 lambda1 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (+.f64 (/.f64 (.f64 (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (+.f64 (/.f64 (.f64 (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (+.f64 (/.f64 (.f64 (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))
#s(approx (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (-.f64 (fma.f64 lambda1 (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))
#s(approx (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 lambda1 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))
#s(approx (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/6 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/6 binary64) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (fma.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 #s(literal 2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 lambda1 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 lambda1 (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 lambda1 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (fma.f64 lambda1 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (.f64 #s(literal 2 binary64) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (-.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (-.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) (fma.f64 #s(literal -2 binary64) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) (.f64 #s(literal 2 binary64) (log.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 lambda1 (sin.f64 (neg.f64 lambda2))) (cos.f64 (neg.f64 lambda2))) (.f64 #s(literal 2 binary64) (log.f64 (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) (fma.f64 #s(literal 2 binary64) (log.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (.f64 lambda1 (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (neg.f64 lambda2)) (cos.f64 (neg.f64 lambda2))) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 1 binary64)))))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) (fma.f64 #s(literal 2 binary64) (log.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (.f64 lambda1 (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (neg.f64 lambda2)) (cos.f64 (neg.f64 lambda2))) (.f64 lambda1 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/3 binary64) (*.f64 lambda1 (fma.f64 #s(literal -3 binary64) (/.f64 (sin.f64 (neg.f64 lambda2)) (cos.f64 (neg.f64 lambda2))) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (/.f64 (sin.f64 (neg.f64 lambda2)) (cos.f64 (neg.f64 lambda2)))))))) #s(literal 1 binary64)))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) (log.f64 (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) (+.f64 (log.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (.f64 #s(literal -1 binary64) (/.f64 (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))) (cos.f64 (neg.f64 lambda2))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) (+.f64 (log.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (neg.f64 lambda2)) (cos.f64 (neg.f64 lambda2))) (.f64 #s(literal 1/2 binary64) (.f64 lambda1 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 1 binary64))))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) (+.f64 (log.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (neg.f64 lambda2)) (cos.f64 (neg.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal 1/6 binary64) (.f64 lambda1 (fma.f64 #s(literal -3 binary64) (/.f64 (sin.f64 (neg.f64 lambda2)) (cos.f64 (neg.f64 lambda2))) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (/.f64 (sin.f64 (neg.f64 lambda2)) (cos.f64 (neg.f64 lambda2)))))) (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 1 binary64)))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (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 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (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 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (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 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (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 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (/.f64 (.f64 (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (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 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64)))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (/.f64 (.f64 (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))) (/.f64 (.f64 (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (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 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 lambda1 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64)))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (fma.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (/.f64 (.f64 (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64)))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (/.f64 (.f64 (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (/.f64 (.f64 (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))) (/.f64 (.f64 (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (-.f64 (fma.f64 lambda1 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))) (.f64 lambda1 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (fma.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))))))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))) (+.f64 (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (-.f64 (fma.f64 #s(literal -2 binary64) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))))) (pow.f64 (cos.f64 phi1) #s(literal 6 binary64))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (-.f64 (fma.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))))) (pow.f64 (cos.f64 phi1) #s(literal 6 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (-.f64 (fma.f64 lambda1 (-.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (fma.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))))) (pow.f64 (cos.f64 phi1) #s(literal 6 binary64))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))
#s(approx (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))
#s(approx (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) (fma.f64 #s(literal 2 binary64) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))
#s(approx (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) (fma.f64 lambda1 (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))
#s(approx (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) (fma.f64 lambda1 (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (fma.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) (fma.f64 lambda1 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) (fma.f64 lambda1 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 lambda1 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) (fma.f64 lambda1 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 lambda1 (fma.f64 lambda1 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))))))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (fma.f64 lambda1 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (fma.f64 lambda1 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 lambda1 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (fma.f64 lambda1 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 lambda1 (fma.f64 lambda1 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))))))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (fma.f64 #s(literal -2 binary64) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64))))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) (*.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))))
#s(approx (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) (*.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64))))
#s(approx (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (pow.f64 lambda2 #s(literal 2 binary64)))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (fma.f64 lambda1 lambda2 (pow.f64 lambda2 #s(literal 2 binary64))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (pow.f64 lambda2 #s(literal 2 binary64))))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) (pow.f64 lambda2 #s(literal 2 binary64)))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) (fma.f64 lambda1 lambda2 (pow.f64 lambda2 #s(literal 2 binary64))))
#s(approx (* lambda1 lambda2) (*.f64 lambda1 lambda2))
#s(approx (pow lambda1 3) (pow.f64 lambda1 #s(literal 3 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) (fma.f64 (cos.f64 lambda1) (cos.f64 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))))))) (+.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) (- (* (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) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 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)))) (fma.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 (pow.f64 lambda1 #s(literal 2 binary64)) (cos.f64 lambda2))))))
#s(approx (* (sin lambda1) (cos lambda2)) (.f64 lambda1 (+.f64 (cos.f64 lambda2) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 lambda2) (.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (cos.f64 lambda2))))))))
#s(approx (* (sin lambda1) (cos lambda2)) (.f64 lambda1 (+.f64 (cos.f64 lambda2) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 lambda2) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (cos.f64 lambda2)) (*.f64 #s(literal 1/120 binary64) (cos.f64 lambda2)))))))))
#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 (pow.f64 lambda1 #s(literal 2 binary64)) (sin.f64 lambda2)))))
#s(approx (* (cos lambda1) (sin lambda2)) (+.f64 (sin.f64 lambda2) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda2) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (sin.f64 lambda2)))))))
#s(approx (* (cos lambda1) (sin lambda2)) (+.f64 (sin.f64 lambda2) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda2) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (sin.f64 lambda2)) (.f64 #s(literal 1/24 binary64) (sin.f64 lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2.f64 (.f64 (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (fma.f64 lambda1 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (fma.f64 lambda1 (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 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 (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 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 (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (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)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+.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))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (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)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 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 2 binary64)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) (fma.f64 #s(literal -1 binary64) (.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)))))) (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 2 binary64))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) (fma.f64 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)))))) (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 2 binary64))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (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 2 binary64)))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) (.f64 #s(literal -1 binary64) (.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 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) (.f64 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))) 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 (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (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 (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+.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 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (.f64 #s(literal -1 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 2 binary64))))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (-.f64 (pow.f64 lambda1 #s(literal 2 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 2 binary64))))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (.f64 #s(literal -1 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 (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.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 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) (.f64 #s(literal -1 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 (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) (+.f64 lambda1 (.f64 #s(literal -1 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 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 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 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (/.f64 (+.f64 lambda1 (.f64 #s(literal -1 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 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 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 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (/.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 (+ 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))) lambda1) 1) lambda1) lambda1)
#s(approx (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) 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))) lambda1) 1) #s(literal 1 binary64))
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (+.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 (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1) #s(literal 1 binary64))
#s(approx (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) 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 (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))))
#s(approx (sin (- lambda1 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 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 (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (cos.f64 phi2) (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 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) lambda1) lambda1)
#s(approx (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) 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 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))) lambda1))))
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) #s(literal 1 binary64))
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) (+.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 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))) lambda1)))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 lambda2 lambda1)))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (.f64 lambda1 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))) (pow.f64 lambda1 #s(literal 2 binary64))))) (/.f64 lambda2 lambda1))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (.f64 lambda1 (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))) (pow.f64 lambda1 #s(literal 3 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64))) (+.f64 (/.f64 lambda2 lambda1) (/.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))) lambda1))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))) lambda1))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (*.f64 (cos.f64 phi2) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (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 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) lambda1))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) lambda1)))))) lambda1))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) (+.f64 (cos.f64 phi1) (.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) lambda1))))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) (.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) lambda1)))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))) lambda1))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin.f64 (-.f64 (+.f64 lambda2 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) lambda1)))
#s(approx (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) (*.f64 #s(literal -1 binary64) lambda1))
#s(approx (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) (*.f64 lambda1 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) lambda1) (+.f64 (/.f64 lambda2 lambda1) (/.f64 phi2 lambda1))) #s(literal 1 binary64))))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin.f64 (-.f64 (+.f64 lambda1 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) lambda2)))
#s(approx (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) lambda1)
#s(approx (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) (*.f64 lambda1 (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) lambda1) (/.f64 phi2 lambda1))) (/.f64 lambda2 lambda1))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 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)))))) 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)))))) (.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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) lambda1))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (*.f64 lambda1 (cos.f64 lambda2)))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (.f64 lambda1 (+.f64 (cos.f64 lambda2) (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 lambda2) lambda1)))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 lambda2))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) (.f64 lambda1 (fma.f64 (cos.f64 phi2) (sin.f64 lambda2) (/.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) lambda1))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 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) (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) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
#s(approx (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
#s(approx (cos lambda1) (cos.f64 lambda1))
#s(approx (* (sin lambda1) (sin lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
#s(approx (sin lambda1) (sin.f64 lambda1))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) (.f64 lambda1 (sin.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) (.f64 lambda1 (+.f64 (sin.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 lambda2) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) lambda1))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (*.f64 (cos.f64 phi2) (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (*.f64 lambda1 (cos.f64 lambda2)))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (.f64 lambda1 (+.f64 (cos.f64 lambda2) (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 lambda2) lambda1)))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 (sin.f64 lambda2)))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (cos.f64 lambda2))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (/.f64 (sin.f64 lambda2) lambda1))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (+.f64 (/.f64 (cos.f64 lambda2) (pow.f64 lambda1 #s(literal 2 binary64))) (/.f64 (sin.f64 lambda2) lambda1)))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) (*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (/.f64 (sin.f64 lambda2) lambda1))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 #s(literal -1/6 binary64) (.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (sin.f64 lambda2))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 lambda2) lambda1) (.f64 #s(literal -1/6 binary64) (sin.f64 lambda2)))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) (*.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 lambda2) lambda1) (fma.f64 #s(literal -1/6 binary64) (sin.f64 lambda2) (/.f64 (sin.f64 lambda2) (pow.f64 lambda1 #s(literal 2 binary64)))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) (*.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 lambda2) lambda1) (fma.f64 #s(literal -1/6 binary64) (sin.f64 lambda2) (+.f64 (/.f64 (cos.f64 lambda2) (pow.f64 lambda1 #s(literal 3 binary64))) (/.f64 (sin.f64 lambda2) (pow.f64 lambda1 #s(literal 2 binary64))))))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) (.f64 #s(literal -1/6 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (sin.f64 lambda2))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 lambda2) lambda1) (.f64 #s(literal -1/6 binary64) (sin.f64 lambda2)))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 lambda2) lambda1) (fma.f64 #s(literal -1/6 binary64) (sin.f64 lambda2) (/.f64 (sin.f64 lambda2) (pow.f64 lambda1 #s(literal 2 binary64)))))))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (.f64 #s(literal -1/6 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (sin.f64 lambda2))))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 lambda2) lambda1) (.f64 #s(literal -1/6 binary64) (sin.f64 lambda2)))))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (sin.f64 lambda2))))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 lambda2) lambda1) (.f64 #s(literal -1/6 binary64) (sin.f64 lambda2)))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (sin.f64 lambda2))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 lambda2) (pow.f64 lambda1 #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)))))
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (sin.f64 lambda2))))
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1))))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) (.f64 #s(literal 1/2 binary64) (.f64 lambda1 (sin.f64 lambda2))))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) (*.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 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 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.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 (* (- (/ lambda1 lambda2) 1) lambda2) lambda1)
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) (.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 (/.f64 #s(literal 1 binary64) lambda2) (/.f64 #s(literal 1 binary64) lambda1))))
#s(approx (* lambda1 (- (pow lambda2 -1) (pow lambda1 -1))) (/.f64 lambda1 lambda2))
#s(approx (* lambda1 (- (pow lambda2 -1) (pow lambda1 -1))) (*.f64 lambda1 (-.f64 (/.f64 #s(literal 1 binary64) lambda2) (/.f64 #s(literal 1 binary64) lambda1))))
#s(approx (- (pow lambda2 -1) (pow lambda1 -1)) (/.f64 #s(literal 1 binary64) lambda2))
#s(approx (- (pow lambda2 -1) (pow lambda1 -1)) (-.f64 (/.f64 #s(literal 1 binary64) lambda2) (/.f64 #s(literal 1 binary64) lambda1)))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) lambda1)
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 lambda2 lambda1)))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) (.f64 lambda1 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))) (pow.f64 lambda1 #s(literal 2 binary64))))) (/.f64 lambda2 lambda1))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) (.f64 lambda1 (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))) (pow.f64 lambda1 #s(literal 3 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64))) (+.f64 (/.f64 lambda2 lambda1) (/.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64))))))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) (/.f64 lambda1 lambda2))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) (*.f64 lambda1 (-.f64 (/.f64 #s(literal 1 binary64) lambda2) (/.f64 #s(literal 1 binary64) lambda1))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) (.f64 lambda1 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda2)) (pow.f64 lambda1 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) lambda2)) (/.f64 #s(literal 1 binary64) lambda1))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) (.f64 lambda1 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) lambda2) (/.f64 (.f64 lambda2 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda2))) (pow.f64 lambda1 #s(literal 3 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 lambda2 (pow.f64 lambda1 #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 lambda2 (pow.f64 lambda1 #s(literal 2 binary64))))))))
#s(approx (- (pow (/ lambda1 lambda2) 3) 1) (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))))
#s(approx (- (pow (/ lambda1 lambda2) 3) 1) (*.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda2 #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 3 binary64))))))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) (/.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (pow.f64 lambda2 #s(literal 2 binary64))))))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 lambda1 lambda2)) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 lambda2 #s(literal 2 binary64)))))))
#s(approx (+ 1 (* (/ lambda1 lambda2) 1)) (/.f64 lambda1 lambda2))
#s(approx (+ 1 (* (/ lambda1 lambda2) 1)) (*.f64 lambda1 (+.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda2))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#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 (+ 1 (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ 1 (* -1/2 (* lambda1 lambda1))) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))
#s(approx (+ 1 (* -1/2 (* lambda1 lambda1))) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) (*.f64 #s(literal 1/24 binary64) (pow.f64 lambda1 #s(literal 4 binary64))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) (.f64 (pow.f64 lambda1 #s(literal 4 binary64)) (-.f64 #s(literal 1/24 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) (.f64 (pow.f64 lambda1 #s(literal 4 binary64)) (-.f64 (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))))
#s(approx (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2)) (*.f64 #s(literal 1/24 binary64) (pow.f64 lambda1 #s(literal 4 binary64))))
#s(approx (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2)) (.f64 (pow.f64 lambda1 #s(literal 4 binary64)) (-.f64 #s(literal 1/24 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))))
#s(approx (- (* 1/24 (* lambda1 lambda1)) 1/2) (*.f64 #s(literal 1/24 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))
#s(approx (- (* 1/24 (* lambda1 lambda1)) 1/2) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 #s(literal 1/24 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) (*.f64 #s(literal -1/720 binary64) (pow.f64 lambda1 #s(literal 6 binary64))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) (.f64 (pow.f64 lambda1 #s(literal 6 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))) #s(literal 1/720 binary64))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) (.f64 (pow.f64 lambda1 #s(literal 6 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))) (+.f64 #s(literal 1/720 binary64) (/.f64 #s(literal 1/2 binary64) (pow.f64 lambda1 #s(literal 4 binary64)))))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) (*.f64 (pow.f64 lambda1 #s(literal 6 binary64)) (-.f64 (fma.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 6 binary64)))) (+.f64 #s(literal 1/720 binary64) (/.f64 #s(literal 1/2 binary64) (pow.f64 lambda1 #s(literal 4 binary64)))))))
#s(approx (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) (*.f64 #s(literal -1/720 binary64) (pow.f64 lambda1 #s(literal 6 binary64))))
#s(approx (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) (.f64 (pow.f64 lambda1 #s(literal 6 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))) #s(literal 1/720 binary64))))
#s(approx (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) (.f64 (pow.f64 lambda1 #s(literal 6 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))) (+.f64 #s(literal 1/720 binary64) (/.f64 #s(literal 1/2 binary64) (pow.f64 lambda1 #s(literal 4 binary64)))))))
#s(approx (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) (*.f64 #s(literal -1/720 binary64) (pow.f64 lambda1 #s(literal 4 binary64))))
#s(approx (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) (.f64 (pow.f64 lambda1 #s(literal 4 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))) #s(literal 1/720 binary64))))
#s(approx (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) (.f64 (pow.f64 lambda1 #s(literal 4 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))) (+.f64 #s(literal 1/720 binary64) (/.f64 #s(literal 1/2 binary64) (pow.f64 lambda1 #s(literal 4 binary64)))))))
#s(approx (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) (*.f64 #s(literal -1/720 binary64) (pow.f64 lambda1 #s(literal 4 binary64))))
#s(approx (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) (.f64 (pow.f64 lambda1 #s(literal 4 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))) #s(literal 1/720 binary64))))
#s(approx (+ 1/24 (* -1/720 (* lambda1 lambda1))) (*.f64 #s(literal -1/720 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))
#s(approx (+ 1/24 (* -1/720 (* lambda1 lambda1))) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))) #s(literal 1/720 binary64))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (sin.f64 (-.f64 (+.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) lambda1)
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) (.f64 lambda1 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) lambda1))) (/.f64 lambda2 lambda1))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (pow (cos (- lambda1 lambda2)) 2) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (pow.f64 (cos.f64 (-.f64 lambda1 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 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (-.f64 lambda1 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 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (/.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))) lambda1))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (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 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (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 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (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 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/.f64 (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 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 (- lambda1 lambda2)) (cos phi2)) 2) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 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 lambda2)))))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) (*.f64 lambda1 (sin.f64 lambda2)))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1))))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) (sin.f64 lambda2))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (cos.f64 lambda2))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (/.f64 (sin.f64 lambda2) lambda1))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (+.f64 (/.f64 (cos.f64 lambda2) (pow.f64 lambda1 #s(literal 2 binary64))) (/.f64 (sin.f64 lambda2) lambda1)))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (/.f64 (sin.f64 lambda2) lambda1)))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (+.f64 (/.f64 (cos.f64 lambda2) (pow.f64 lambda1 #s(literal 2 binary64))) (/.f64 (sin.f64 lambda2) lambda1))))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 lambda2) lambda1)))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) (/.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2)))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (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 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))) lambda1))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (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) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))) lambda1))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.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 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (pow.f64 (cos.f64 (-.f64 lambda1 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 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (-.f64 lambda1 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 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #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 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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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)) (pow.f64 (cos.f64 (-.f64 lambda1 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 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (-.f64 lambda1 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 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (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))) (- (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 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (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))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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 (.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 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) lambda1))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.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 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))
#s(approx (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (-.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 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (.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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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 (-.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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) (.f64 #s(literal 2 binary64) (log.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) (log.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (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 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) lambda1))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))))
#s(approx (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) (pow.f64 lambda1 #s(literal 3 binary64)))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) (.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))))))
#s(approx (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) (pow.f64 lambda1 #s(literal 3 binary64)))
#s(approx (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) (.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (pow.f64 lambda1 #s(literal 2 binary64)))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 lambda2 lambda1) (/.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64)))))))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) (*.f64 lambda1 lambda2))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) (*.f64 lambda1 (+.f64 lambda2 (/.f64 (pow.f64 lambda2 #s(literal 2 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))))))) 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) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 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 (* (cos lambda1) (sin lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
#s(approx (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) lambda1))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (.f64 (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) lambda1))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) lambda1)
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 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 (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) (.f64 lambda1 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 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 2 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 2 binary64))) (pow.f64 lambda1 #s(literal 2 binary64))))) (.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 (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) (.f64 lambda1 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 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 2 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 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)))))) (pow.f64 lambda1 #s(literal 3 binary64))))) (fma.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) (fma.f64 #s(literal -1 binary64) (/.f64 (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 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64))) (/.f64 (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 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64))))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (pow.f64 lambda1 #s(literal 3 binary64)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (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)) (pow.f64 lambda1 #s(literal 3 binary64))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) (pow.f64 lambda1 #s(literal 2 binary64)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.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 (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (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 2 binary64)) (pow.f64 lambda1 #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 (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 lambda1 #s(literal 2 binary64)))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.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 (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) lambda1)
#s(approx (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) lambda1))))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (pow.f64 lambda1 #s(literal 2 binary64)))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (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 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64)))))))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) lambda1)
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.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 (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) lambda1)
#s(approx (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.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 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) #s(literal 1 binary64))
#s(approx (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (+.f64 #s(literal 1 binary64) (.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 (+ 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) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.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))) lambda1) 1) lambda1) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.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))) lambda1) 1) (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) lambda1)))
#s(approx (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1) (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) lambda1)))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.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 phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))
#s(approx (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.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))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) (+.f64 (cos.f64 phi1) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))
#s(approx (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) lambda1) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))) lambda1)))
#s(approx (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))) lambda1))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos.f64 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) lambda2 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))) lambda1))) lambda1)) #s(literal 1 binary64)))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) lambda2 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))) lambda1) (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))) lambda1))) lambda1)) #s(literal 1 binary64)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (neg.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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (neg.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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (neg.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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (neg.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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 lambda2 (+.f64 phi2 (fma.f64 #s(literal -1 binary64) lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (sin.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 lambda2 (+.f64 phi2 (fma.f64 #s(literal -1 binary64) lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (sin.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) (+.f64 (cos.f64 phi1) (.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 lambda2 (+.f64 phi2 (fma.f64 #s(literal -1 binary64) lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (sin.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) (.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 lambda2 (+.f64 phi2 (fma.f64 #s(literal -1 binary64) lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (sin.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) (+.f64 (sin.f64 (+.f64 lambda2 (+.f64 phi2 (fma.f64 #s(literal -1 binary64) lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (sin.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin.f64 (+.f64 lambda2 (+.f64 phi2 (fma.f64 #s(literal -1 binary64) lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 lambda2 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))) lambda1))))))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))
#s(approx (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2) lambda1)) #s(literal 1 binary64)))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (+.f64 (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 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)))))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (sin.f64 (neg.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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (neg.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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (.f64 (sin.f64 (neg.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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda2) (/.f64 (sin.f64 lambda2) lambda1)))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) lambda1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 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) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.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 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.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 (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (sin.f64 lambda2) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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) (sin.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (sin.f64 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda2) (/.f64 (sin.f64 lambda2) lambda1)))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 lambda2) lambda1) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 #s(literal 1/6 binary64) (sin.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 lambda2) lambda1))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (/.f64 (sin.f64 lambda2) lambda1)) lambda1) (*.f64 #s(literal 1/6 binary64) (sin.f64 lambda2))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1) (*.f64 #s(literal 1/6 binary64) (sin.f64 lambda2))))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 lambda2) lambda1) (.f64 #s(literal 1/2 binary64) (cos.f64 lambda2))) lambda1) (*.f64 #s(literal -1/6 binary64) (sin.f64 lambda2)))))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal 1/6 binary64) (sin.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 lambda2) lambda1))))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda2) (/.f64 (sin.f64 lambda2) lambda1)) lambda1) (.f64 #s(literal 1/2 binary64) (sin.f64 lambda2)))))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 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) (sin.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.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(literal 1 binary64)))))
#s(approx (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.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 lambda2) 1) lambda2) (.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 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda2)))))
#s(approx (* lambda1 (- (pow lambda2 -1) (pow lambda1 -1))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda2)))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) lambda2 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))) lambda1))) lambda1)) #s(literal 1 binary64)))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) lambda2 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))) lambda1) (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))) lambda1))) lambda1)) #s(literal 1 binary64)))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda2)))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda2)) lambda1)) #s(literal 1 binary64)) lambda1)) (/.f64 #s(literal 1 binary64) lambda2)))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 lambda2 (fma.f64 #s(literal -1 binary64) lambda2 (.f64 #s(literal -1 binary64) (/.f64 (.f64 lambda2 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda2))) lambda1)))) lambda1)) #s(literal 1 binary64)) lambda1)) (/.f64 #s(literal 1 binary64) lambda2)))))
#s(approx (- (pow (/ lambda1 lambda2) 3) 1) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)))))))
#s(approx (* lambda2 (- (/ lambda1 lambda2) 1)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2) lambda1)) #s(literal 1 binary64)))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (neg.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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) (.f64 (cos.f64 (neg.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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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) (sin.f64 (neg.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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64))))
#s(approx (pow (cos (- lambda1 lambda2)) 2) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (/.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 3 binary64)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 3 binary64)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 3 binary64))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (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) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (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) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))) (/.f64 (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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.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) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))) (/.f64 (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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))) (/.f64 (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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/.f64 (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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 3 binary64))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64))))
#s(approx (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)) lambda1)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (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) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (/.f64 (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.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 (neg.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 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))))))
#s(approx (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))) #s(literal 2 binary64)))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))) #s(literal 2 binary64)))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))) #s(literal 2 binary64))))
#s(approx (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))) #s(literal 2 binary64)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (/.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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (/.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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))))
#s(approx (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) (.f64 #s(literal 2 binary64) (log.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) (log.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (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) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 6 binary64)))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 6 binary64)))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 6 binary64)))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 6 binary64)))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 6 binary64)))))
#s(approx (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 6 binary64))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 4 binary64)))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (-.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) #s(literal 1 binary64)))))
#s(approx (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (-.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) #s(literal 1 binary64)))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) lambda2 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 lambda2 #s(literal 2 binary64)) lambda1))) lambda1)))))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) lambda2 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 lambda2 #s(literal 2 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 (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 (* (sin (+ phi2 (/ (PI) 2))) (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 (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (.f64 (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (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 (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (.f64 (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) #s(literal 2 binary64)) lambda1) (/.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) #s(literal 2 binary64)) lambda1)) (.f64 #s(literal -1 binary64) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) #s(literal 2 binary64))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))) lambda1)) (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) #s(literal 2 binary64)))) lambda1)) (.f64 #s(literal -1 binary64) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))) #s(literal 1 binary64)))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) #s(literal 3 binary64)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) lambda1)))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) #s(literal 2 binary64)) lambda1)) (.f64 #s(literal -1 binary64) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))) lambda1)))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) #s(literal 2 binary64)))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.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))) lambda1) (.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))))))
#s(approx (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (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) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) #s(literal 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64)))))))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) lambda1) #s(literal 1 binary64)))))
#s(approx (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) lambda1) #s(literal 1 binary64)))))
#s(approx (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))) lambda1))))
#s(approx (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))) lambda1)))
#s(approx (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) lambda1))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))
#s(approx (* (cos phi2) (sin (- lambda1 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 lambda2))) (fma.f64 lambda2 (fma.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 lambda2))) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (.f64 lambda2 (fma.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 lambda2)) (sin.f64 lambda1))
#s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 lambda1) (.f64 #s(literal -1 binary64) (.f64 lambda2 (cos.f64 lambda1)))))
#s(approx (sin (- lambda1 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 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 lambda2 lambda2)
#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 (fma.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 (fma.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 (* (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 (fma.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 (fma.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 (+ (* (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 (fma.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 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (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 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 lambda2 (fma.f64 lambda2 (fma.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))) (+.f64 (cos.f64 lambda1) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) (+.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi1) (*.f64 lambda2 (sin.f64 lambda1)))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) (+.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi1) (.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 phi1) (cos (- lambda1 lambda2))) (+.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi1) (.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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 lambda2 (fma.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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos.f64 lambda1))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))) (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (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 (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 lambda2 (fma.f64 lambda2 (fma.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 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (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 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 lambda2 (fma.f64 lambda2 (fma.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 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))) (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 lambda2 (fma.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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (fma.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.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) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (.f64 (sin.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (sin.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (.f64 (sin.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (sin.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (.f64 (sin.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (sin.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (.f64 (sin.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (sin.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) (+.f64 (cos.f64 phi1) (.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) (+.f64 (cos.f64 phi1) (fma.f64 #s(literal 1/2 binary64) (.f64 lambda2 (+.f64 (cos.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (.f64 #s(literal -1 binary64) (cos.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) (+.f64 (cos.f64 phi1) (fma.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))) (.f64 lambda2 (fma.f64 #s(literal 1/2 binary64) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (.f64 #s(literal -1 binary64) (cos.f64 (+.f64 lambda1 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) (+.f64 (cos.f64 phi1) (fma.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))) (.f64 lambda2 (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (.f64 #s(literal -1 binary64) (cos.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 lambda2 (fma.f64 #s(literal 1/2 binary64) (.f64 lambda2 (fma.f64 #s(literal -1/6 binary64) (cos.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (.f64 #s(literal 1/6 binary64) (cos.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))))))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) (.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) (fma.f64 #s(literal 1/2 binary64) (.f64 lambda2 (+.f64 (cos.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (.f64 #s(literal -1 binary64) (cos.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) (fma.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))) (.f64 lambda2 (fma.f64 #s(literal 1/2 binary64) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (.f64 #s(literal -1 binary64) (cos.f64 (+.f64 lambda1 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) (fma.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))) (.f64 lambda2 (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (.f64 #s(literal -1 binary64) (cos.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 lambda2 (fma.f64 #s(literal 1/2 binary64) (.f64 lambda2 (fma.f64 #s(literal -1/6 binary64) (cos.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (.f64 #s(literal 1/6 binary64) (cos.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))))))))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) (+.f64 (sin.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) (+.f64 (sin.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (+.f64 (sin.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (.f64 lambda2 (+.f64 (cos.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (.f64 #s(literal -1 binary64) (cos.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) (+.f64 (sin.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (+.f64 (sin.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (.f64 lambda2 (+.f64 (cos.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (fma.f64 #s(literal -1 binary64) (cos.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))))))))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) (+.f64 (sin.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (+.f64 (sin.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (.f64 lambda2 (+.f64 (cos.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (fma.f64 #s(literal -1 binary64) (cos.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (.f64 lambda2 (fma.f64 #s(literal -1/6 binary64) (cos.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (.f64 #s(literal 1/6 binary64) (cos.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (+.f64 (sin.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (.f64 lambda2 (cos.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (+.f64 (sin.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (.f64 lambda2 (+.f64 (cos.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (sin.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (+.f64 (sin.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (.f64 lambda2 (+.f64 (cos.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (cos.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))))))
#s(approx (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))
#s(approx (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) (-.f64 (+.f64 lambda2 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) lambda1))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin.f64 (+.f64 lambda1 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (+.f64 (sin.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1 binary64) (.f64 lambda2 (cos.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (+.f64 (sin.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (sin.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (+.f64 (sin.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal 1/6 binary64) (.f64 lambda2 (cos.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))
#s(approx (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) (+.f64 lambda1 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) (+.f64 lambda1 (+.f64 phi2 (fma.f64 #s(literal -1 binary64) lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (+.f64 (sin.f64 lambda1) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 lambda1)))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (+.f64 (sin.f64 lambda1) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 lambda1)) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda1))))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (+.f64 (sin.f64 lambda1) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 lambda1)) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda1)) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 lambda1)))))))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (+.f64 (sin.f64 lambda1) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 lambda1)) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda1)) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (fma.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 lambda1)) (.f64 lambda2 (fma.f64 #s(literal -1/12 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda1)) (.f64 #s(literal 1/6 binary64) (cos.f64 lambda1)))))))))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))) (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 lambda2 (fma.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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))))) (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) lambda1)
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (+.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda2)) #s(literal 1 binary64)))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (+.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) lambda1 (*.f64 #s(literal 1/6 binary64) lambda2))) #s(literal 1 binary64)))))
#s(approx (cos lambda2) #s(literal 1 binary64))
#s(approx (cos lambda2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda2 #s(literal 2 binary64)))))
#s(approx (cos lambda2) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos lambda2) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 lambda2 #s(literal 2 binary64))))) #s(literal 1/2 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) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(approx (neg (sin lambda2)) (.f64 lambda2 (-.f64 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/120 binary64) (pow.f64 lambda2 #s(literal 2 binary64))))) #s(literal 1 binary64))))
#s(approx (neg (sin lambda2)) (.f64 lambda2 (-.f64 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (+.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/5040 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/120 binary64))))) #s(literal 1 binary64))))
#s(approx (sin lambda2) lambda2)
#s(approx (sin lambda2) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 lambda2 #s(literal 2 binary64))))))
#s(approx (sin lambda2) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin lambda2) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (pow.f64 lambda2 #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) (cos.f64 phi2))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) (+.f64 (cos.f64 phi2) (.f64 lambda1 (.f64 lambda2 (cos.f64 phi2)))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) (+.f64 (cos.f64 phi2) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda2 (cos.f64 phi2)) (*.f64 lambda1 (cos.f64 phi2))))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) (+.f64 (cos.f64 phi2) (.f64 lambda2 (fma.f64 lambda1 (cos.f64 phi2) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (*.f64 lambda2 (cos.f64 phi2))))))))))
#s(approx (* lambda1 (* (cos phi2) (neg (sin lambda2)))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (*.f64 lambda2 (cos.f64 phi2)))))
#s(approx (* lambda1 (* (cos phi2) (neg (sin lambda2)))) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (cos.f64 phi2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 phi2)))))))
#s(approx (* lambda1 (* (cos phi2) (neg (sin lambda2)))) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (cos.f64 phi2)) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/120 binary64) (.f64 lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 phi2))) (.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (cos.f64 phi2))))))))
#s(approx (* lambda1 (* (cos phi2) (neg (sin lambda2)))) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (cos.f64 phi2)) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (.f64 lambda1 (cos.f64 phi2)) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/120 binary64) (.f64 lambda1 (cos.f64 phi2)) (.f64 #s(literal 1/5040 binary64) (.f64 lambda1 (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 phi2)))))))))))
#s(approx (* (cos phi2) (neg (sin lambda2))) (.f64 #s(literal -1 binary64) (.f64 lambda2 (cos.f64 phi2))))
#s(approx (* (cos phi2) (neg (sin lambda2))) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 phi2) (.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 phi2))))))
#s(approx (* (cos phi2) (neg (sin lambda2))) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 phi2) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/120 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 phi2)) (.f64 #s(literal 1/6 binary64) (cos.f64 phi2)))))))
#s(approx (* (cos phi2) (neg (sin lambda2))) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 phi2) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (cos.f64 phi2) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/120 binary64) (cos.f64 phi2) (.f64 #s(literal 1/5040 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 phi2))))))))))
#s(approx (* (cos phi2) (cos lambda2)) (cos.f64 phi2))
#s(approx (* (cos phi2) (cos lambda2)) (+.f64 (cos.f64 phi2) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 phi2)))))
#s(approx (* (cos phi2) (cos lambda2)) (+.f64 (cos.f64 phi2) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 phi2)))))))
#s(approx (* (cos phi2) (cos lambda2)) (+.f64 (cos.f64 phi2) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 phi2)) (.f64 #s(literal 1/24 binary64) (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 (fma.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 (fma.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 (pow.f64 lambda2 #s(literal 2 binary64)) (sin.f64 lambda1))))))
#s(approx (* (sin lambda1) (sin lambda2)) (.f64 lambda2 (+.f64 (sin.f64 lambda1) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 lambda1) (.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (sin.f64 lambda1))))))))
#s(approx (* (sin lambda1) (sin lambda2)) (.f64 lambda2 (+.f64 (sin.f64 lambda1) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 lambda1) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (sin.f64 lambda1)) (*.f64 #s(literal 1/120 binary64) (sin.f64 lambda1)))))))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) (.f64 lambda1 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) (fma.f64 lambda1 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 lambda2 (-.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 1 binary64)))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) (fma.f64 lambda1 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 lambda2 (-.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 lambda2 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 1 binary64)))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) (fma.f64 lambda1 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 lambda2 (-.f64 (fma.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda1 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 lambda2 (+.f64 #s(literal 1/6 binary64) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) #s(literal 1 binary64)))))
#s(approx (sin (+ lambda2 (/ (PI) 2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (sin (+ lambda2 (/ (PI) 2))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (sin (+ lambda2 (/ (PI) 2))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 lambda2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (sin (+ lambda2 (/ (PI) 2))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 lambda2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (+ lambda2 (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (+ lambda2 (/ (PI) 2)) (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (fma.f64 lambda2 (fma.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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (.f64 lambda2 (fma.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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (sin.f64 lambda1))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (sin.f64 lambda1) (.f64 #s(literal -1 binary64) (.f64 lambda2 (cos.f64 lambda1)))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 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 lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 phi2) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 phi2))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 phi2) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 phi2))))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 phi2) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 phi2)) (.f64 #s(literal 1/24 binary64) (cos.f64 phi2)))))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (fma.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (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)) 1) (+.f64 #s(literal 1 binary64) (fma.f64 lambda2 (fma.f64 lambda2 (fma.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 (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) lambda1)
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (+.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda2)) #s(literal 1 binary64)))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (+.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) lambda1 (*.f64 #s(literal 1/6 binary64) lambda2))) #s(literal 1 binary64)))))
#s(approx (* lambda1 (cos lambda2)) lambda1)
#s(approx (* lambda1 (cos lambda2)) (+.f64 lambda1 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64))))))
#s(approx (* lambda1 (cos lambda2)) (+.f64 lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 #s(literal 1/24 binary64) (*.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64))))))))
#s(approx (* lambda1 (cos lambda2)) (+.f64 lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) lambda1)))))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(literal 1 binary64))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2)))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (+.f64 #s(literal 1 binary64) (.f64 lambda2 (+.f64 lambda1 (.f64 #s(literal -1/2 binary64) lambda2)))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (+.f64 #s(literal 1 binary64) (.f64 lambda2 (+.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 lambda1 lambda2))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (.f64 lambda2 (+.f64 lambda1 (.f64 lambda2 (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (.f64 lambda2 (+.f64 lambda1 (.f64 lambda2 (-.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 lambda1 lambda2) (.f64 #s(literal 1/4 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))) #s(literal 1/2 binary64))))))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) (*.f64 #s(literal -1/2 binary64) lambda1))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) (+.f64 lambda2 (*.f64 #s(literal -1/2 binary64) lambda1)))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda2))))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 lambda2 (fma.f64 #s(literal -1/6 binary64) lambda2 (*.f64 #s(literal 1/4 binary64) lambda1)))))))
#s(approx (* (* (cos lambda2) lambda1) -1/2) (*.f64 #s(literal -1/2 binary64) lambda1))
#s(approx (* (* (cos lambda2) lambda1) -1/2) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 #s(literal 1/4 binary64) (.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64))))))
#s(approx (* (* (cos lambda2) lambda1) -1/2) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) (.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) lambda1)))))
#s(approx (* (* (cos lambda2) lambda1) -1/2) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) lambda1 (.f64 #s(literal 1/1440 binary64) (.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64))))))))))
#s(approx (* (cos lambda2) lambda1) lambda1)
#s(approx (* (cos lambda2) lambda1) (+.f64 lambda1 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64))))))
#s(approx (* (cos lambda2) lambda1) (+.f64 lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 #s(literal 1/24 binary64) (*.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64))))))))
#s(approx (* (cos lambda2) lambda1) (+.f64 lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) lambda1)))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (.f64 lambda1 (.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (.f64 lambda2 (fma.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))) (.f64 lambda2 (-.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
#s(approx (+ (* (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) lambda1) (cos lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (.f64 lambda2 (fma.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))) (.f64 lambda2 (-.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 #s(literal 1/36 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/6 binary64))))) #s(literal 1/2 binary64))))))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) (*.f64 #s(literal -1/2 binary64) lambda1))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 lambda2 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda2)))))))
#s(approx (- (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (neg (sin lambda2))) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 lambda2 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (.f64 lambda2 (fma.f64 #s(literal 1/4 binary64) lambda1 (.f64 lambda2 (-.f64 (.f64 #s(literal 1/36 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (*.f64 #s(literal -1/2 binary64) lambda1))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 #s(literal -1/6 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) lambda2))))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 lambda2 (fma.f64 #s(literal -1/6 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda2))))))
#s(approx (* (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) lambda1) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 lambda2 (fma.f64 #s(literal -1/6 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (.f64 lambda2 (fma.f64 #s(literal 1/36 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) lambda2) (.f64 #s(literal 1/4 binary64) lambda1)))))))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) #s(literal -1/2 binary64))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) (-.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) (-.f64 (.f64 lambda2 (fma.f64 #s(literal -1/6 binary64) lambda1 (.f64 #s(literal 1/4 binary64) lambda2))) #s(literal 1/2 binary64)))
#s(approx (+ (* (* 1/6 lambda1) (neg (sin lambda2))) (* -1/2 (cos lambda2))) (-.f64 (.f64 lambda2 (fma.f64 #s(literal -1/6 binary64) lambda1 (.f64 lambda2 (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/36 binary64) (.f64 lambda1 lambda2)))))) #s(literal 1/2 binary64)))
#s(approx (* -1/2 (cos lambda2)) #s(literal -1/2 binary64))
#s(approx (* -1/2 (cos lambda2)) (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))
#s(approx (* -1/2 (cos lambda2)) (-.f64 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal -1/48 binary64) (pow.f64 lambda2 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))
#s(approx (* -1/2 (cos lambda2)) (-.f64 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (+.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/1440 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/48 binary64))))) #s(literal 1/2 binary64)))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) lambda1)
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (+.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1 binary64)))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (+.f64 lambda1 (.f64 lambda2 (-.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda2) (*.f64 #s(literal 1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))) #s(literal 1 binary64)))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (+.f64 lambda1 (.f64 lambda2 (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 lambda2 (+.f64 #s(literal 1/6 binary64) (.f64 #s(literal -1/12 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) lambda1)
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) lambda2))))
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) (+.f64 lambda1 (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda2) (*.f64 #s(literal 1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))))
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) (+.f64 lambda1 (.f64 lambda2 (fma.f64 #s(literal 1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 #s(literal -1/12 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) lambda2))))))))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) #s(literal 1 binary64))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (.f64 lambda1 lambda2))))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) (+.f64 #s(literal 1 binary64) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) lambda2 (.f64 #s(literal 1/2 binary64) lambda1)))))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) (+.f64 #s(literal 1 binary64) (.f64 lambda2 (fma.f64 #s(literal 1/2 binary64) lambda1 (.f64 lambda2 (-.f64 (.f64 #s(literal -1/12 binary64) (.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))
#s(approx (* -1/2 (* lambda1 (neg (sin lambda2)))) (.f64 #s(literal 1/2 binary64) (.f64 lambda1 lambda2)))
#s(approx (* -1/2 (* lambda1 (neg (sin lambda2)))) (.f64 lambda2 (fma.f64 #s(literal -1/12 binary64) (.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) lambda1))))
#s(approx (* -1/2 (* lambda1 (neg (sin lambda2)))) (.f64 lambda2 (fma.f64 #s(literal 1/2 binary64) lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) lambda1 (.f64 #s(literal 1/240 binary64) (.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64)))))))))
#s(approx (* -1/2 (* lambda1 (neg (sin lambda2)))) (.f64 lambda2 (fma.f64 #s(literal 1/2 binary64) lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/10080 binary64) (.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64))) (*.f64 #s(literal 1/240 binary64) lambda1))))))))
#s(approx (* lambda1 (neg (sin lambda2))) (.f64 #s(literal -1 binary64) (.f64 lambda1 lambda2)))
#s(approx (* lambda1 (neg (sin lambda2))) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) lambda1 (.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64)))))))
#s(approx (* lambda1 (neg (sin lambda2))) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/120 binary64) (.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) lambda1))))))
#s(approx (* lambda1 (neg (sin lambda2))) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/120 binary64) lambda1 (.f64 #s(literal 1/5040 binary64) (*.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64)))))))))))
#s(approx (- (/ lambda1 lambda2) 1) (/.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)) lambda2))
#s(approx (* lambda1 (- (pow lambda2 -1) (pow lambda1 -1))) (/.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)) lambda2))
#s(approx (- (pow lambda2 -1) (pow lambda1 -1)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 lambda2 lambda1))) lambda2))
#s(approx (pow lambda2 -1) (/.f64 #s(literal 1 binary64) lambda2))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) (/.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)) lambda2))
#s(approx (- (pow (/ lambda1 lambda2) 3) 1) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (pow.f64 lambda2 #s(literal 3 binary64))))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) (/.f64 (fma.f64 lambda1 lambda2 (pow.f64 lambda1 #s(literal 2 binary64))) (pow.f64 lambda2 #s(literal 2 binary64))))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) (/.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (pow.f64 lambda1 #s(literal 2 binary64))) (pow.f64 lambda2 #s(literal 2 binary64))))
#s(approx (+ 1 (* (/ lambda1 lambda2) 1)) (/.f64 (+.f64 lambda1 lambda2) lambda2))
#s(approx (+ (cos lambda2) (cos phi1)) (+.f64 #s(literal 1 binary64) (cos.f64 phi1)))
#s(approx (+ (cos lambda2) (cos phi1)) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda2 #s(literal 2 binary64))))))
#s(approx (+ (cos lambda2) (cos phi1)) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 phi1) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))
#s(approx (+ (cos lambda2) (cos phi1)) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 phi1) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 lambda2 #s(literal 2 binary64))))) #s(literal 1/2 binary64))))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1)))
#s(approx (+ 1 (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (+.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 (+ 1 (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (+.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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (fma.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (fma.f64 lambda2 (fma.f64 lambda2 (fma.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 (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (.f64 lambda2 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal 1/6 binary64) (.f64 lambda2 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (sin.f64 (+.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (+.f64 (sin.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1 binary64) (.f64 lambda2 (cos.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (+.f64 (sin.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (sin.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (+.f64 (sin.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal 1/6 binary64) (.f64 lambda2 (cos.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) (+.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) (+.f64 lambda1 (fma.f64 #s(literal -1 binary64) lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 #s(literal 1 binary64) (fma.f64 lambda2 (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 #s(literal 1 binary64) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 #s(literal 1 binary64) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))) (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) (fma.f64 lambda2 (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))) (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 lambda1) (fma.f64 lambda2 (sin.f64 lambda1) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 lambda1) (fma.f64 lambda2 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (cos.f64 lambda1))) (.f64 #s(literal -1 binary64) (sin.f64 lambda1))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 lambda1) (fma.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))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 phi2) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 phi2)) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 phi2) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 phi2)))))))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 phi2) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 phi2)) (.f64 #s(literal 1/24 binary64) (cos.f64 phi2))))))))))
#s(approx (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))
#s(approx (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) (+.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 phi2)) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) (+.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 phi2))))))))
#s(approx (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) (+.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 phi2)) (*.f64 #s(literal 1/24 binary64) (cos.f64 phi2)))))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.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 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.f64 lambda2 (-.f64 (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 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi2))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 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 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.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 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.f64 lambda2 (-.f64 (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 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.f64 lambda2 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.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 (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 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.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 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi2))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (/.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 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi2))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 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 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.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 (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 (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (-.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 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.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 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (-.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 #s(literal 1 binary64) (.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 #s(literal 1 binary64) (.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 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.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 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (-.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 #s(literal 1 binary64) (.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 #s(literal 1 binary64) (.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 #s(literal 1 binary64) (.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 #s(literal 1 binary64) (.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 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.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 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.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 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.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 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (-.f64 (+.f64 #s(literal 1 binary64) (.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 (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (-.f64 (+.f64 #s(literal 1 binary64) (.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))))))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (-.f64 (+.f64 #s(literal 1 binary64) (.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))))))) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) (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 (* (cos phi2) (cos (- lambda1 lambda2))) 2) (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 (* (cos phi2) (cos (- lambda1 lambda2))) 2) (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 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.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 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.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) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 lambda2 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))) (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (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) (cos.f64 lambda1)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))) (.f64 lambda2 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (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) (cos.f64 lambda1))) (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (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) (cos.f64 lambda1)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (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) (cos.f64 lambda1)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (-.f64 (fma.f64 #s(literal -2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (sin.f64 lambda1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (-.f64 (fma.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (.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))))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (-.f64 (fma.f64 lambda2 (-.f64 (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (.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)))))) (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) (sin.f64 lambda1)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))))
#s(approx (pow (cos (- lambda1 lambda2)) 2) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))
#s(approx (pow (cos (- lambda1 lambda2)) 2) (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 (pow (cos (- lambda1 lambda2)) 2) (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 (pow (cos (- lambda1 lambda2)) 2) (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 phi1) (cos (- lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 #s(literal -1 binary64) (.f64 lambda2 (sin.f64 lambda1)))) (cos.f64 lambda1)))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda1) (.f64 #s(literal 1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)))))) (cos.f64 lambda1)))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda1) (.f64 lambda2 (-.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda2 (sin.f64 lambda1))) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))))))) (cos.f64 lambda1)))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))))) (pow.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)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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))))) (/.f64 (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)))))) (pow.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)))) #s(literal 2 binary64))) (/.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))))) (pow.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)))) #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 (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))))) (pow.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)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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))))) (/.f64 (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)))))) (pow.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)))) #s(literal 2 binary64))) (+.f64 (/.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 -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)))))) (pow.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)))) #s(literal 2 binary64))) (/.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))))) (pow.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)))) #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 (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 (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))))) (pow.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)))) #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 (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)))))) (pow.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)))) #s(literal 2 binary64))) (/.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))))) (pow.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)))) #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 (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))))) (pow.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)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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))))) (/.f64 (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 (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (/.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (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 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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 phi2) (sin.f64 lambda1)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (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 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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) (cos.f64 phi2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (/.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 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 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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 phi2) (sin.f64 lambda1)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (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 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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 phi2) (sin.f64 lambda1)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (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 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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 phi2) (sin.f64 lambda1))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (+.f64 (/.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 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 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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) (cos.f64 phi2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (/.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 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 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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 phi2) (sin.f64 lambda1)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (/.f64 (.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) (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 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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 phi2) (sin.f64 lambda1)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (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 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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) (cos.f64 phi2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (/.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 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 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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 phi2) (sin.f64 lambda1)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (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 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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 phi2) (sin.f64 lambda1)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (+.f64 #s(literal 1 binary64) (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)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (+.f64 #s(literal 1 binary64) (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))))) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (+.f64 #s(literal 1 binary64) (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))))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64))))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 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)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 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))))) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 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))))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (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 phi2) (sin.f64 lambda1))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (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 (.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) (cos.f64 phi2)))))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (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 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) (cos.f64 phi2)))))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (+.f64 #s(literal 1 binary64) (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 (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (+.f64 #s(literal 1 binary64) (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 (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (+.f64 #s(literal 1 binary64) (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 (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (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))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.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))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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))))) (/.f64 (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (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 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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)))))) (pow.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)))) #s(literal 2 binary64))) (/.f64 (.f64 (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))))) (pow.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)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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))))) (/.f64 (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.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)))) #s(literal 2 binary64))) (pow.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)))) #s(literal 3 binary64))) (+.f64 (/.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 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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)))))) (pow.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)))) #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 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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))))))) (pow.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)))) #s(literal 2 binary64))) (/.f64 (.f64 (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)))))) (pow.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)))) #s(literal 2 binary64))))))) (/.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 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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)))))) (pow.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)))) #s(literal 2 binary64))) (/.f64 (.f64 (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))))) (pow.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)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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))))) (/.f64 (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.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)))) #s(literal 2 binary64))) (pow.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)))) #s(literal 3 binary64))) (/.f64 (.f64 (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)))))) (pow.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)))) #s(literal 2 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 (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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (.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 (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))))))) (pow.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)))) #s(literal 3 binary64))) (+.f64 (/.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 -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 (-.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 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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)))))) (pow.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)))) #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 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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))))))) (pow.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)))) #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 (-.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 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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)))))) (pow.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)))) #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 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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))))))) (pow.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)))) #s(literal 2 binary64))) (/.f64 (.f64 (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)))))) (pow.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)))) #s(literal 2 binary64))))))))) (/.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)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.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)))) #s(literal 2 binary64))) (pow.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)))) #s(literal 3 binary64))) (+.f64 (/.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 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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)))))) (pow.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)))) #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 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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))))))) (pow.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)))) #s(literal 2 binary64))) (/.f64 (.f64 (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)))))) (pow.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)))) #s(literal 2 binary64))))))) (/.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 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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)))))) (pow.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)))) #s(literal 2 binary64))) (/.f64 (.f64 (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))))) (pow.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)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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))))) (/.f64 (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/.f64 (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 lambda2 (.f64 (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)))))) (pow.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)))) #s(literal 2 binary64))) (/.f64 (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.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)))) #s(literal 2 binary64))) (pow.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)))) #s(literal 3 binary64))) (/.f64 (.f64 (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)))))) (pow.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)))) #s(literal 2 binary64)))))) (/.f64 (.f64 (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))))) (pow.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)))) #s(literal 2 binary64)))) (/.f64 (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 lambda2 (-.f64 (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.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)))) #s(literal 2 binary64))) (pow.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)))) #s(literal 3 binary64))) (/.f64 (.f64 (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)))))) (pow.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)))) #s(literal 2 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 (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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (.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 (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))))))) (pow.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)))) #s(literal 3 binary64))) (/.f64 (.f64 (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)))))) (pow.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)))) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.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)))) #s(literal 2 binary64))) (pow.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)))) #s(literal 3 binary64))) (/.f64 (.f64 (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)))))) (pow.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)))) #s(literal 2 binary64)))))) (/.f64 (.f64 (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))))) (pow.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)))) #s(literal 2 binary64)))) (/.f64 (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 (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (fma.f64 lambda2 (-.f64 (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (fma.f64 lambda2 (-.f64 (fma.f64 lambda2 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.f64 (/.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 phi2) (sin.f64 lambda1))) (-.f64 (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (/.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)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (fma.f64 lambda2 (-.f64 (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.f64 lambda2 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.f64 (/.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 phi2) (sin.f64 lambda1))) (-.f64 (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (/.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)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 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 phi2) (sin.f64 lambda1)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (+.f64 (/.f64 (.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) (cos.f64 phi2)))) (-.f64 (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (/.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))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (+.f64 (/.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 phi2) (sin.f64 lambda1))) (-.f64 (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (/.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)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (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 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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)))))) (pow.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)))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (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 (-.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 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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)))))) (pow.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)))) #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 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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))))))) (pow.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)))) #s(literal 2 binary64))))) (/.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 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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)))))) (pow.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)))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (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 (-.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 (-.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 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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)))))) (pow.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)))) #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 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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))))))) (pow.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)))) #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 (-.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 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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)))))) (pow.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)))) #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 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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))))))) (pow.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)))) #s(literal 2 binary64)))))) (/.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 (-.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 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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)))))) (pow.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)))) #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 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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))))))) (pow.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)))) #s(literal 2 binary64))))) (/.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 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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)))))) (pow.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)))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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 (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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))))) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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))))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 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 (fma.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 phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos 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)))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.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 (.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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.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 (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.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)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.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 (.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)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.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)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))))
#s(approx (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.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 (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) #s(literal 1 binary64))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2)))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) (+.f64 #s(literal 1 binary64) (.f64 lambda2 (+.f64 lambda1 (.f64 #s(literal -1/2 binary64) lambda2)))))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) (+.f64 #s(literal 1 binary64) (.f64 lambda2 (+.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) (+.f64 lambda2 (/.f64 #s(literal 1 binary64) lambda1)))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) (fma.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) lambda1)))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) (fma.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 lambda2 (-.f64 (.f64 #s(literal -1/6 binary64) lambda2) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) lambda1))))) (/.f64 #s(literal 1 binary64) lambda1)))
#s(approx (/ (cos lambda2) lambda1) (/.f64 #s(literal 1 binary64) lambda1))
#s(approx (/ (cos lambda2) lambda1) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 lambda2 #s(literal 2 binary64)) lambda1) (/.f64 #s(literal 1 binary64) lambda1)))
#s(approx (/ (cos lambda2) lambda1) (fma.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 lambda2 #s(literal 2 binary64)) lambda1)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) lambda1))) (/.f64 #s(literal 1 binary64) lambda1)))
#s(approx (/ (cos lambda2) lambda1) (fma.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (/.f64 (pow.f64 lambda2 #s(literal 2 binary64)) lambda1) (.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) lambda1)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) lambda1))) (/.f64 #s(literal 1 binary64) lambda1)))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) (fma.f64 lambda1 lambda2 (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) (fma.f64 lambda2 (+.f64 lambda1 (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (.f64 lambda2 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))))) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) (fma.f64 lambda2 (+.f64 lambda1 (.f64 lambda2 (fma.f64 #s(literal -1/6 binary64) (.f64 lambda1 lambda2) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))))))) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) (/.f64 lambda2 lambda1)) #s(literal 1/2 binary64)))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (-.f64 (fma.f64 lambda2 (fma.f64 lambda2 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) lambda1)) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (-.f64 (fma.f64 lambda2 (fma.f64 lambda2 (-.f64 (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal -1/6 binary64) (/.f64 lambda2 lambda1))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) lambda1)) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) (/.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 lambda2 lambda1)) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) (-.f64 (.f64 lambda2 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 lambda2 (pow.f64 lambda1 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) lambda1))) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) (-.f64 (.f64 lambda2 (-.f64 (.f64 lambda2 (fma.f64 #s(literal 1/6 binary64) (/.f64 lambda2 lambda1) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) lambda1))) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (/.f64 #s(literal -1 binary64) lambda1))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (-.f64 (*.f64 #s(literal -1 binary64) lambda2) (/.f64 #s(literal 1 binary64) lambda1)))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (-.f64 (.f64 lambda2 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 lambda2 lambda1)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) lambda1)))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (-.f64 (.f64 lambda2 (-.f64 (.f64 lambda2 (fma.f64 #s(literal 1/6 binary64) lambda2 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) lambda1)))) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) lambda1)))
#s(approx (* -1 (/ (cos lambda2) lambda1)) (/.f64 #s(literal -1 binary64) lambda1))
#s(approx (* -1 (/ (cos lambda2) lambda1)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 lambda2 #s(literal 2 binary64)) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)))
#s(approx (* -1 (/ (cos lambda2) lambda1)) (-.f64 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) (/.f64 (pow.f64 lambda2 #s(literal 2 binary64)) lambda1) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) lambda1)))) (/.f64 #s(literal 1 binary64) lambda1)))
#s(approx (* -1 (/ (cos lambda2) lambda1)) (-.f64 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/720 binary64) (/.f64 (pow.f64 lambda2 #s(literal 2 binary64)) lambda1)) (.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) lambda1))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) lambda1)))) (/.f64 #s(literal 1 binary64) lambda1)))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (.f64 (sin.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (sin.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (.f64 (sin.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))) (.f64 (sin.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (.f64 (sin.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (sin.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (.f64 (sin.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))) (.f64 (sin.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (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))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 lambda2 (fma.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))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (+.f64 (/.f64 (.f64 lambda2 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi2))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 lambda2 (-.f64 (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda2 (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi2))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi2))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (/.f64 (.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (fma.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (fma.f64 lambda2 (-.f64 (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda2 (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos 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 (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (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 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.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 (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (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 (.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 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.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 (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (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 lambda2 (-.f64 (/.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 (.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 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.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 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (/.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 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.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 (- (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 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (fma.f64 lambda2 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))) (.f64 lambda2 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))) (/.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))) (.f64 lambda2 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))) (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))) (.f64 #s(literal -1/3 binary64) (/.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))) (/.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))))))) (/.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))))) (pow.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)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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))))) (/.f64 (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)))))) (pow.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)))) #s(literal 2 binary64))) (/.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))))) (pow.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)))) #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 (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))))) (pow.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)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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))))) (/.f64 (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)))))) (pow.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)))) #s(literal 2 binary64))) (+.f64 (/.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 -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)))))) (pow.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)))) #s(literal 2 binary64))) (/.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))))) (pow.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)))) #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 (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 (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))))) (pow.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)))) #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 (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)))))) (pow.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)))) #s(literal 2 binary64))) (/.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))))) (pow.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)))) #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 (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))))) (pow.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)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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))))) (/.f64 (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (.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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (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 (fma.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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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))))) (pow.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)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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))))) (/.f64 (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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)))))) (pow.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)))) #s(literal 2 binary64))) (/.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))))) (pow.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)))) #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 (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))))) (pow.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)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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))))) (/.f64 (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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)))))) (pow.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)))) #s(literal 2 binary64))) (+.f64 (/.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 -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)))))) (pow.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)))) #s(literal 2 binary64))) (/.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))))) (pow.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)))) #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 (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 (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))))) (pow.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)))) #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 (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)))))) (pow.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)))) #s(literal 2 binary64))) (/.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))))) (pow.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)))) #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 (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))))) (pow.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)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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))))) (/.f64 (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))) (- (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (.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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.f64 lambda2 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi2))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (+.f64 (/.f64 (.f64 (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (cos.f64 phi2)) (.f64 (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))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.f64 lambda2 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi2))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.f64 lambda2 (-.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi2))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (+.f64 (/.f64 (.f64 (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (cos.f64 phi2)) (.f64 (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))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.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))))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (fma.f64 (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))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (+.f64 (/.f64 (.f64 (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (cos.f64 phi2)) (.f64 (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))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (-.f64 (fma.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (-.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 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (-.f64 (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 lambda2 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (cos.f64 phi2)) (.f64 (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 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (-.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 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (-.f64 (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 lambda2 (-.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi2))) (.f64 lambda2 (-.f64 (.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.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))))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (fma.f64 (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))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (cos.f64 phi2)) (.f64 (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 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (-.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 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 #s(literal -1 binary64) (.f64 lambda2 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi2)))))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 lambda2 (fma.f64 #s(literal 1/6 binary64) (.f64 lambda2 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi2))))))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (fma.f64 lambda2 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (fma.f64 lambda2 (fma.f64 lambda2 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (cos.f64 phi2)) (.f64 (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 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 lambda2 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.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))))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (fma.f64 (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))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (cos.f64 phi2)) (.f64 (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 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 #s(literal -2 binary64) (.f64 lambda2 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 lambda2 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 lambda2 (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 lambda2 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.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 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (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 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 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 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (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 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.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 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 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 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (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 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.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 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (-.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 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.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 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #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 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.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 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 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 (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (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 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (.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)))))))) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (.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)))))))) (.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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.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)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (.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)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.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)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (-.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)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.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)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #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)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.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)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (.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)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (-.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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (-.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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (-.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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (-.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 (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) (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 (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) (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 (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) (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 (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) (.f64 #s(literal 2 binary64) (log.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) (fma.f64 #s(literal 2 binary64) (log.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 #s(literal 2 binary64) (/.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) (fma.f64 #s(literal 2 binary64) (log.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 lambda2 (fma.f64 #s(literal 2 binary64) (/.f64 (sin.f64 lambda1) (cos.f64 lambda1)) (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) #s(literal 1 binary64)))))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) (fma.f64 #s(literal 2 binary64) (log.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 lambda2 (fma.f64 #s(literal 2 binary64) (/.f64 (sin.f64 lambda1) (cos.f64 lambda1)) (.f64 lambda2 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (.f64 #s(literal 1/3 binary64) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 lambda1) (cos.f64 lambda1)) (fma.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))) (.f64 #s(literal 3 binary64) (/.f64 (sin.f64 lambda1) (cos.f64 lambda1)))))))) #s(literal 1 binary64)))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) (log.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) (+.f64 (log.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (/.f64 (.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) (+.f64 (log.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 lambda2 (fma.f64 #s(literal 1/2 binary64) (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) #s(literal 1 binary64))) (/.f64 (sin.f64 lambda1) (cos.f64 lambda1))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) (+.f64 (log.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal 1/6 binary64) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 lambda1) (cos.f64 lambda1)) (fma.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))) (.f64 #s(literal 3 binary64) (/.f64 (sin.f64 lambda1) (cos.f64 lambda1)))))) (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) #s(literal 1 binary64)))) (/.f64 (sin.f64 lambda1) (cos.f64 lambda1))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))) (.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 lambda2 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))) (.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 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 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64)))) (.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (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 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))) (.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.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 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64)))) (.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 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 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (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)))))) (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 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (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 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64)))) (.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (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 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.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 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (cos.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 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (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 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))) (.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (-.f64 (fma.f64 lambda2 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (-.f64 (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))) (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (-.f64 (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))) (.f64 lambda2 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))) (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (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)))))) (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 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))))))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))) (+.f64 (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.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 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (cos.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 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (-.f64 (fma.f64 #s(literal -2 binary64) (.f64 lambda2 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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)))))) (pow.f64 (cos.f64 phi1) #s(literal 6 binary64))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (-.f64 (fma.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda2 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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))))))) (pow.f64 (cos.f64 phi1) #s(literal 6 binary64))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (-.f64 (fma.f64 lambda2 (-.f64 (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda2 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (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)))))) (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 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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))))))) (pow.f64 (cos.f64 phi1) #s(literal 6 binary64))) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))
#s(approx (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))
#s(approx (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) (fma.f64 #s(literal 2 binary64) (.f64 lambda2 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))
#s(approx (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) (fma.f64 lambda2 (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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 lambda2 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64)))))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))
#s(approx (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) (fma.f64 lambda2 (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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 lambda2 (fma.f64 lambda2 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (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)))))) (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 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) (fma.f64 lambda2 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) (fma.f64 lambda2 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (fma.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 lambda2 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) (fma.f64 lambda2 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (fma.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 lambda2 (fma.f64 lambda2 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.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 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (cos.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))))))))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))))))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (fma.f64 lambda2 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (fma.f64 lambda2 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (fma.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 lambda2 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (fma.f64 lambda2 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (fma.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 lambda2 (fma.f64 lambda2 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.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 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (cos.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))))))))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))))))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (fma.f64 #s(literal 2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (fma.f64 lambda2 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 lambda2 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.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)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (fma.f64 lambda2 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 lambda2 (fma.f64 lambda2 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.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 phi1) #s(literal 2 binary64)) (.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)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))))
#s(approx (pow lambda2 3) (pow.f64 lambda2 #s(literal 3 binary64)))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (fma.f64 lambda1 lambda2 (pow.f64 lambda1 #s(literal 2 binary64))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (pow.f64 lambda1 #s(literal 2 binary64))))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) (*.f64 lambda2 (+.f64 lambda1 lambda2)))
#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 (fma.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 (fma.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 (pow.f64 lambda2 #s(literal 2 binary64)) (sin.f64 lambda1)))))
#s(approx (* (sin lambda1) (cos lambda2)) (+.f64 (sin.f64 lambda1) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (sin.f64 lambda1)))))))
#s(approx (* (sin lambda1) (cos lambda2)) (+.f64 (sin.f64 lambda1) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (sin.f64 lambda1)) (.f64 #s(literal 1/24 binary64) (sin.f64 lambda1))))))))
#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 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 lambda1))))))
#s(approx (* (cos lambda1) (sin lambda2)) (.f64 lambda2 (+.f64 (cos.f64 lambda1) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 lambda1) (.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 lambda1))))))))
#s(approx (* (cos lambda1) (sin lambda2)) (.f64 lambda2 (+.f64 (cos.f64 lambda1) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 lambda1) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 lambda1)) (*.f64 #s(literal 1/120 binary64) (cos.f64 lambda1)))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (.f64 (sin.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (fma.f64 #s(literal -1 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (sin.f64 lambda1) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (sin.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (sin.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal 1/6 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (.f64 (sin.f64 lambda1) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (.f64 (sin.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (fma.f64 #s(literal -1 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (sin.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (sin.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))) (.f64 (sin.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal 1/6 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))))) (.f64 (sin.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) (/.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))) (-.f64 (+.f64 (pow.f64 lambda1 #s(literal 2 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 2 binary64))) (.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 (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) (-.f64 (+.f64 (pow.f64 lambda1 #s(literal 2 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 2 binary64))) (.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 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) (-.f64 (pow.f64 lambda1 #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) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 2 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 2 binary64))) (-.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 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64))) (pow.f64 lambda2 #s(literal 2 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (.f64 lambda2 (-.f64 (/.f64 (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64)))) (pow.f64 lambda2 #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))) (/.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))
#s(approx (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) lambda2)
#s(approx (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) (*.f64 lambda2 (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) lambda2) (/.f64 phi2 lambda2))) (/.f64 lambda1 lambda2))))
#s(approx (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) (*.f64 #s(literal -1 binary64) lambda2))
#s(approx (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) (*.f64 lambda2 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) lambda2) (+.f64 (/.f64 lambda1 lambda2) (/.f64 phi2 lambda2))) #s(literal 1 binary64))))
#s(approx (cos lambda2) (cos.f64 lambda2))
#s(approx (neg (sin lambda2)) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2)))
#s(approx (sin lambda2) (sin.f64 lambda2))
#s(approx (* (cos phi2) (neg (sin lambda2))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 lambda2))))
#s(approx (* (cos phi2) (cos lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))
#s(approx (sin (+ lambda2 (/ (PI) 2))) (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (+ lambda2 (/ (PI) 2)) lambda2)
#s(approx (+ lambda2 (/ (PI) 2)) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) lambda2)))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))
#s(approx (* -1/2 (cos lambda2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64))) (pow.f64 lambda2 #s(literal 2 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) (.f64 lambda2 (-.f64 (/.f64 (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64)))) (pow.f64 lambda2 #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))) (/.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64))) (pow.f64 lambda2 #s(literal 2 binary64)))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2)))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) (-.f64 (/.f64 (*.f64 lambda1 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64)))) (pow.f64 lambda2 #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))) (/.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 lambda1 lambda2) (/.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))
#s(approx (* lambda2 (- (/ lambda1 lambda2) 1)) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))
#s(approx (+ (cos lambda2) (cos phi1)) (+.f64 (cos.f64 lambda2) (cos.f64 phi1)))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) lambda2))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) (*.f64 lambda2 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) lambda2) (/.f64 lambda1 lambda2)) #s(literal 1 binary64))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) (*.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (-.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) #s(literal 1 binary64))))
#s(approx (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) (*.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (-.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) #s(literal 1 binary64))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 lambda1 lambda2) (/.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) (*.f64 (pow.f64 lambda2 #s(literal 2 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))) lambda1) 1) 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))) lambda1) 1) (+.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 (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1) (/.f64 (+.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))))))) 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 (.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 lambda2))) (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (sin (- lambda1 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 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 (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (/.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))) (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 (+ (* (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 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) (+.f64 (cos.f64 phi1) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) 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 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))) lambda1))))
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) (+.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 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))) lambda1)))
#s(approx (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) (/.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 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))) lambda1))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (.f64 #s(literal -1 binary64) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (.f64 #s(literal -1 binary64) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 lambda1 #s(literal 2 binary64)) lambda2) (/.f64 (pow.f64 lambda1 #s(literal 2 binary64)) lambda2)) (.f64 #s(literal -1 binary64) lambda1)) lambda2))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (.f64 #s(literal -1 binary64) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64)))) lambda2) (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64)))) lambda2)) (.f64 #s(literal -1 binary64) lambda1)) lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (.f64 (cos.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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (*.f64 (cos.f64 phi2) (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (+.f64 (cos.f64 phi1) (.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 lambda1 (+.f64 phi2 (fma.f64 #s(literal -1 binary64) lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (sin.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (+.f64 (cos.f64 phi1) (.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 lambda1 (+.f64 phi2 (fma.f64 #s(literal -1 binary64) lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (sin.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) (+.f64 (cos.f64 phi1) (.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 lambda1 (+.f64 phi2 (fma.f64 #s(literal -1 binary64) lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (sin.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) (.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 lambda1 (+.f64 phi2 (fma.f64 #s(literal -1 binary64) lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (sin.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) (+.f64 (sin.f64 (+.f64 lambda1 (+.f64 phi2 (fma.f64 #s(literal -1 binary64) lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (sin.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1) lambda2)) #s(literal 1 binary64)))))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin.f64 (+.f64 lambda1 (+.f64 phi2 (fma.f64 #s(literal -1 binary64) lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))) lambda2))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (+.f64 (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) 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)))))) (+.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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))))))))
#s(approx (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 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) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin 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 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) (-.f64 (.f64 lambda1 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) lambda2)))) (sin.f64 lambda2)))
#s(approx (sin (+ lambda2 (/ (PI) 2))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (.f64 #s(literal -1 binary64) lambda2))))
#s(approx (+ lambda2 (/ (PI) 2)) (.f64 #s(literal -1 binary64) (.f64 lambda2 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) lambda2)) #s(literal 1 binary64)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (*.f64 (cos.f64 phi2) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.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 lambda2) 1) lambda2) (.f64 #s(literal -1 binary64) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) (.f64 #s(literal -1 binary64) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) (.f64 #s(literal -1 binary64) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64))) lambda2))) lambda2))))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) (.f64 #s(literal -1 binary64) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 lambda1 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64)))) lambda2) (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64)))) lambda2))) lambda2))))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 lambda1 #s(literal 2 binary64)) lambda2) (/.f64 (pow.f64 lambda1 #s(literal 2 binary64)) lambda2)) lambda1) lambda2)) #s(literal 1 binary64)))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 lambda1 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64)))) lambda2) (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64)))) lambda2)) lambda1) lambda2)) #s(literal 1 binary64)))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) lambda1 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 lambda1 #s(literal 2 binary64)) lambda2))) 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 (+ 1 (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (fma.f64 #s(literal -1 binary64) lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (sin.f64 (+.f64 lambda1 (fma.f64 #s(literal -1 binary64) lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) (.f64 #s(literal -1 binary64) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 #s(literal 1 binary64) (.f64 (cos.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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) (.f64 (cos.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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (-.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) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64))))
#s(approx (pow (cos (- lambda1 lambda2)) 2) (pow.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) 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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) 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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) 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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (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 (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (/.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 3 binary64)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 3 binary64)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 3 binary64))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (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 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (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 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (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))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (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 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (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 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (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 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/.f64 (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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (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 (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (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 (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 3 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 phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (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 (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 (- lambda1 lambda2)) (cos phi2)) 2) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (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) (fma.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (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) (fma.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.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 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 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 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (/.f64 (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) 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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) 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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) 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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (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 (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) 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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) 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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) 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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (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))) (- (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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (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 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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 (.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 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (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)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))) #s(literal 2 binary64))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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 (.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 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (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)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))) #s(literal 2 binary64)))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.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 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (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)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))) #s(literal 2 binary64))))
#s(approx (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (-.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 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (.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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))) #s(literal 2 binary64)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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 (+.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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) (.f64 #s(literal 2 binary64) (log.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) (log.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (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 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 6 binary64)))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 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 (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (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 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 6 binary64)))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 6 binary64)))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 6 binary64)))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 6 binary64)))))
#s(approx (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 6 binary64))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 4 binary64)))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))))))))
#s(approx (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))))))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) lambda1 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 lambda1 #s(literal 2 binary64)) lambda2))) lambda2)))))
#s(approx (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))))))))
#s(approx (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (.f64 (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))))
#s(approx (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (.f64 (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.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)))))) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.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)))))) #s(literal 2 binary64))) (.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 (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.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)))))) #s(literal 3 binary64))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow.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)))))) #s(literal 3 binary64)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) (-.f64 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.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)))))) #s(literal 2 binary64))) (.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 (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (pow.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)))))) #s(literal 2 binary64)))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) (-.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (.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))) lambda1) (.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 (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.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)))))) #s(literal 2 binary64))) (-.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 (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (-.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.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)))))) #s(literal 2 binary64))))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (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 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))))
#s(approx (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.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 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (+.f64 #s(literal 1 binary64) (.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 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 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 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (/.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 (+ (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) (pow.f64 phi1 #s(literal 2 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 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #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 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #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) (pow.f64 phi1 #s(literal 2 binary64)))))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #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) (pow.f64 phi1 #s(literal 2 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 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #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 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/2 binary64))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/2 binary64))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/2 binary64))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/2 binary64))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (* phi1 phi1) (pow.f64 phi1 #s(literal 2 binary64)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/2 binary64))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/2 binary64))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) lambda1))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) lambda1)))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))) lambda1))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))) lambda1))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/2 binary64))))))
#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) (pow.f64 phi1 #s(literal 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) (fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #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 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/2 binary64))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/2 binary64))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/2 binary64))))))
#s(approx (+ (cos lambda2) (cos phi1)) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)))
#s(approx (+ (cos lambda2) (cos phi1)) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 lambda2) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))
#s(approx (+ (cos lambda2) (cos phi1)) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 lambda2) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))
#s(approx (+ (cos lambda2) (cos phi1)) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 lambda2) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/2 binary64))))))
#s(approx (+ (cos phi1) (cos phi2)) (+.f64 #s(literal 1 binary64) (cos.f64 phi2)))
#s(approx (+ (cos phi1) (cos phi2)) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 phi2) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))
#s(approx (+ (cos phi1) (cos phi2)) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 phi2) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))
#s(approx (+ (cos phi1) (cos phi2)) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 phi2) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/2 binary64))))))
#s(approx (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (.f64 phi1 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (+ (cos (- lambda1 lambda2)) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/6 binary64) (.f64 phi1 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (.f64 phi1 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/6 binary64) (.f64 phi1 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi1)) (.f64 phi1 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi1)) (.f64 phi1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/6 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi1)) (.f64 phi1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi1)) (.f64 phi1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal 1/120 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (sin phi1) phi1)
#s(approx (sin phi1) (.f64 phi1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))
#s(approx (sin phi1) (.f64 phi1 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin phi1) (.f64 phi1 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 lambda2) (cos.f64 phi2))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 phi1 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 phi1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (.f64 phi1 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (cos.f64 lambda2) (cos.f64 phi2)))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 phi1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/6 binary64) (.f64 phi1 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (cos.f64 lambda2) (cos.f64 phi2)))))
#s(approx (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))
#s(approx (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) (fma.f64 phi1 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 lambda2) (cos.f64 phi2))))
#s(approx (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) (fma.f64 phi1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/6 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))
#s(approx (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) (fma.f64 phi1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 1/3 binary64) (/.f64 #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 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (/.f64 #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))))) (.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/720 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.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))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 #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 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (/.f64 #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))))) (.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.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))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (/.f64 #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))))) (.f64 #s(literal 2/45 binary64) (/.f64 #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 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (/.f64 #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))))) (.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.f64 #s(literal 1 binary64) (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 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/720 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 2/45 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (pow.f64 phi1 #s(literal 2 binary64)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/45 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1 binary64)))) (pow.f64 (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) (pow.f64 phi1 #s(literal 2 binary64)))))
#s(approx (pow (cos phi1) 2) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)))))
#s(approx (pow (cos phi1) 2) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/45 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1 binary64)))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (/.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 7/8 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (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)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (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) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (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)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 61/240 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (.f64 #s(literal 7/8 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (+.f64 (/.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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (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)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 phi1 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 phi1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (.f64 phi1 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 phi1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/6 binary64) (.f64 phi1 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (.f64 phi1 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/6 binary64) (.f64 phi1 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (+ 1 (* -1/2 (* phi1 phi1))) #s(literal 1 binary64))
#s(approx (+ 1 (* -1/2 (* phi1 phi1))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
#s(approx (* -1/2 (* phi1 phi1)) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 7/8 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (+.f64 (/.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 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (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))))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (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 (fma.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 7/8 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (fma.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.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 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (+.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/720 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/720 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 61/240 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.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 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (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))))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.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/3 binary64) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 7/8 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (+.f64 (/.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 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (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))))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 7/8 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (fma.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.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 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (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 (fma.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 7/8 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (fma.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.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 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 #s(literal 2/45 binary64) (.f64 #s(literal -1/720 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 61/240 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 7/8 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (fma.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.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 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (+.f64 (/.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (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))))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (+.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/720 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (+.f64 (/.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 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (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))))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.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/3 binary64) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (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))))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.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 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.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 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/24 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/720 binary64) (.f64 (pow.f64 phi1 #s(literal 2 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/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi1 #s(literal 2 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))))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/2 binary64))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 phi1 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 phi1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) phi1)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 phi1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi1 (-.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi1 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 1/2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) #s(literal 1 binary64))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (+.f64 #s(literal 1 binary64) (.f64 phi1 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (+.f64 #s(literal 1 binary64) (.f64 phi1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1/2 binary64) phi1)))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (+.f64 #s(literal 1 binary64) (.f64 phi1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi1 (-.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi1 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 1/2 binary64)))))))
#s(approx (* (cos phi1) 1) #s(literal 1 binary64))
#s(approx (* (cos phi1) 1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
#s(approx (* (cos phi1) 1) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (* (cos phi1) 1) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 #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 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (/.f64 #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))))) (.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/720 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 #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 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (/.f64 #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))))) (.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.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))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (/.f64 #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))))) (.f64 #s(literal 2/45 binary64) (/.f64 #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 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (/.f64 #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))))) (.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.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)))))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 (- (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) (pow.f64 phi1 #s(literal 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 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #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 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (/.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 7/8 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (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)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (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) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (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)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 61/240 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (.f64 #s(literal 7/8 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (+.f64 (/.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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (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)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -3/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 7/8 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 3/2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 7/8 binary64) (.f64 #s(literal -61/240 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 3/2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))))
#s(approx (exp (* (log (cos phi1)) 3)) #s(literal 1 binary64))
#s(approx (exp (* (log (cos phi1)) 3)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -3/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
#s(approx (exp (* (log (cos phi1)) 3)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 7/8 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 3/2 binary64)))))
#s(approx (exp (* (log (cos phi1)) 3)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 7/8 binary64) (*.f64 #s(literal -61/240 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 3/2 binary64)))))
#s(approx (* (log (cos phi1)) 3) (*.f64 #s(literal -3/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))
#s(approx (* (log (cos phi1)) 3) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 3/2 binary64))))
#s(approx (* (log (cos phi1)) 3) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/15 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/4 binary64))) #s(literal 3/2 binary64))))
#s(approx (* (log (cos phi1)) 3) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -17/840 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/15 binary64))) #s(literal 1/4 binary64))) #s(literal 3/2 binary64))))
#s(approx (log (cos phi1)) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))
#s(approx (log (cos phi1)) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/12 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))
#s(approx (log (cos phi1)) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/45 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/12 binary64))) #s(literal 1/2 binary64))))
#s(approx (log (cos phi1)) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -17/2520 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/45 binary64))) #s(literal 1/12 binary64))) #s(literal 1/2 binary64))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.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 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.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 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 (pow.f64 phi1 #s(literal 2 binary64)) (+.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 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.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 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.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 (pow.f64 phi1 #s(literal 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)) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.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 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi1 #s(literal 2 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))))))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -3/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 7/8 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 3/2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 7/8 binary64) (.f64 #s(literal -61/240 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 3/2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (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) (pow.f64 phi1 #s(literal 2 binary64)))))
#s(approx (pow (cos phi1) 3) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 7/8 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 3/2 binary64)))))
#s(approx (pow (cos phi1) 3) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 7/8 binary64) (*.f64 #s(literal -61/240 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 3/2 binary64)))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (/.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 7/8 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (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)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (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) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (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)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 61/240 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (.f64 #s(literal 7/8 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (+.f64 (/.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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (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)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.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 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.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 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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 2 binary64))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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 3 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.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 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 11/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (/.f64 (.f64 (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/12 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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 4 binary64)))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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 3 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.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 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/12 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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 3 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.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 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 11/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (/.f64 (.f64 (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/12 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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 4 binary64))))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/720 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal 151/720 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (.f64 #s(literal -1/360 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/24 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 4 binary64))))))))) (.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 11/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (/.f64 (.f64 (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/12 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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 4 binary64)))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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 3 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.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 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))))) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 13/24 binary64) (.f64 #s(literal 1/3 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))))) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 13/24 binary64) (fma.f64 #s(literal 1/3 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2/45 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 151/720 binary64) (.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))))))) (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))))) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (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 phi1) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 13/24 binary64) (.f64 #s(literal 1/3 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) #s(literal 1/2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 13/24 binary64) (fma.f64 #s(literal 1/3 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2/45 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 151/720 binary64))))))) #s(literal 1/2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (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 (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (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 (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (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 (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (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 (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.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 2 binary64))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/12 binary64) (-.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 2 binary64))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/12 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/360 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/24 binary64))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 #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/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 #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)))))))) (-.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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 #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/720 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 2/45 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 #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/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (pow.f64 phi1 #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal -2/45 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 phi1)))) #s(literal 1 binary64))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/45 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1 binary64)))))
#s(approx (* 1/2 (cos (* 2 phi1))) #s(literal 1/2 binary64))
#s(approx (* 1/2 (cos (* 2 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
#s(approx (* 1/2 (cos (* 2 phi1))) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)))))
#s(approx (* 1/2 (cos (* 2 phi1))) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/45 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1 binary64)))))
#s(approx (cos (* 2 phi1)) #s(literal 1 binary64))
#s(approx (cos (* 2 phi1)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
#s(approx (cos (* 2 phi1)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 2/3 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 2 binary64)))))
#s(approx (cos (* 2 phi1)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 2/3 binary64) (*.f64 #s(literal -4/45 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 2 binary64)))))
#s(approx (* 2 phi1) (*.f64 #s(literal 2 binary64) phi1))
#s(approx (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 #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/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 #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)))))))) (-.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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 #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/720 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 2/45 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 #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/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))
#s(approx (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (pow.f64 phi1 #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))
#s(approx (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))
#s(approx (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal -2/45 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/24 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (+.f64 #s(literal 5/3 binary64) (.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/24 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (+.f64 #s(literal 5/3 binary64) (.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 #s(literal 47/15 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/24 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (+.f64 #s(literal 5/3 binary64) (.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 5/3 binary64) (.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/720 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/24 binary64) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -2/45 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 34/45 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/24 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (+.f64 #s(literal 5/3 binary64) (.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (-.f64 (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))) (/.f64 (.f64 (+.f64 #s(literal 5/3 binary64) (.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (-.f64 (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (+.f64 #s(literal 5/3 binary64) (.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))) (fma.f64 #s(literal 47/15 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))) (+.f64 (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (-.f64 (.f64 #s(literal -2/45 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 34/45 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))) (/.f64 (.f64 (+.f64 #s(literal 5/3 binary64) (.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)))))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))))))) (.f64 #s(literal 4 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))) (/.f64 (.f64 (+.f64 #s(literal 5/3 binary64) (.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -3 binary64) (pow.f64 phi1 #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 4 binary64) (.f64 #s(literal -47/15 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 3 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))))
#s(approx (pow (pow (cos phi1) 2) 3) #s(literal 1 binary64))
#s(approx (pow (pow (cos phi1) 2) 3) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -3 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
#s(approx (pow (pow (cos phi1) 2) 3) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 3 binary64)))))
#s(approx (pow (pow (cos phi1) 2) 3) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 4 binary64) (*.f64 #s(literal -47/15 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 3 binary64)))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 5/3 binary64) (.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))))) #s(literal 2 binary64)) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 5/3 binary64) (fma.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2/45 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 34/45 binary64))))))) #s(literal 2 binary64)) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -2/45 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -2/45 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))
#s(approx (cos phi1) (cos.f64 phi1))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi1 #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 phi1 #s(literal 2 binary64)))) #s(literal 1/2 binary64))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))
#s(approx (+ (cos phi1) (cos phi2)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))
#s(approx (sin phi1) (sin.f64 phi1))
#s(approx (pow (cos phi1) 2) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))
#s(approx (+ 1 (* -1/2 (* phi1 phi1))) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))
#s(approx (+ 1 (* -1/2 (* phi1 phi1))) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))
#s(approx (* (cos phi1) 1) (cos.f64 phi1))
#s(approx (exp (* (log (cos phi1)) 3)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))
#s(approx (* (log (cos phi1)) 3) (*.f64 #s(literal 3 binary64) (log.f64 (cos.f64 phi1))))
#s(approx (log (cos phi1)) (log.f64 (cos.f64 phi1)))
#s(approx (pow (cos phi1) 3) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))))
#s(approx (* 1/2 (cos (* 2 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))
#s(approx (cos (* 2 phi1)) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))
#s(approx (pow (pow (cos phi1) 2) 3) (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (sin.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (cos phi2) #s(literal 1 binary64))
#s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))
#s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #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 (pow.f64 phi2 #s(literal 2 binary64)) (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 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (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 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (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 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (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 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (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 (pow.f64 phi2 #s(literal 2 binary64)) (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 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (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 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))) (.f64 #s(literal 1/24 binary64) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/6 binary64) (.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (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 (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (fma.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/6 binary64) (.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#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 (cos.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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/6 binary64) (.f64 phi2 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (+ 1 (* -1/2 (* phi2 phi2))) #s(literal 1 binary64))
#s(approx (+ 1 (* -1/2 (* phi2 phi2))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))
#s(approx (* -1/2 (* phi2 phi2)) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64))))
#s(approx (* phi2 phi2) (pow.f64 phi2 #s(literal 2 binary64)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) (+.f64 (cos.f64 phi1) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))) (.f64 #s(literal 1/24 binary64) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))) (.f64 #s(literal 1/24 binary64) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/6 binary64) (.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (fma.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/6 binary64) (.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (sin (+ phi2 (/ (PI) 2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (sin (+ phi2 (/ (PI) 2))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (sin (+ phi2 (/ (PI) 2))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (.f64 phi2 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (sin (+ phi2 (/ (PI) 2))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/6 binary64) (.f64 phi2 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (+ phi2 (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (+ phi2 (/ (PI) 2)) (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) (+.f64 (cos.f64 phi1) (.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) (+.f64 (cos.f64 phi1) (fma.f64 #s(literal 1/2 binary64) (.f64 phi2 (+.f64 (cos.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (cos.f64 (-.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))) (.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) (+.f64 (cos.f64 phi1) (fma.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))) (.f64 phi2 (fma.f64 #s(literal 1/2 binary64) (.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (cos.f64 (-.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) (+.f64 (cos.f64 phi1) (fma.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))) (.f64 phi2 (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (cos.f64 (-.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))) (.f64 phi2 (fma.f64 #s(literal 1/2 binary64) (.f64 phi2 (fma.f64 #s(literal -1/6 binary64) (cos.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (.f64 #s(literal -1/6 binary64) (cos.f64 (-.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))))))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) (.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) (fma.f64 #s(literal 1/2 binary64) (.f64 phi2 (+.f64 (cos.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (cos.f64 (-.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))) (.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) (fma.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))) (.f64 phi2 (fma.f64 #s(literal 1/2 binary64) (.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (cos.f64 (-.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) (fma.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))) (.f64 phi2 (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (cos.f64 (-.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))) (.f64 phi2 (fma.f64 #s(literal 1/2 binary64) (.f64 phi2 (fma.f64 #s(literal -1/6 binary64) (cos.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (.f64 #s(literal -1/6 binary64) (cos.f64 (-.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))))))))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (+.f64 (sin.f64 (-.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (.f64 phi2 (+.f64 (cos.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (cos.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (+.f64 (sin.f64 (-.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (.f64 phi2 (+.f64 (cos.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (+.f64 (cos.f64 (-.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))))))))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (+.f64 (sin.f64 (-.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (.f64 phi2 (+.f64 (cos.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (+.f64 (cos.f64 (-.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (.f64 phi2 (fma.f64 #s(literal -1/6 binary64) (cos.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (.f64 #s(literal -1/6 binary64) (cos.f64 (-.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))))))))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (+.f64 (sin.f64 (-.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (.f64 phi2 (cos.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (+.f64 (sin.f64 (-.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (.f64 phi2 (+.f64 (cos.f64 (-.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (.f64 #s(literal -1/2 binary64) (.f64 phi2 (sin.f64 (-.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (+.f64 (sin.f64 (-.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (.f64 phi2 (+.f64 (cos.f64 (-.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (.f64 #s(literal -1/6 binary64) (.f64 phi2 (cos.f64 (-.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))))))
#s(approx (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin.f64 (-.f64 (+.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (.f64 phi2 (cos.f64 (-.f64 (+.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)))))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (.f64 phi2 (+.f64 (cos.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 phi2 (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2))))))))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (.f64 phi2 (+.f64 (cos.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (.f64 #s(literal -1/6 binary64) (.f64 phi2 (cos.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2))))))))))
#s(approx (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) (-.f64 (+.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (* (* phi2 phi2) -1/2) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64))))
#s(approx (+ (* (* phi2 phi2) -1/2) 1) #s(literal 1 binary64))
#s(approx (+ (* (* phi2 phi2) -1/2) 1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))
#s(approx (* (* phi2 phi2) (- (pow phi2 -2) 1/2)) #s(literal 1 binary64))
#s(approx (* (* phi2 phi2) (- (pow phi2 -2) 1/2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))
#s(approx (- (pow phi2 -2) 1/2) (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))))
#s(approx (- (pow phi2 -2) 1/2) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))) (pow.f64 phi2 #s(literal 2 binary64))))
#s(approx (pow phi2 -2) (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))))
#s(approx (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) #s(literal 1 binary64))
#s(approx (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))
#s(approx (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2)) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64))))
#s(approx (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64))))
#s(approx (- (* 1/24 (* phi2 phi2)) 1/2) #s(literal -1/2 binary64))
#s(approx (- (* 1/24 (* phi2 phi2)) 1/2) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))
#s(approx (* 1/24 (* phi2 phi2)) (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- 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 (- lambda1 lambda2))) (fma.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (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 (- lambda1 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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (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 (- lambda1 lambda2))) (fma.f64 phi2 (fma.f64 phi2 (fma.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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda1 lambda2)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) (+.f64 (cos.f64 lambda2) (fma.f64 lambda1 (sin.f64 lambda2) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 lambda2))))))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) (+.f64 (cos.f64 lambda2) (fma.f64 lambda1 (sin.f64 lambda2) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (fma.f64 #s(literal -1/2 binary64) (.f64 lambda1 (sin.f64 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/24 binary64) (cos.f64 lambda2) (.f64 #s(literal 1/24 binary64) (*.f64 lambda1 (sin.f64 lambda2)))))))))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) (+.f64 (cos.f64 lambda2) (fma.f64 lambda1 (sin.f64 lambda2) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (fma.f64 #s(literal -1/2 binary64) (.f64 lambda1 (sin.f64 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/24 binary64) (cos.f64 lambda2) (fma.f64 #s(literal 1/24 binary64) (.f64 lambda1 (sin.f64 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (cos.f64 lambda2) (.f64 #s(literal -1/720 binary64) (*.f64 lambda1 (sin.f64 lambda2))))))))))))))
#s(approx (* lambda1 (* (cos phi2) (neg (sin lambda2)))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 lambda2))))
#s(approx (* lambda1 (* (cos phi2) (neg (sin lambda2)))) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 lambda2)) (.f64 #s(literal 1/2 binary64) (.f64 lambda1 (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 lambda2))))))
#s(approx (* lambda1 (* (cos phi2) (neg (sin lambda2)))) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) (.f64 lambda1 (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 lambda2))) (.f64 #s(literal 1/2 binary64) (.f64 lambda1 (sin.f64 lambda2)))))))
#s(approx (* lambda1 (* (cos phi2) (neg (sin lambda2)))) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (.f64 lambda1 (sin.f64 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) (.f64 lambda1 (sin.f64 lambda2)) (.f64 #s(literal 1/720 binary64) (.f64 lambda1 (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 lambda2))))))))))
#s(approx (* (cos phi2) (neg (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2)))
#s(approx (* (cos phi2) (neg (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 lambda2)))))
#s(approx (* (cos phi2) (neg (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 lambda2)) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2))))))
#s(approx (* (cos phi2) (neg (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) (sin.f64 lambda2) (.f64 #s(literal 1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 lambda2)))))))))
#s(approx (* (cos phi2) (cos lambda2)) (cos.f64 lambda2))
#s(approx (* (cos phi2) (cos lambda2)) (+.f64 (cos.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda2)))))
#s(approx (* (cos phi2) (cos lambda2)) (+.f64 (cos.f64 lambda2) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda2)))))))
#s(approx (* (cos phi2) (cos lambda2)) (+.f64 (cos.f64 lambda2) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda2)) (.f64 #s(literal 1/24 binary64) (cos.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) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 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) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (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 (pow.f64 phi2 #s(literal 2 binary64)) (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 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (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) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
#s(approx (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 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 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 (pow.f64 phi2 #s(literal 2 binary64)) (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 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 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 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (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) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))) (.f64 #s(literal 1/24 binary64) (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda2) (cos.f64 phi1)))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda2) (+.f64 (cos.f64 phi1) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda2))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda2) (+.f64 (cos.f64 phi1) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda2))))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda2) (+.f64 (cos.f64 phi1) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda2)) (.f64 #s(literal 1/24 binary64) (cos.f64 lambda2)))))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1)))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi1) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda1))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi1) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda1))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi1) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda1)) (.f64 #s(literal 1/24 binary64) (cos.f64 lambda1)))))))))
#s(approx (+ (cos phi1) (cos phi2)) (+.f64 #s(literal 1 binary64) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (cos phi2)) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))
#s(approx (+ (cos phi1) (cos phi2)) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 phi1) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))
#s(approx (+ (cos phi1) (cos phi2)) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 phi1) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1/2 binary64))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))) (.f64 #s(literal 1/24 binary64) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (+.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)))))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2))) (.f64 #s(literal 1/24 binary64) (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2))))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 #s(literal 1 binary64) (fma.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 #s(literal 1 binary64) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 #s(literal 1 binary64) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/6 binary64) (.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.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)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) (fma.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.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)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.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)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/6 binary64) (.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (.f64 phi2 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/6 binary64) (.f64 phi2 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi2)) (.f64 phi2 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi2)) (.f64 phi2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/6 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi2)) (.f64 phi2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi2)) (.f64 phi2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal 1/120 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (sin phi2) phi2)
#s(approx (sin phi2) (.f64 phi2 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))
#s(approx (sin phi2) (.f64 phi2 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin phi2) (.f64 phi2 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 lambda2) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 lambda2) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda2)) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 lambda2) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda2)))))))))
#s(approx (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 lambda2) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda2)) (.f64 #s(literal 1/24 binary64) (cos.f64 lambda2))))))))))
#s(approx (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) (+.f64 (cos.f64 lambda2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))
#s(approx (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) (+.f64 (cos.f64 lambda2) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda2)) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) (+.f64 (cos.f64 lambda2) (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda2))))))))
#s(approx (+ (* (cos phi2) (cos lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) (+.f64 (cos.f64 lambda2) (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda2)) (*.f64 #s(literal 1/24 binary64) (cos.f64 lambda2)))))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -2/45 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))))))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 2/45 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/3 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 2/45 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -2/45 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/24 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (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 (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (/.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -61/240 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/720 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (+.f64 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -61/240 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/720 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))))) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -3/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 #s(literal 7/8 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -61/240 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (*.f64 #s(literal 7/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3) (fma.f64 #s(literal -3/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 #s(literal 7/8 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -61/240 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (*.f64 #s(literal 7/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/720 binary64) (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)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -2/45 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -61/240 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/720 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/720 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/720 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/24 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/720 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -2/45 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal 1/24 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -61/240 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/720 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (fma.f64 #s(literal -3/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 #s(literal 7/8 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -61/240 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (*.f64 #s(literal 7/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))
#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 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.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))))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.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))))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.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 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.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))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -2/45 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 (-.f64 lambda1 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))) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 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))))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 phi2 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal -1/6 binary64) (.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 phi2 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal -1/6 binary64) (.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) #s(literal 1 binary64))
#s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (+.f64 #s(literal 1 binary64) (.f64 phi2 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (+.f64 #s(literal 1 binary64) (.f64 phi2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1/2 binary64) phi2)))))
#s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (+.f64 #s(literal 1 binary64) (.f64 phi2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi2 (-.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 1/2 binary64)))))))
#s(approx (* (cos phi2) 1) #s(literal 1 binary64))
#s(approx (* (cos phi2) 1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))
#s(approx (* (cos phi2) 1) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (* (cos phi2) 1) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (.f64 #s(literal -1/24 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (.f64 #s(literal -1/24 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (.f64 #s(literal -1/24 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2/45 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.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 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (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 (pow.f64 phi2 #s(literal 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 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/24 binary64) (.f64 (pow.f64 phi2 #s(literal 2 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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (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 (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (/.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -61/240 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/720 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (+.f64 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (fma.f64 #s(literal -3/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 #s(literal 7/8 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -61/240 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (*.f64 #s(literal 7/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.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))))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.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))))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #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 (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 (pow.f64 phi2 #s(literal 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 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/24 binary64) (.f64 (pow.f64 phi2 #s(literal 2 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 (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 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))))) (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 (pow.f64 phi2 #s(literal 2 binary64)) (.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 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (*.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 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 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))))))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (fma.f64 #s(literal -3/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 #s(literal 7/8 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -61/240 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (*.f64 #s(literal 7/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (/.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -61/240 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/720 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (+.f64 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.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))))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.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))))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (.f64 (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/720 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -2/45 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (.f64 (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64))))))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))))))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 #s(literal -1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 1/360 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (.f64 (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/24 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/24 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/720 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -2/45 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/720 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (*.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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))) (*.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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) (*.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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -2/45 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/720 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))))))))))) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 1/360 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 2/45 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.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 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/3 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 2/45 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 2/45 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.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)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.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)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/3 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 2/45 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -2/45 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) (*.f64 #s(literal 2 binary64) (log.f64 (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) (fma.f64 #s(literal -1 binary64) (pow.f64 phi2 #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (log.f64 (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) (fma.f64 #s(literal 2 binary64) (log.f64 (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1 binary64)))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) (fma.f64 #s(literal 2 binary64) (log.f64 (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -2/45 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64)))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) (log.f64 (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) (+.f64 (log.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) (+.f64 (log.f64 (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/12 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) (+.f64 (log.f64 (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/45 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/12 binary64))) #s(literal 1/2 binary64)))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))) (*.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (*.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 47/15 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/720 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -34/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -2/45 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (*.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 (.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))))
#s(approx (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 47/15 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 (.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -34/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -2/45 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 (.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (-.f64 (fma.f64 #s(literal 3 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 6 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (*.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (pow.f64 (cos.f64 phi1) #s(literal 6 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))
#s(approx (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 47/15 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (pow.f64 (cos.f64 phi1) #s(literal 6 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))
#s(approx (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))
#s(approx (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))
#s(approx (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))
#s(approx (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -47/15 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))) (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))))
#s(approx (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (fma.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -34/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -2/45 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))))))))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))
#s(approx (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (fma.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -34/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -2/45 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))))))))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))
#s(approx (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -2/45 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 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 (pow.f64 phi2 #s(literal 2 binary64)) (-.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 (pow.f64 phi2 #s(literal 2 binary64)) (fma.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 (pow.f64 phi2 #s(literal 2 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) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (-.f64 (fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 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 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2))))))))) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (fma.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (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 (/ (PI) 2))) (sin (- lambda1 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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (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 (/ (PI) 2))) (sin (- lambda1 lambda2))) (fma.f64 phi2 (fma.f64 phi2 (fma.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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (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) 1)) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 phi2 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 (sin.f64 (-.f64 lambda1 lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal -1/6 binary64) (.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (cos phi2) (cos.f64 phi2))
#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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))
#s(approx (+ 1 (* -1/2 (* phi2 phi2))) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64))))
#s(approx (+ 1 (* -1/2 (* phi2 phi2))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64))))
#s(approx (sin (+ phi2 (/ (PI) 2))) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (+ phi2 (/ (PI) 2)) phi2)
#s(approx (+ phi2 (/ (PI) 2)) (.f64 phi2 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) phi2)))))
#s(approx (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) phi2)
#s(approx (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) (*.f64 phi2 (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) phi2) (/.f64 lambda2 phi2))) (/.f64 lambda1 phi2))))
#s(approx (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) phi2)
#s(approx (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) (*.f64 phi2 (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) phi2) (/.f64 lambda1 phi2))) (/.f64 lambda2 phi2))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (/.f64 (sin.f64 (-.f64 lambda1 lambda2)) (pow.f64 phi2 #s(literal 2 binary64))))))
#s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64))))
#s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64))))
#s(approx (* (* phi2 phi2) (- (pow phi2 -2) 1/2)) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64))))
#s(approx (* (* phi2 phi2) (- (pow phi2 -2) 1/2)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64))))
#s(approx (- (pow phi2 -2) 1/2) #s(literal -1/2 binary64))
#s(approx (- (pow phi2 -2) 1/2) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))
#s(approx (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 4 binary64))))
#s(approx (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) (.f64 (pow.f64 phi2 #s(literal 4 binary64)) (-.f64 #s(literal 1/24 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))))
#s(approx (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) (.f64 (pow.f64 phi2 #s(literal 4 binary64)) (-.f64 (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))))
#s(approx (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2)) (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 4 binary64))))
#s(approx (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2)) (.f64 (pow.f64 phi2 #s(literal 4 binary64)) (-.f64 #s(literal 1/24 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))))
#s(approx (- (* 1/24 (* phi2 phi2)) 1/2) (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))))
#s(approx (- (* 1/24 (* phi2 phi2)) 1/2) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 #s(literal 1/24 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))))
#s(approx (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))
#s(approx (sin phi2) (sin.f64 phi2))
#s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))
#s(approx (* (cos phi2) 1) (cos.f64 phi2))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (.f64 #s(literal -1 binary64) phi2))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (.f64 #s(literal -1 binary64) phi2)))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) phi2))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) phi2)))))
#s(approx (sin (+ phi2 (/ (PI) 2))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (.f64 #s(literal -1 binary64) phi2))))
#s(approx (+ phi2 (/ (PI) 2)) (.f64 #s(literal -1 binary64) (.f64 phi2 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) phi2)) #s(literal 1 binary64)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 lambda2 (.f64 #s(literal -1 binary64) phi2)))) (sin.f64 (-.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 lambda1 (.f64 #s(literal -1 binary64) phi2))))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 lambda2 (.f64 #s(literal -1 binary64) phi2)))) (sin.f64 (-.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 lambda1 (.f64 #s(literal -1 binary64) phi2)))))))))
#s(approx (+ (cos phi1) (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2)) (+.f64 (cos.f64 phi1) (.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 lambda2 (.f64 #s(literal -1 binary64) phi2)))) (sin.f64 (-.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 lambda1 (*.f64 #s(literal -1 binary64) phi2))))))))
#s(approx (/ (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) 2) (.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 lambda2 (.f64 #s(literal -1 binary64) phi2)))) (sin.f64 (-.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 lambda1 (*.f64 #s(literal -1 binary64) phi2)))))))
#s(approx (+ (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)))) (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 lambda2 (.f64 #s(literal -1 binary64) phi2)))) (sin.f64 (-.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 lambda1 (.f64 #s(literal -1 binary64) phi2))))))
#s(approx (sin (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin.f64 (-.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 lambda1 (.f64 #s(literal -1 binary64) phi2)))))
#s(approx (- (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) (.f64 #s(literal -1 binary64) (.f64 phi2 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1) phi2)) #s(literal 1 binary64)))))
#s(approx (sin (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2))) (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 lambda2 (.f64 #s(literal -1 binary64) phi2)))))
#s(approx (+ (+ phi2 (/ (PI) 2)) (- lambda1 lambda2)) (.f64 #s(literal -1 binary64) (.f64 phi2 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2) phi2)) #s(literal 1 binary64)))))
#s(approx (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (.f64 #s(literal -1 binary64) phi2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (.f64 #s(literal -1 binary64) phi2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) phi2)))))

eval2.4s (7.6%)

Memory: 125.8MiB live, 6 036.2MiB allocated; 497ms collecting garbage
Compiler: Compiled 977 137 to 49 599 computations (94.9% saved)

prune701.0ms (2.3%)

Memory

8.3MiB live, 1 786.3MiB allocated; 205ms collecting garbage

Pruning

108 alts after pruning (103 fresh and 5 done)

	Pruned	Kept	Total
New	13 261	103	13 364
Fresh	0	0	0
Picked	78	4	82
Done	0	1	1
Total	13 339	108	13 447

Accuracy

100.0%

Counts

13 447 → 108

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	50.1%	(/.f64 (-.f64 (.f64 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 2 binary64))) (-.f64 lambda1 (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(literal 1 binary64)) (cos.f64 phi1)))))
▶	46.9%	(/.f64 (-.f64 (.f64 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 2 binary64))) #s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) lambda1))))))
▶	49.8%	(/.f64 (+.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)) (pow.f64 lambda1 #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(literal 1 binary64)) (cos.f64 phi1))) lambda1))))
▶	54.0%	(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 #s(approx (+ phi2 (/ (PI) 2)) phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	81.5%	(+.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) #s(approx ( (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
▶	78.2%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.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))))))))
▶	17.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.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)))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
▶	14.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.f64 #s(approx (- (pow lambda1 3) (pow lambda2 3)) (.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64)))) (fma.f64 lambda1 lambda1 (fma.f64 lambda2 lambda2 (.f64 lambda1 lambda2)))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	40.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)) (exp.f64 (.f64 (log.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2))))))
▶	70.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)))) #s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))
▶	79.3%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 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 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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)))))))))
▶	56.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (exp.f64 (.f64 (log.f64 (cos.f64 phi1)) #s(literal 3 binary64)))) (+.f64 (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)) (.f64 (.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))))
▶	72.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)) #s(approx (- (cos phi1) ( (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) #s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))
▶	68.7%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (/ (pow (cos phi1) 2) (- (cos phi1) ( (cos (- lambda1 lambda2)) (cos phi2)))) (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 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) #s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
▶	73.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1 binary64) (/.f64 #s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))))))
▶	64.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (.f64 lambda1 lambda1) #s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))))
▶	98.3%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 #s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) (/.f64 (cos.f64 lambda2) lambda1)))))))))
▶	69.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (+.f64 #s(literal 1 binary64) (.f64 lambda2 (+.f64 lambda1 (.f64 #s(literal -1/2 binary64) lambda2))))))))))
▶	59.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 (sin.f64 lambda2))))))))
▶	80.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
▶	77.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(approx (/ (pow (cos phi1) 3) (+ ( (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (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 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) #s(approx (+ ( (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
▶	68.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(approx (* (cos phi2) (cos lambda2)) (cos.f64 phi2))))))
▶	67.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(approx (* (cos phi2) (cos lambda2)) (cos.f64 lambda2))))))
▶	69.3%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow ( (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
▶	72.7%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (/ (- (+ 1/2 ( 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
▶	68.5%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (/ (- ( (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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 2 binary64))))))
▶	67.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (/ (+ (pow ( (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) #s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))))
▶	58.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) ( (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 #s(approx (- lambda1 lambda2) lambda1))))))))
▶	80.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (+ ( (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))))
▶	77.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))))
▶	69.7%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 #s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2))) (cos.f64 phi2) #s(literal 1 binary64)))))
▶	58.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 #s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
▶	64.3%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (+.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)))))))
▶	64.2%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 #s(approx (- lambda1 lambda2) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 lambda2 lambda1)))))))))))
▶	63.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))))
✓	78.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
▶	70.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) #s(approx (cos phi2) #s(literal 1 binary64)))))))
✓	63.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
▶	62.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
▶	61.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 (/.f64 (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2) #s(approx (+ 1 (* (/ lambda1 lambda2) 1)) (.f64 lambda1 (+.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda2)))))) lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	54.5%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 #s(approx (- (/ lambda1 lambda2) 1) (.f64 lambda1 #s(approx (- (pow lambda2 -1) (pow lambda1 -1)) (/.f64 #s(literal 1 binary64) lambda2)))) lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	69.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
▶	63.2%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #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))))) (cos.f64 phi2) (cos.f64 phi1)))))
▶	63.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #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))))) (cos.f64 phi2) (cos.f64 phi1)))))
▶	63.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1)))) (cos.f64 phi2) (cos.f64 phi1)))))
▶	81.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 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))))))))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) #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)))))))
▶	81.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 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))))))))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
▶	77.7%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 (cos.f64 lambda2))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2) #s(literal 1 binary64)))))
▶	98.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 #s(approx (+ (cos lambda2) ( -1/2 (* lambda1 (neg (sin lambda2))))) (.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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)))))))
▶	77.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) #s(approx (* lambda1 (cos 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)))))
✓	87.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (neg.f64 (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
✓	87.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
▶	71.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))) (cos.f64 phi2) #s(literal 1 binary64)))))
▶	71.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))))))
▶	73.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 lambda2) (pow.f64 lambda1 #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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)))))))
▶	77.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (-.f64 (.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
▶	66.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (+.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 #s(literal 1/6 binary64) lambda2))) #s(literal 1 binary64))))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
▶	77.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (sin.f64 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
▶	81.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) #s(approx ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))))))
▶	81.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
▶	81.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 lambda1 (-.f64 (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 (neg.f64 lambda2))))))))))
▶	81.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2))))))))))
▶	80.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 #s(approx (cos lambda2) #s(literal 1 binary64)) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	67.7%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2)))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
▶	74.3%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2)))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda2) (cos.f64 phi1))))))
▶	62.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (cos lambda2) lambda1) (neg (sin lambda2))) lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 #s(approx (- lambda1 lambda2) lambda1))))))
▶	59.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (cos lambda2) lambda1) (neg (sin lambda2))) lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	65.0%	(+.f64 lambda1 (atan2.f64 (.f64 #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))))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(approx ( (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	77.5%	(+.f64 lambda1 (atan2.f64 (.f64 #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)))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))))
▶	59.2%	(+.f64 lambda1 (atan2.f64 (.f64 #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)))) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	77.4%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))))
▶	64.8%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
▶	49.6%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) #s(approx (+ ( (* phi2 phi2) -1/2) 1) (.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64))))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	51.1%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	79.9%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
▶	71.9%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) ( (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
▶	63.4%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2) #s(literal 1 binary64)))))
▶	70.2%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
▶	59.4%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (cos lambda2) lambda1) (neg (sin lambda2))) lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	72.2%	(+.f64 lambda1 (atan2.f64 #s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (+.f64 (cos.f64 phi1) #s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	77.5%	(+.f64 lambda1 (atan2.f64 #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)))) (+.f64 (cos.f64 phi1) (.f64 #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 (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))))
▶	57.7%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (sin.f64 #s(approx (+ phi2 (/ (PI) 2)) phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	78.9%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #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 (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))))
▶	69.8%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
▶	69.3%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) lambda1))))))
▶	79.7%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))))
▶	66.4%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))))
▶	62.9%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))))
▶	66.8%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))))
▶	56.8%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) #s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))))
▶	66.8%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
▶	55.3%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))))
▶	66.5%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
▶	70.4%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	58.9%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1))))))
▶	59.1%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	79.7%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (.f64 lambda1 (cos.f64 (neg.f64 lambda2)))))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	73.1%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2)))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	40.5%	#s(approx (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	40.5%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
▶	40.5%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
▶	80.8%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) lambda1) #s(literal 1 binary64)) lambda1))
▶	68.9%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))) lambda1) #s(literal 1 binary64)) lambda1))
▶	63.4%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (fma.f64 (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1))
▶	79.8%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (+.f64 (/.f64 (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(literal 1 binary64)) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1))
▶	70.3%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (+.f64 (/.f64 (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1))
▶	77.6%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 #s(approx (+ (/ (atan2 ( (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/.f64 (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) lambda1)) lambda1))
✓	52.3%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)

Compiler

Compiled 6 046 to 3 612 computations (40.3% saved)

series2.4s (7.6%)

Memory

91.0MiB live, 5 808.3MiB allocated; 405ms collecting garbage

Counts

787 → 3 504

Calls

Call 1

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

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 (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) 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))) lambda1) 1) 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))) lambda1) 1) #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))) lambda1) 1) #s(hole binary64 (/ (+ 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)))))) lambda1) #s(hole binary64 (/ (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)))))) lambda1) #s(hole binary64 (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)))
#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 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos phi2) (cos (neg lambda2))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* 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 (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) #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))) #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 (+ (* (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 (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) lambda1) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) lambda1) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) #s(hole binary64 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))) lambda1)))
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) #s(hole binary64 (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))) lambda1)))
#s(approx (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) #s(hole binary64 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))) lambda1)))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (* -1 lambda2))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (* -1 lambda2))))) (* (cos phi2) (cos (* -1 lambda2)))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (* -1 lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (* -1 lambda2))))))) (* (cos phi2) (cos (* -1 lambda2)))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (* -1 lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (* -1 lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (* -1 lambda2))))))))) (* (cos phi2) (cos (* -1 lambda2)))))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (cos (* -1 lambda2))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (cos (* -1 lambda2)) (* -1 (* lambda1 (sin (* -1 lambda2)))))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (cos (* -1 lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (* -1 lambda2)))) (sin (* -1 lambda2)))))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (cos (* -1 lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (* -1 lambda2))) (* 1/6 (* lambda1 (sin (* -1 lambda2)))))) (sin (* -1 lambda2)))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* -1 lambda2)))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos phi1) (cos (neg lambda2)))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos phi1) (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos phi1) (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos phi1) (+ (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) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ (cos phi1) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ (cos phi1) (+ (* -1 (* lambda1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* 1/6 (* lambda1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))))) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (* -1 (* lambda1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* 1/6 (* lambda1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))))) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi1) (+ (* (cos phi2) (cos (neg lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (+ (* (cos phi2) (cos (neg lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin 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))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin 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))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (* (cos phi2) (cos (neg lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (+ (* (cos phi2) (cos (neg lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* (cos phi2) (cos (neg lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) #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))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (* lambda1 (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/6 (* lambda1 (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* -1 (* 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))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/2 (* 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))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* 1/6 (* 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))))))))
#s(approx (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) #s(hole binary64 (sin (neg lambda2))))
#s(approx (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))))
#s(approx (* lambda1 (cos (neg lambda2))) #s(hole binary64 (* lambda1 (cos (neg lambda2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (* -1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (* -1 lambda2))))) (* (cos phi2) (cos (* -1 lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (* -1 lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (* -1 lambda2))))))) (* (cos phi2) (cos (* -1 lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (* -1 lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (* -1 lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (* -1 lambda2))))))))) (* (cos phi2) (cos (* -1 lambda2)))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (cos (* -1 lambda2)))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi2) (sin (* -1 lambda2))))) (* (cos phi2) (cos (* -1 lambda2))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (* -1 lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (* -1 lambda2))))))) (* (cos phi2) (cos (* -1 lambda2))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (* -1 lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (* -1 lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (* -1 lambda2))))))))) (* (cos phi2) (cos (* -1 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 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* -1 (* lambda1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* 1/6 (* lambda1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) #s(hole binary64 (+ 1 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) #s(hole binary64 (+ 1 (+ (* -1 (* lambda1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) #s(hole binary64 (+ 1 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) #s(hole binary64 (+ 1 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* 1/6 (* lambda1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (+ (* -1 (* lambda1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* 1/6 (* lambda1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (+ (* 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 (+ 1 (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (cos (neg lambda2)))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1/2 (pow phi1 2)) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1/2 (pow phi1 2)) (+ (* 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 (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) #s(hole binary64 (cos (neg lambda2))))
#s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) #s(hole binary64 (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))))
#s(approx (* -1 (* lambda1 (sin (neg lambda2)))) #s(hole binary64 (* -1 (* lambda1 (sin (neg lambda2))))))
#s(approx (* lambda1 (sin (neg lambda2))) #s(hole binary64 (* lambda1 (sin (neg lambda2)))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* 1/6 (* lambda1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (sin (+ phi2 (* 1/2 (PI))))))
#s(approx (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (* -1/2 (* (pow lambda1 2) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (* (pow lambda1 2) (+ (* -1/2 (sin (+ phi2 (* 1/2 (PI))))) (* 1/24 (* (pow lambda1 2) (sin (+ phi2 (* 1/2 (PI)))))))))))
#s(approx (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (* (pow lambda1 2) (+ (* -1/2 (sin (+ phi2 (* 1/2 (PI))))) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (sin (+ phi2 (* 1/2 (PI)))))) (* 1/24 (sin (+ phi2 (* 1/2 (PI))))))))))))
#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 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (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)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* 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)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/2 (* 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)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* 1/6 (* 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)))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (neg lambda2)) (* -1/2 (* (pow phi2 2) (sin (neg lambda2)))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (neg lambda2)) (+ (* -1/2 (* (pow phi2 2) (sin (neg lambda2)))) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* (pow phi2 2) (cos (neg lambda2))))))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (neg lambda2)) (+ (* -1/2 (* (pow phi2 2) (sin (neg lambda2)))) (* lambda1 (+ (cos (neg lambda2)) (+ (* -1/2 (* (pow phi2 2) (cos (neg lambda2)))) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* 1/4 (* (pow phi2 2) (sin (neg lambda2)))))))))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (neg lambda2)) (+ (* -1/2 (* (pow phi2 2) (sin (neg lambda2)))) (* lambda1 (+ (cos (neg lambda2)) (+ (* -1/2 (* (pow phi2 2) (cos (neg lambda2)))) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (+ (* 1/4 (* (pow phi2 2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/6 (cos (neg lambda2))) (* 1/12 (* (pow phi2 2) (cos (neg lambda2))))))))))))))))
#s(approx (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (sin (+ phi2 (* 1/2 (PI)))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (sin (+ phi2 (* 1/2 (PI)))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (sin (+ phi2 (* 1/2 (PI)))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/6 (* lambda1 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (- (* lambda1 (cos lambda2)) (sin lambda2))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (sin (- (* 1/2 (PI)) lambda2))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda1 (* (cos phi2) (cos (- (* 1/2 (PI)) lambda2)))) (* (cos phi2) (sin (- (* 1/2 (PI)) lambda2)))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (- (* 1/2 (PI)) lambda2))))) (* (cos phi2) (cos (- (* 1/2 (PI)) lambda2))))) (* (cos phi2) (sin (- (* 1/2 (PI)) lambda2)))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (- (* 1/2 (PI)) lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (- (* 1/2 (PI)) lambda2))))))) (* (cos phi2) (cos (- (* 1/2 (PI)) lambda2))))) (* (cos phi2) (sin (- (* 1/2 (PI)) lambda2)))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) lambda2))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) lambda2)) (* lambda1 (cos (- (* 1/2 (PI)) lambda2))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) lambda2)) (* lambda1 (+ (cos (- (* 1/2 (PI)) lambda2)) (* -1/2 (* lambda1 (sin (- (* 1/2 (PI)) lambda2)))))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) lambda2)) (* lambda1 (+ (cos (- (* 1/2 (PI)) lambda2)) (* lambda1 (+ (* -1/2 (sin (- (* 1/2 (PI)) lambda2))) (* -1/6 (* lambda1 (cos (- (* 1/2 (PI)) lambda2)))))))))))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) #s(hole binary64 (- (* 1/2 (PI)) lambda2)))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) #s(hole binary64 (- (+ lambda1 (* 1/2 (PI))) lambda2)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (/ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (/ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (/ (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda1 (- (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* lambda1 (- (+ (* 1/2 (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (+ (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* lambda1 (- (+ (* 1/2 (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* lambda1 (- (+ (* -1/6 (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (+ (* 1/2 (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (* -1/2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (+ (* -1/6 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (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)))))))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (+ (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (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 (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2)) (- (cos phi1) (cos (neg lambda2))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda1 (- (* 2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (sin (neg lambda2)) (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos (neg lambda2))))) (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2)))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* 2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (* lambda1 (- (* -1 (/ (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (cos (neg lambda2))))) (+ (* 1/2 (/ (* (cos (neg lambda2)) (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2))) (/ (* (sin (neg lambda2)) (- (* 2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (sin (neg lambda2)) (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (- (cos phi1) (cos (neg lambda2)))))))) (/ (* (sin (neg lambda2)) (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos (neg lambda2))))) (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2)))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* 2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (* lambda1 (- (+ (* -1 (/ (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (cos (neg lambda2))))) (* lambda1 (- (* -1 (/ (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (cos (neg lambda2))))) (+ (* -1/6 (/ (* (sin (neg lambda2)) (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2))) (+ (* 1/2 (/ (* (cos (neg lambda2)) (- (* 2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (sin (neg lambda2)) (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (sin (neg lambda2)) (- (* -1 (/ (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (cos (neg lambda2))))) (+ (* 1/2 (/ (* (cos (neg lambda2)) (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2))) (/ (* (sin (neg lambda2)) (- (* 2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (sin (neg lambda2)) (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (- (cos phi1) (cos (neg lambda2))))))) (- (cos phi1) (cos (neg lambda2))))))))) (+ (* 1/2 (/ (* (cos (neg lambda2)) (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2))) (/ (* (sin (neg lambda2)) (- (* 2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (sin (neg lambda2)) (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (- (cos phi1) (cos (neg lambda2)))))))) (/ (* (sin (neg lambda2)) (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos (neg lambda2))))) (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2)))))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ (* 2 (* lambda1 (* (cos (neg lambda2)) (sin (neg lambda2))))) (pow (cos phi1) 2)) (pow (cos (neg lambda2)) 2))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* -2 (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (cos phi1) 2)) (pow (cos (neg lambda2)) 2))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* -2 (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (cos phi1) 2)) (pow (cos (neg lambda2)) 2))))
#s(approx (pow (cos (- lambda1 lambda2)) 2) #s(hole binary64 (pow (cos (neg lambda2)) 2)))
#s(approx (pow (cos (- lambda1 lambda2)) 2) #s(hole binary64 (+ (* -2 (* lambda1 (* (cos (neg lambda2)) (sin (neg lambda2))))) (pow (cos (neg lambda2)) 2))))
#s(approx (pow (cos (- lambda1 lambda2)) 2) #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 (pow (cos (- lambda1 lambda2)) 2) #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 phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (cos phi1) (cos (neg lambda2)))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ (cos phi1) (* lambda1 (sin (neg lambda2)))) (cos (neg lambda2)))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ (cos phi1) (* lambda1 (+ (sin (neg lambda2)) (* 1/2 (* lambda1 (cos (neg lambda2))))))) (cos (neg lambda2)))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ (cos phi1) (* lambda1 (+ (sin (neg lambda2)) (* lambda1 (- (* -1/6 (* lambda1 (sin (neg lambda2)))) (* -1/2 (cos (neg lambda2)))))))) (cos (neg lambda2)))))
#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 (sin lambda1) #s(hole binary64 lambda1))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* -1/6 (pow lambda1 2))))))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* (pow lambda1 2) (- (* 1/120 (pow lambda1 2)) 1/6))))))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/120 (* -1/5040 (pow lambda1 2)))) 1/6))))))
#s(approx (+ lambda1 (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 (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) #s(hole binary64 (cos (neg lambda2))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) #s(hole binary64 (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1 (sin (neg lambda2))) (* -1/2 (* lambda1 (cos (neg lambda2)))))))))
#s(approx (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))) #s(hole binary64 (* -1 (* lambda1 (sin (neg lambda2))))))
#s(approx (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))) #s(hole binary64 (* lambda1 (+ (* -1 (sin (neg lambda2))) (* -1/2 (* lambda1 (cos (neg lambda2))))))))
#s(approx (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))) #s(hole binary64 (* -1 (sin (neg lambda2)))))
#s(approx (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))) #s(hole binary64 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
#s(approx (* -1/2 (* lambda1 (cos (neg lambda2)))) #s(hole binary64 (* -1/2 (* lambda1 (cos (neg lambda2))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) #s(hole binary64 (cos (neg lambda2))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) #s(hole binary64 (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1 (sin (neg lambda2))) (* -1/2 (* lambda1 (cos (neg lambda2)))))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1 (sin (neg lambda2))) (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))))))))
#s(approx (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) #s(hole binary64 (* -1 (* lambda1 (sin (neg lambda2))))))
#s(approx (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) #s(hole binary64 (* lambda1 (+ (* -1 (sin (neg lambda2))) (* -1/2 (* lambda1 (cos (neg lambda2))))))))
#s(approx (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) #s(hole binary64 (* lambda1 (+ (* -1 (sin (neg lambda2))) (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2))))))))))
#s(approx (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))) #s(hole binary64 (* -1 (sin (neg lambda2)))))
#s(approx (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))) #s(hole binary64 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
#s(approx (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))) #s(hole binary64 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
#s(approx (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) #s(hole binary64 (* -1/2 (* lambda1 (cos (neg lambda2))))))
#s(approx (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) #s(hole binary64 (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2))))))))
#s(approx (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2))))) #s(hole binary64 (* -1/2 (cos (neg lambda2)))))
#s(approx (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2))))) #s(hole binary64 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))))
#s(approx (* 1/6 (* lambda1 (sin (neg lambda2)))) #s(hole binary64 (* 1/6 (* lambda1 (sin (neg lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (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 (+ (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 (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (* (cos lambda2) (cos phi2))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2)))))
#s(approx (+ (cos lambda2) (* lambda1 (sin lambda2))) #s(hole binary64 (cos lambda2)))
#s(approx (+ (cos lambda2) (* lambda1 (sin lambda2))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (* lambda1 (sin lambda2)) #s(hole binary64 (* lambda1 (sin lambda2))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (- (* lambda1 (sin (+ lambda2 (* 1/2 (PI))))) (sin lambda2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (sin (* -1 lambda2)))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda1 (* (cos phi2) (cos (* -1 lambda2)))) (* (cos phi2) (sin (* -1 lambda2))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (* -1 lambda2))))) (* (cos phi2) (cos (* -1 lambda2))))) (* (cos phi2) (sin (* -1 lambda2))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (* -1 lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (* -1 lambda2))))))) (* (cos phi2) (cos (* -1 lambda2))))) (* (cos phi2) (sin (* -1 lambda2))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (sin (* -1 lambda2))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (sin (* -1 lambda2)) (* lambda1 (cos (* -1 lambda2))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (sin (* -1 lambda2)) (* lambda1 (+ (cos (* -1 lambda2)) (* -1/2 (* lambda1 (sin (* -1 lambda2)))))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (sin (* -1 lambda2)) (* lambda1 (+ (cos (* -1 lambda2)) (* lambda1 (+ (* -1/2 (sin (* -1 lambda2))) (* -1/6 (* lambda1 (cos (* -1 lambda2)))))))))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) #s(hole binary64 (- (* lambda1 (cos lambda2)) (sin lambda2))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) #s(hole binary64 (* lambda2 (- (* 1/6 (pow lambda2 2)) 1))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) #s(hole binary64 (+ (* lambda1 (+ 1 (* -1/2 (pow lambda2 2)))) (* lambda2 (- (* 1/6 (pow lambda2 2)) 1)))))
#s(approx (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)) #s(hole binary64 (* lambda2 (- (* 1/6 (pow lambda2 2)) 1))))
#s(approx (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)) #s(hole binary64 (+ (* -1/2 (* lambda1 (pow lambda2 2))) (* lambda2 (- (* 1/6 (pow lambda2 2)) 1)))))
#s(approx (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1) #s(hole binary64 (- (* 1/6 (pow lambda2 2)) 1)))
#s(approx (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1) #s(hole binary64 (- (+ (* -1/2 (* lambda1 lambda2)) (* 1/6 (pow lambda2 2))) 1)))
#s(approx (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) #s(hole binary64 (* 1/6 (pow lambda2 2))))
#s(approx (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) #s(hole binary64 (+ (* -1/2 (* lambda1 lambda2)) (* 1/6 (pow lambda2 2)))))
#s(approx (+ (* -1/2 lambda1) (* 1/6 lambda2)) #s(hole binary64 (* 1/6 lambda2)))
#s(approx (+ (* -1/2 lambda1) (* 1/6 lambda2)) #s(hole binary64 (+ (* -1/2 lambda1) (* 1/6 lambda2))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (cos (neg lambda2))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* 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)) 1) #s(hole binary64 (+ 1 (+ (* 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 (cos lambda2)) (sin lambda2)) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (- (* lambda1 (cos lambda2)) (sin lambda2)) #s(hole binary64 (- (* lambda1 (cos lambda2)) (sin lambda2))))
#s(approx (* lambda1 (cos lambda2)) #s(hole binary64 (* lambda1 (cos lambda2))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) #s(hole binary64 (- (* lambda1 (cos lambda2)) (sin lambda2))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) #s(hole binary64 (- (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))) (sin lambda2))))
#s(approx (* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))) #s(hole binary64 (+ (* -1 (sin lambda2)) (* lambda1 (cos lambda2)))))
#s(approx (* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))) #s(hole binary64 (+ (* -1 (sin lambda2)) (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))))))
#s(approx (pow lambda1 2) #s(hole binary64 (pow lambda1 2)))
#s(approx (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) #s(hole binary64 (* -1 (/ (sin lambda2) (pow lambda1 2)))))
#s(approx (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) #s(hole binary64 (/ (+ (* -1 (sin lambda2)) (* lambda1 (cos lambda2))) (pow lambda1 2))))
#s(approx (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) #s(hole binary64 (/ (+ (* -1 (sin lambda2)) (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2)))))) (pow lambda1 2))))
#s(approx (/ (sin lambda2) (pow lambda1 2)) #s(hole binary64 (/ (sin lambda2) (pow lambda1 2))))
#s(approx (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)) #s(hole binary64 (/ (cos lambda2) lambda1)))
#s(approx (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)) #s(hole binary64 (/ (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2)))) lambda1)))
#s(approx (/ (cos lambda2) lambda1) #s(hole binary64 (/ (cos lambda2) lambda1)))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (cos lambda2)))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (sin lambda2)))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
#s(approx (* (* (cos lambda2) lambda1) -1/2) #s(hole binary64 (* -1/2 (* lambda1 (cos lambda2)))))
#s(approx (* (cos lambda2) lambda1) #s(hole binary64 (* lambda1 (cos lambda2))))
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) #s(hole binary64 (* lambda1 (cos lambda2))))
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) #s(hole binary64 (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2)))))))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) #s(hole binary64 (cos lambda2)))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) #s(hole binary64 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))))
#s(approx (* lambda1 (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) #s(hole binary64 (cos lambda2)))
#s(approx (* lambda1 (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) #s(hole binary64 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (* -1/2 (* lambda1 (neg (sin lambda2)))) #s(hole binary64 (* 1/2 (* lambda1 (sin lambda2)))))
#s(approx (* lambda1 (neg (sin lambda2))) #s(hole binary64 (* -1 (* lambda1 (sin lambda2)))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (cos phi2))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* -1/2 (* (pow lambda1 2) (cos phi2)))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda1 2) (cos phi2)))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (cos phi2))) (* 1/24 (cos phi2))))))))))
#s(approx (+ 1 (* -1/2 (* lambda1 lambda1))) #s(hole binary64 1))
#s(approx (+ 1 (* -1/2 (* lambda1 lambda1))) #s(hole binary64 (+ 1 (* -1/2 (pow lambda1 2)))))
#s(approx (* -1/2 (* lambda1 lambda1)) #s(hole binary64 (* -1/2 (pow lambda1 2))))
#s(approx (* lambda1 lambda1) #s(hole binary64 (pow lambda1 2)))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) #s(hole binary64 1))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) #s(hole binary64 (+ 1 (* -1/2 (pow lambda1 2)))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) #s(hole binary64 (+ 1 (* (pow lambda1 2) (- (* 1/24 (pow lambda1 2)) 1/2)))))
#s(approx (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2)) #s(hole binary64 (* -1/2 (pow lambda1 2))))
#s(approx (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2)) #s(hole binary64 (* (pow lambda1 2) (- (* 1/24 (pow lambda1 2)) 1/2))))
#s(approx (- (* 1/24 (* lambda1 lambda1)) 1/2) #s(hole binary64 -1/2))
#s(approx (- (* 1/24 (* lambda1 lambda1)) 1/2) #s(hole binary64 (- (* 1/24 (pow lambda1 2)) 1/2)))
#s(approx (* 1/24 (* lambda1 lambda1)) #s(hole binary64 (* 1/24 (pow lambda1 2))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) #s(hole binary64 1))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) #s(hole binary64 (+ 1 (* -1/2 (pow lambda1 2)))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) #s(hole binary64 (+ 1 (* (pow lambda1 2) (- (* 1/24 (pow lambda1 2)) 1/2)))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) #s(hole binary64 (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/24 (* -1/720 (pow lambda1 2)))) 1/2)))))
#s(approx (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) #s(hole binary64 (* -1/2 (pow lambda1 2))))
#s(approx (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) #s(hole binary64 (* (pow lambda1 2) (- (* 1/24 (pow lambda1 2)) 1/2))))
#s(approx (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) #s(hole binary64 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/24 (* -1/720 (pow lambda1 2)))) 1/2))))
#s(approx (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) #s(hole binary64 -1/2))
#s(approx (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) #s(hole binary64 (- (* 1/24 (pow lambda1 2)) 1/2)))
#s(approx (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) #s(hole binary64 (- (* (pow lambda1 2) (+ 1/24 (* -1/720 (pow lambda1 2)))) 1/2)))
#s(approx (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) #s(hole binary64 (* 1/24 (pow lambda1 2))))
#s(approx (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) #s(hole binary64 (* (pow lambda1 2) (+ 1/24 (* -1/720 (pow lambda1 2))))))
#s(approx (+ 1/24 (* -1/720 (* lambda1 lambda1))) #s(hole binary64 1/24))
#s(approx (+ 1/24 (* -1/720 (* lambda1 lambda1))) #s(hole binary64 (+ 1/24 (* -1/720 (pow lambda1 2)))))
#s(approx (* -1/720 (* lambda1 lambda1)) #s(hole binary64 (* -1/720 (pow lambda1 2))))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) #s(hole binary64 (* -1 lambda2)))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (* lambda1 (- (pow lambda2 -1) (pow lambda1 -1))) #s(hole binary64 -1))
#s(approx (* lambda1 (- (pow lambda2 -1) (pow lambda1 -1))) #s(hole binary64 (- (/ lambda1 lambda2) 1)))
#s(approx (- (pow lambda2 -1) (pow lambda1 -1)) #s(hole binary64 (/ -1 lambda1)))
#s(approx (- (pow lambda2 -1) (pow lambda1 -1)) #s(hole binary64 (/ (- (/ lambda1 lambda2) 1) lambda1)))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* -1 lambda2)))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 -1))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (- (/ lambda1 lambda2) 1)))
#s(approx (- (pow (/ lambda1 lambda2) 3) 1) #s(hole binary64 -1))
#s(approx (- (pow (/ lambda1 lambda2) 3) 1) #s(hole binary64 (- (/ (pow lambda1 3) (pow lambda2 3)) 1)))
#s(approx (pow (/ lambda1 lambda2) 3) #s(hole binary64 (/ (pow lambda1 3) (pow lambda2 3))))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) #s(hole binary64 1))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) #s(hole binary64 (+ 1 (/ lambda1 lambda2))))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) #s(hole binary64 (+ 1 (* lambda1 (+ (/ 1 lambda2) (/ lambda1 (pow lambda2 2)))))))
#s(approx (+ 1 (* (/ lambda1 lambda2) 1)) #s(hole binary64 1))
#s(approx (+ 1 (* (/ lambda1 lambda2) 1)) #s(hole binary64 (+ 1 (/ lambda1 lambda2))))
#s(approx (* lambda1 (+ (/ 1 lambda1) (/ 1 lambda2))) #s(hole binary64 1))
#s(approx (* lambda1 (+ (/ 1 lambda1) (/ 1 lambda2))) #s(hole binary64 (+ 1 (/ lambda1 lambda2))))
#s(approx (+ (/ 1 lambda1) (/ 1 lambda2)) #s(hole binary64 (/ 1 lambda1)))
#s(approx (+ (/ 1 lambda1) (/ 1 lambda2)) #s(hole binary64 (/ (+ 1 (/ lambda1 lambda2)) lambda1)))
#s(approx (/ 1 lambda1) #s(hole binary64 (/ 1 lambda1)))
#s(approx (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) #s(hole binary64 (* -1 lambda2)))
#s(approx (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (+ 1 (* -1 (/ lambda2 lambda1))) #s(hole binary64 (* -1 (/ lambda2 lambda1))))
#s(approx (+ 1 (* -1 (/ lambda2 lambda1))) #s(hole binary64 (/ (+ lambda1 (* -1 lambda2)) lambda1)))
#s(approx (* -1 (/ lambda2 lambda1)) #s(hole binary64 (* -1 (/ lambda2 lambda1))))
#s(approx (/ lambda2 lambda1) #s(hole binary64 (/ lambda2 lambda1)))
#s(approx (+ 1 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) #s(hole binary64 (+ 1 (sin (- (* 1/2 (PI)) lambda2)))))
#s(approx (+ 1 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) #s(hole binary64 (+ 1 (+ (sin (- (* 1/2 (PI)) lambda2)) (* lambda1 (cos (- (* 1/2 (PI)) lambda2)))))))
#s(approx (+ 1 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) #s(hole binary64 (+ 1 (+ (sin (- (* 1/2 (PI)) lambda2)) (* lambda1 (+ (cos (- (* 1/2 (PI)) lambda2)) (* -1/2 (* lambda1 (sin (- (* 1/2 (PI)) lambda2))))))))))
#s(approx (+ 1 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) #s(hole binary64 (+ 1 (+ (sin (- (* 1/2 (PI)) lambda2)) (* lambda1 (+ (cos (- (* 1/2 (PI)) lambda2)) (* lambda1 (+ (* -1/2 (sin (- (* 1/2 (PI)) lambda2))) (* -1/6 (* lambda1 (cos (- (* 1/2 (PI)) lambda2))))))))))))
#s(approx (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) #s(hole binary64 (sin (- (* 1/2 (PI)) lambda2))))
#s(approx (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) lambda2)) (* lambda1 (cos (- (* 1/2 (PI)) lambda2))))))
#s(approx (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) lambda2)) (* lambda1 (+ (cos (- (* 1/2 (PI)) lambda2)) (* -1/2 (* lambda1 (sin (- (* 1/2 (PI)) lambda2)))))))))
#s(approx (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) lambda2)) (* lambda1 (+ (cos (- (* 1/2 (PI)) lambda2)) (* lambda1 (+ (* -1/2 (sin (- (* 1/2 (PI)) lambda2))) (* -1/6 (* lambda1 (cos (- (* 1/2 (PI)) lambda2)))))))))))
#s(approx (- (+ lambda1 (* 1/2 (PI))) lambda2) #s(hole binary64 (- (* 1/2 (PI)) lambda2)))
#s(approx (- (+ lambda1 (* 1/2 (PI))) lambda2) #s(hole binary64 (- (+ lambda1 (* 1/2 (PI))) lambda2)))
#s(approx (+ lambda1 (* 1/2 (PI))) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ lambda1 (* 1/2 (PI))) #s(hole binary64 (+ lambda1 (* 1/2 (PI)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* -1 (* lambda1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* 1/6 (* lambda1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))))) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (+ (* -1 (* lambda1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* 1/6 (* lambda1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))))) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* (cos phi2) (cos (neg lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (+ (* (cos phi2) (cos (neg lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (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))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (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))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi1) (+ (cos (neg lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi1) (+ (cos (neg lambda2)) (+ (* -1 (* lambda1 (sin (neg lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi1) (+ (cos (neg lambda2)) (+ (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi1) (+ (cos (neg lambda2)) (+ (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos (neg lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))))
#s(approx (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos (neg lambda2)) (+ (* -1 (* lambda1 (sin (neg lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos (neg lambda2)) (+ (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos (neg lambda2)) (+ (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (/ (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (- (+ (* lambda1 (- (* 2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ 1 (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* 2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* lambda1 (- (* -1 (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* 2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ 1 (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* 2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* lambda1 (- (+ (* -1 (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- 1 (* (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))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (+ (* -1/6 (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda2)) (- (* 2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (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))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* 2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* 2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ 1 (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- (+ 1 (* 2 (* lambda1 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- (+ 1 (* 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 phi2) 2) (pow (cos (neg lambda2)) 2)))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- (+ 1 (* 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 phi2) 2) (pow (cos (neg lambda2)) 2)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) #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 (* (cos phi2) (cos (- lambda1 lambda2))) 2) #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 (* (cos phi2) (cos (- lambda1 lambda2))) 2) #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 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- 1 (* (cos phi2) (cos (neg lambda2))))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* lambda1 (- (* 1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* 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 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (/ (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #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)))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #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)))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (+ (/ (* (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* -1/2 (* (cos phi2) (cos (neg lambda2)))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)) (/ (* (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (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)))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (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)))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #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))))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (+ (/ (* (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* 1/6 (* (cos phi2) (sin (neg lambda2)))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)) (+ (/ (* (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (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)))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (+ (/ (* (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* -1/2 (* (cos phi2) (cos (neg lambda2)))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)) (/ (* (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (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)))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (- (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* -1/2 (* (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)))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (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)))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))))) (+ (/ (* (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* -1/2 (* (cos phi2) (cos (neg lambda2)))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)) (/ (* (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (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)))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (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)))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (/ (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (+ 1 (pow (cos (neg lambda2)) 3)) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))))
#s(approx (/ (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (- (+ (* -2 (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))) (* -1 (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2)))))) (/ (* (+ 1 (pow (cos (neg lambda2)) 3)) (+ (sin (neg lambda2)) (* -2 (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))) 2)))) (+ (/ 1 (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2)))) (/ (pow (cos (neg lambda2)) 3) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))))))
#s(approx (/ (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (- (+ (* -2 (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))) (+ (* -1 (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))) (* lambda1 (- (+ (* -1/2 (/ (pow (cos (neg lambda2)) 3) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))) (+ (* 2 (/ (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))) (/ (* (cos (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2)))))) (+ (/ (* (+ 1 (pow (cos (neg lambda2)) 3)) (- (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (* -1/2 (cos (neg lambda2))))) (pow (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))) 2)) (/ (* (+ (sin (neg lambda2)) (* -2 (* (cos (neg lambda2)) (sin (neg lambda2))))) (- (+ (* -2 (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))) (* -1 (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2)))))) (/ (* (+ 1 (pow (cos (neg lambda2)) 3)) (+ (sin (neg lambda2)) (* -2 (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))) 2)))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))))))) (/ (* (+ 1 (pow (cos (neg lambda2)) 3)) (+ (sin (neg lambda2)) (* -2 (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))) 2)))) (+ (/ 1 (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2)))) (/ (pow (cos (neg lambda2)) 3) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))))))
#s(approx (/ (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (- (+ (* -2 (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))) (+ (* -1 (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))) (* lambda1 (- (+ (* -1/2 (/ (pow (cos (neg lambda2)) 3) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))) (+ (* 2 (/ (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))) (+ (* lambda1 (- (+ (* -1 (/ (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))) (+ (* 1/6 (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))) (+ (/ (* (cos (neg lambda2)) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2)))) (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))))) (+ (/ (* (+ 1 (pow (cos (neg lambda2)) 3)) (+ (* -1/6 (sin (neg lambda2))) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))) 2)) (+ (/ (* (+ (sin (neg lambda2)) (* -2 (* (cos (neg lambda2)) (sin (neg lambda2))))) (- (+ (* -1/2 (/ (pow (cos (neg lambda2)) 3) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))) (+ (* 2 (/ (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))) (/ (* (cos (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2)))))) (+ (/ (* (+ 1 (pow (cos (neg lambda2)) 3)) (- (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (* -1/2 (cos (neg lambda2))))) (pow (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))) 2)) (/ (* (+ (sin (neg lambda2)) (* -2 (* (cos (neg lambda2)) (sin (neg lambda2))))) (- (+ (* -2 (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))) (* -1 (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2)))))) (/ (* (+ 1 (pow (cos (neg lambda2)) 3)) (+ (sin (neg lambda2)) (* -2 (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))) 2)))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2)))) (/ (* (- (+ (* -2 (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))) (* -1 (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2)))))) (/ (* (+ 1 (pow (cos (neg lambda2)) 3)) (+ (sin (neg lambda2)) (* -2 (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))) 2))) (- (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (* -1/2 (cos (neg lambda2))))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2)))))))) (/ (* (cos (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))))) (+ (/ (* (+ 1 (pow (cos (neg lambda2)) 3)) (- (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (* -1/2 (cos (neg lambda2))))) (pow (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))) 2)) (/ (* (+ (sin (neg lambda2)) (* -2 (* (cos (neg lambda2)) (sin (neg lambda2))))) (- (+ (* -2 (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))) (* -1 (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2)))))) (/ (* (+ 1 (pow (cos (neg lambda2)) 3)) (+ (sin (neg lambda2)) (* -2 (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))) 2)))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))))))) (/ (* (+ 1 (pow (cos (neg lambda2)) 3)) (+ (sin (neg lambda2)) (* -2 (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))) 2)))) (+ (/ 1 (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2)))) (/ (pow (cos (neg lambda2)) 3) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 3)) #s(hole binary64 (+ 1 (pow (cos (neg lambda2)) 3))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 3)) #s(hole binary64 (+ 1 (+ (* 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 (+ 1 (pow (cos (- lambda1 lambda2)) 3)) #s(hole binary64 (+ 1 (+ (* 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 (+ 1 (pow (cos (- lambda1 lambda2)) 3)) #s(hole binary64 (+ 1 (+ (* 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 (cos (- lambda1 lambda2)) 3) #s(hole binary64 (pow (cos (neg lambda2)) 3)))
#s(approx (pow (cos (- lambda1 lambda2)) 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)) 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)) 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 (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2)))))
#s(approx (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ 1 (+ (* lambda1 (+ (sin (neg lambda2)) (* -2 (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (cos (neg lambda2)) 2))) (cos (neg lambda2)))))
#s(approx (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ 1 (+ (* lambda1 (+ (sin (neg lambda2)) (+ (* -2 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* lambda1 (- (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (* -1/2 (cos (neg lambda2)))))))) (pow (cos (neg lambda2)) 2))) (cos (neg lambda2)))))
#s(approx (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ 1 (+ (* lambda1 (+ (sin (neg lambda2)) (+ (* -2 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* lambda1 (- (+ (* -1 (pow (cos (neg lambda2)) 2)) (+ (* lambda1 (+ (* -1/6 (sin (neg lambda2))) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (sin (neg lambda2)) 2))) (* -1/2 (cos (neg lambda2)))))))) (pow (cos (neg lambda2)) 2))) (cos (neg lambda2)))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (+ 1 (pow (cos (neg lambda2)) 2))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (+ 1 (+ (* -2 (* lambda1 (* (cos (neg lambda2)) (sin (neg lambda2))))) (pow (cos (neg lambda2)) 2)))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (+ 1 (+ (* 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 (+ 1 (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (+ 1 (+ (* 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 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (/ (- (* (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))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda1 (- (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (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))))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* lambda1 (- (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (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))))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (/ (* (+ (* (cos phi2) (* (cos (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (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)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 4)) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (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))))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* lambda1 (- (+ (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (* lambda1 (- (* -1/6 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (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))))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (/ (* (+ (* (cos phi2) (* (cos (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (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)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 4)) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (/ (* (+ (* -1/3 (* (cos phi2) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (- (* (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)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 4)) (+ (/ (* (+ (* (cos phi2) (* (cos (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (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))))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/6 (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))))) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (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))))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (/ (* (+ (* (cos phi2) (* (cos (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (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)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 4)) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (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))))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))) (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 (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (/ (- 1 (+ (* (cos phi2) (cos (neg lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))
#s(approx (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (- (+ (* lambda1 (- (* -1 (/ (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (+ (* (cos phi2) (cos (neg lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 3))))) (/ 1 (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (cos phi2) (cos (neg lambda2))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (- (+ (* lambda1 (- (+ (* -1 (/ (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (* lambda1 (- (* -1 (/ (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (+ (* (cos phi2) (cos (neg lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 3)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- 1 (+ (* (cos phi2) (cos (neg lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4)))))) (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (+ (* (cos phi2) (cos (neg lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 3))))) (/ 1 (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (cos phi2) (cos (neg lambda2))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (- (+ (* lambda1 (- (+ (* -1 (/ (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (* lambda1 (- (+ (* -1 (/ (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (* lambda1 (- (* -1 (/ (+ (* 1/6 (* (cos phi2) (sin (neg lambda2)))) (* (pow (cos phi2) 2) (+ (* -1 (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/6 (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (+ (* (cos phi2) (cos (neg lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 3)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- 1 (+ (* (cos phi2) (cos (neg lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (+ (/ (* (+ (* -1/3 (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (- 1 (+ (* (cos phi2) (cos (neg lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4)) (/ (* (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (* -1 (/ (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (+ (* (cos phi2) (cos (neg lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 3))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (+ (* (cos phi2) (cos (neg lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 3)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- 1 (+ (* (cos phi2) (cos (neg lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4)))))) (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (+ (* (cos phi2) (cos (neg lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 3))))) (/ 1 (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (cos phi2) (cos (neg lambda2))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) #s(hole binary64 (- 1 (+ (* (cos phi2) (cos (neg lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))
#s(approx (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) #s(hole binary64 (- (+ 1 (* -1 (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))))) (+ (* (cos phi2) (cos (neg lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))
#s(approx (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) #s(hole binary64 (- (+ 1 (* lambda1 (- (* -1 (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))) (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))))) (+ (* (cos phi2) (cos (neg lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))
#s(approx (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) #s(hole binary64 (- (+ 1 (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (+ (* 1/6 (* (cos phi2) (sin (neg lambda2)))) (* (pow (cos phi2) 2) (+ (* -1 (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/6 (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))))) (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))) (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))))) (+ (* (cos phi2) (cos (neg lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* (cos phi2) (cos (neg lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (+ (* (cos phi2) (cos (neg lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))))) (+ (* (cos phi2) (cos (neg lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (+ (* lambda1 (+ (* 1/6 (* (cos phi2) (sin (neg lambda2)))) (* (pow (cos phi2) 2) (+ (* -1 (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/6 (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))))) (+ (* (cos phi2) (cos (neg lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))
#s(approx (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* -1 (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/6 (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* lambda1 (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* lambda1 (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* lambda1 (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* lambda1 (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* lambda1 (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/6 (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) #s(hole binary64 (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) #s(hole binary64 (+ (* 2 (* lambda1 (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) #s(hole binary64 (+ (* lambda1 (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* lambda1 (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) #s(hole binary64 (+ (* lambda1 (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* lambda1 (+ (* lambda1 (+ (* -1/3 (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (* lambda1 (- (* 2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))) (* 1/2 (/ 1 (- (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 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (* 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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))) (* 1/2 (/ 1 (- (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 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (* 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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))) (* 1/2 (/ 1 (- (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 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (neg lambda2)) 2)) (- (cos phi1) (cos (neg lambda2))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (cos (neg lambda2))))) (+ (* lambda1 (- (* 2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (sin (neg lambda2)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (* 1/2 (/ 1 (- (cos phi1) (cos (neg lambda2))))))) (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2)))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (cos (neg lambda2))))) (+ (* lambda1 (- (+ (* 2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (* lambda1 (- (* -1 (/ (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (cos (neg lambda2))))) (+ (* 1/2 (/ (* (cos (neg lambda2)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2))) (/ (* (sin (neg lambda2)) (- (* 2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (sin (neg lambda2)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (- (cos phi1) (cos (neg lambda2)))))))) (/ (* (sin (neg lambda2)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (* 1/2 (/ 1 (- (cos phi1) (cos (neg lambda2))))))) (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2)))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (cos (neg lambda2))))) (+ (* lambda1 (- (+ (* 2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (* lambda1 (- (+ (* -1 (/ (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (cos (neg lambda2))))) (* lambda1 (- (* -1 (/ (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (cos (neg lambda2))))) (+ (* -1/6 (/ (* (sin (neg lambda2)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2))) (+ (* 1/2 (/ (* (cos (neg lambda2)) (- (* 2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (sin (neg lambda2)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (sin (neg lambda2)) (- (* -1 (/ (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (cos (neg lambda2))))) (+ (* 1/2 (/ (* (cos (neg lambda2)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2))) (/ (* (sin (neg lambda2)) (- (* 2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (sin (neg lambda2)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (- (cos phi1) (cos (neg lambda2))))))) (- (cos phi1) (cos (neg lambda2))))))))) (+ (* 1/2 (/ (* (cos (neg lambda2)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2))) (/ (* (sin (neg lambda2)) (- (* 2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (sin (neg lambda2)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (- (cos phi1) (cos (neg lambda2)))))))) (/ (* (sin (neg lambda2)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (* 1/2 (/ 1 (- (cos phi1) (cos (neg lambda2))))))) (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2)))))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (neg lambda2)) 2))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* 2 (* lambda1 (* (cos (neg lambda2)) (sin (neg lambda2))))))) (pow (cos (neg lambda2)) 2))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* -2 (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (pow (cos (neg lambda2)) 2))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* -2 (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (pow (cos (neg lambda2)) 2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* lambda1 (- (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ (pow (cos phi1) 6) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* lambda1 (- (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4)))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (- (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ (pow (cos phi1) 6) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* lambda1 (- (+ (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* lambda1 (- (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -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))))))) (* 2 (* (pow (cos (neg lambda2)) 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 phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4)))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4)))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (- (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (- (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4)))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (- (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4)))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (- (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ (pow (cos phi1) 6) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (* lambda1 (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4)))))) (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 6) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (/ (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (* lambda1 (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4)))))) (+ (* lambda1 (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 4 (* (cos phi2) (* (sin (neg lambda2)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))) (/ (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (+ (/ (* (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (- (* 2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 6) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 6) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (+ (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))))) (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 6) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (/ (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (* lambda1 (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4)))))) (+ (* lambda1 (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 4 (* (cos phi2) (* (sin (neg lambda2)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))) (/ (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (+ (* lambda1 (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/6 (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -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))))))) (* 2 (* (pow (cos (neg lambda2)) 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 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (* (pow (cos phi2) 3) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))))))) (+ (* -1/6 (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))))))))) (* 2 (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* -1/3 (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))) (+ (/ (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 4 (* (cos phi2) (* (sin (neg lambda2)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))) (/ (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (+ (* 4 (* (cos phi2) (* (sin (neg lambda2)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))))) (+ (/ (* (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (- (* 2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 6) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (+ (/ (* (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (- (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (+ (/ (* (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (- (* 2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 6) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 6) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 6) (+ (* -1/6 (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/6 (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (+ (/ (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 6) (+ (* 2 (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -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))))))) (* 2 (* (pow (cos (neg lambda2)) 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)))))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))))))) (+ (/ (* (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (- (* 2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 6) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 6) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (+ (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))))) (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 6) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (/ (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (* lambda1 (- (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4)))))) (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (* lambda1 (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4)))))) (* lambda1 (- (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 4 (* (cos phi2) (* (sin (neg lambda2)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))) (/ (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))))) (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (* lambda1 (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4)))))) (* lambda1 (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 4 (* (cos phi2) (* (sin (neg lambda2)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))) (/ (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (* lambda1 (- (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/6 (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -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))))))) (* 2 (* (pow (cos (neg lambda2)) 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 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (* (pow (cos phi2) 3) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))))))) (+ (* -1/6 (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))))))))) (* 2 (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* -1/3 (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))) (+ (/ (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 4 (* (cos phi2) (* (sin (neg lambda2)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))) (/ (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (+ (* 4 (* (cos phi2) (* (sin (neg lambda2)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))))) (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/6 (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))))))) (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))))) (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))
#s(approx (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) #s(hole binary64 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))))
#s(approx (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) #s(hole binary64 (+ (* lambda1 (* (pow phi1 2) (- (+ (* -3 (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4)))))) (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))))
#s(approx (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 4 (* (cos phi2) (* (sin (neg lambda2)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))) (/ (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (* (pow phi1 2) (- (+ (* -3 (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))))) (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))))
#s(approx (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/6 (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -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))))))) (* 2 (* (pow (cos (neg lambda2)) 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 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (* (pow (cos phi2) 3) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))))))) (+ (* -1/6 (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))))))))) (* 2 (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* -1/3 (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))) (+ (/ (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 4 (* (cos phi2) (* (sin (neg lambda2)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))) (/ (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (+ (* 4 (* (cos phi2) (* (sin (neg lambda2)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))))) (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 4 (* (cos phi2) (* (sin (neg lambda2)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))) (/ (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))))) (* (pow phi1 2) (- (+ (* -3 (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))))) (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))))
#s(approx (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) #s(hole binary64 (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))
#s(approx (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) #s(hole binary64 (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* lambda1 (- (+ (* -3 (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))))
#s(approx (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) #s(hole binary64 (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* lambda1 (- (+ (* -3 (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* lambda1 (- (+ (* -3 (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 4 (* (cos phi2) (* (sin (neg lambda2)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))) (/ (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))))
#s(approx (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) #s(hole binary64 (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* lambda1 (- (+ (* -3 (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* lambda1 (- (+ (* -3 (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* lambda1 (- (+ (* -3 (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/6 (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -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))))))) (* 2 (* (pow (cos (neg lambda2)) 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 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (* (pow (cos phi2) 3) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))))))) (+ (* -1/6 (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))))))))) (* 2 (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* -1/3 (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))) (+ (/ (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 4 (* (cos phi2) (* (sin (neg lambda2)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))) (/ (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (+ (* 4 (* (cos phi2) (* (sin (neg lambda2)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 4 (* (cos phi2) (* (sin (neg lambda2)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))) (/ (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))))
#s(approx (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* -1 (* lambda1 (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))))) (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/6 (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))))))) (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))))) (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* lambda1 (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))) (+ (* lambda1 (+ (* -1/6 (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) #s(hole binary64 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))
#s(approx (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) #s(hole binary64 (+ 1 (+ (* lambda1 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))))
#s(approx (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) #s(hole binary64 (+ 1 (+ (* lambda1 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (+ (* -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) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))))) (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))))
#s(approx (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) #s(hole binary64 (+ 1 (+ (* lambda1 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (+ (* -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) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 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) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))))))) (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))))
#s(approx (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) #s(hole binary64 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))
#s(approx (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) #s(hole binary64 (+ (* lambda1 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))
#s(approx (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) #s(hole binary64 (+ (* lambda1 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (+ (* -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) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))))) (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))
#s(approx (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) #s(hole binary64 (+ (* lambda1 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (+ (* -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) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 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) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))))))) (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))
#s(approx (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) #s(hole binary64 (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))
#s(approx (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) #s(hole binary64 (+ (* -4 (* lambda1 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))))) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))
#s(approx (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) #s(hole binary64 (+ (* lambda1 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* lambda1 (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))
#s(approx (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) #s(hole binary64 (+ (* lambda1 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))))) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))
#s(approx (pow (cos (- lambda1 lambda2)) 4) #s(hole binary64 (pow (cos (neg lambda2)) 4)))
#s(approx (pow (cos (- lambda1 lambda2)) 4) #s(hole binary64 (+ (* -4 (* lambda1 (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (pow (cos (neg lambda2)) 4))))
#s(approx (pow (cos (- lambda1 lambda2)) 4) #s(hole binary64 (+ (* lambda1 (+ (* -4 (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* lambda1 (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (pow (cos (neg lambda2)) 4))))
#s(approx (pow (cos (- lambda1 lambda2)) 4) #s(hole binary64 (+ (* lambda1 (+ (* -4 (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* lambda1 (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (+ (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))) (* lambda1 (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))))))))))) (pow (cos (neg lambda2)) 4))))
#s(approx (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) #s(hole binary64 (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))
#s(approx (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) #s(hole binary64 (+ (* lambda1 (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))
#s(approx (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) #s(hole binary64 (+ (* lambda1 (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* lambda1 (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 4 (* (cos phi2) (* (sin (neg lambda2)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))) (/ (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))
#s(approx (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) #s(hole binary64 (+ (* lambda1 (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* lambda1 (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* lambda1 (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -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))))))) (* 2 (* (pow (cos (neg lambda2)) 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 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (* (pow (cos phi2) 3) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))))))) (+ (* -1/6 (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))))))))) (* 2 (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* -1/3 (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))) (+ (/ (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 4 (* (cos phi2) (* (sin (neg lambda2)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))) (/ (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (+ (* 4 (* (cos phi2) (* (sin (neg lambda2)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 4 (* (cos phi2) (* (sin (neg lambda2)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))) (/ (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))
#s(approx (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) #s(hole binary64 (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))))
#s(approx (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) #s(hole binary64 (+ (* lambda1 (+ (* -2 (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))))) (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))))))
#s(approx (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) #s(hole binary64 (+ (* lambda1 (+ (* -2 (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))))) (+ (* lambda1 (+ (* -2 (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))))))) (+ (* -1 (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))))) (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))))) (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))))))
#s(approx (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) #s(hole binary64 (+ (* lambda1 (+ (* -2 (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))))) (+ (* lambda1 (+ (* -2 (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))))))) (+ (* -1 (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))))) (+ (* lambda1 (+ (* -2 (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2))))))))))) (+ (* -1 (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -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))))))) (* 2 (* (pow (cos (neg lambda2)) 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)))))))))))) (+ (* -1 (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))))) (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (* (pow (cos phi2) 3) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))))))) (+ (* -1/6 (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))))))) (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))))))) (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))))))
#s(approx (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) #s(hole binary64 (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))
#s(approx (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) #s(hole binary64 (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (+ (* lambda1 (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))))
#s(approx (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) #s(hole binary64 (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (+ (* lambda1 (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (+ (* lambda1 (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))))
#s(approx (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) #s(hole binary64 (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (+ (* lambda1 (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (+ (* lambda1 (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (+ (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (* lambda1 (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (* (pow (cos phi2) 3) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))))))) (+ (* -1/6 (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))))
#s(approx (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) #s(hole binary64 (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))
#s(approx (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) #s(hole binary64 (+ (* lambda1 (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))
#s(approx (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) #s(hole binary64 (+ (* lambda1 (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (+ (* lambda1 (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))
#s(approx (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) #s(hole binary64 (+ (* lambda1 (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (+ (* lambda1 (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (+ (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (* lambda1 (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (* (pow (cos phi2) 3) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (+ (* -1/6 (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))
#s(approx (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) #s(hole binary64 (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))
#s(approx (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) #s(hole binary64 (- (+ (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* 2 (* lambda1 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) 2)))
#s(approx (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) #s(hole binary64 (- (+ (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* 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)))))))) 2)))
#s(approx (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) #s(hole binary64 (- (+ (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* lambda1 (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* lambda1 (+ (* -1 (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (* -1 (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))))))) 2)))
#s(approx (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))))
#s(approx (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* 2 (* lambda1 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))))
#s(approx (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* 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))))))))))
#s(approx (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* lambda1 (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* lambda1 (+ (* -1 (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (* -1 (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))))))))))
#s(approx (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))
#s(approx (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) #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 (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) #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 (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) #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 (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) #s(hole binary64 (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))))
#s(approx (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) #s(hole binary64 (- (+ 1 (* -2 (* lambda1 (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))))) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))))
#s(approx (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) #s(hole binary64 (- (+ 1 (* lambda1 (- (* -1 (* lambda1 (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))))) (* 2 (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))))))) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))))
#s(approx (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) #s(hole binary64 (- (+ 1 (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (* (pow (cos phi2) 6) (+ (* 2 (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -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))))))) (* 2 (* (pow (cos (neg lambda2)) 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) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))))) (* 2 (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))))))) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))))
#s(approx (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) #s(hole binary64 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))
#s(approx (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) #s(hole binary64 (+ (* 2 (* lambda1 (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))))) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))))
#s(approx (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) #s(hole binary64 (+ (* lambda1 (+ (* 2 (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (* lambda1 (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))))) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))))
#s(approx (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) #s(hole binary64 (+ (* lambda1 (+ (* 2 (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 6) (+ (* 2 (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -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))))))) (* 2 (* (pow (cos (neg lambda2)) 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) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))))))) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))))
#s(approx (pow (cos (- lambda1 lambda2)) 6) #s(hole binary64 (pow (cos (neg lambda2)) 6)))
#s(approx (pow (cos (- lambda1 lambda2)) 6) #s(hole binary64 (+ (* 2 (* lambda1 (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (pow (cos (neg lambda2)) 6))))
#s(approx (pow (cos (- lambda1 lambda2)) 6) #s(hole binary64 (+ (* lambda1 (+ (* 2 (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* lambda1 (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))))) (pow (cos (neg lambda2)) 6))))
#s(approx (pow (cos (- lambda1 lambda2)) 6) #s(hole binary64 (+ (* lambda1 (+ (* 2 (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* lambda1 (+ (* 2 (* (pow (cos (neg lambda2)) 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))))))) (+ (* lambda1 (+ (* 2 (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -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))))))) (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))))) (pow (cos (neg lambda2)) 6))))
#s(approx (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))
#s(approx (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (* lambda1 (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))
#s(approx (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (* lambda1 (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (* lambda1 (+ (* 4 (* (cos phi2) (* (sin (neg lambda2)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))
#s(approx (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (* lambda1 (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (* lambda1 (+ (* 4 (* (cos phi2) (* (sin (neg lambda2)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* lambda1 (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))))))))) (* 2 (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* -1/3 (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))))))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))
#s(approx (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) #s(hole binary64 (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2)))
#s(approx (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) #s(hole binary64 (+ (* 2 (* lambda1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2))))
#s(approx (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) #s(hole binary64 (+ (* lambda1 (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* lambda1 (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2))))) (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2))))
#s(approx (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) #s(hole binary64 (+ (* lambda1 (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* lambda1 (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (+ (* lambda1 (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))))))))) (* 2 (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)))))) (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2))))
#s(approx (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (/ (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda1 (- (* 2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 6) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda1 (- (+ (* 2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* lambda1 (- (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (+ (/ (* (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (- (* 2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 6) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 6) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 6) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda1 (- (+ (* 2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* lambda1 (- (+ (* lambda1 (- (/ (* (pow (cos phi2) 6) (+ (* 2 (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -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))))))) (* 2 (* (pow (cos (neg lambda2)) 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)))))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (+ (/ (* (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (- (* 2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 6) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (+ (/ (* (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (- (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (+ (/ (* (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (- (* 2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 6) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 6) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 6) (+ (* -1/6 (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (/ (* (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (- (* 2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 6) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 6) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 6) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (/ (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))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (/ (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))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (/ (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (/ (* (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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 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) (- (* -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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) 2)) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) 3))) (+ (/ (* (- (* -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) (- (* -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 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)) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 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))))))) (/ (* (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 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) (- (* -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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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)))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) 2)) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (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) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (* (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (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)))))))) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) 3))) (+ (/ (* (- (* -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)))))) (+ (/ (* (- (* -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) (- (* -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) (* (pow (cos (neg lambda2)) 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))))) (- (+ (* (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) (- (* -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 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)) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 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))))))))) (/ (* (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))))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) 2)) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) 3))) (+ (/ (* (- (* -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) (- (* -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 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)) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 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))))))) (/ (* (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 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) (- (* -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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* -1 (/ (* lambda1 (* (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 phi1) 3) (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) 2)) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (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))))) (/ (* (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 phi1) 3) (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (/ (* (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) 2)) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (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) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (* (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (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)))))))) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) 2)) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (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))))) (/ (* (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 phi1) 3) (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* lambda1 (- (* -1 (/ (* (cos phi2) (sin (neg lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))) (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* lambda1 (- (+ (* -1 (/ (* (cos phi2) (sin (neg lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))) (* lambda1 (- (* -1/2 (/ (* (cos phi2) (cos (neg lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2))))) (- (* -1 (/ (* (cos phi2) (sin (neg lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))) (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* lambda1 (- (+ (* -1 (/ (* (cos phi2) (sin (neg lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))) (* lambda1 (- (+ (* -1/2 (/ (* (cos phi2) (cos (neg lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))) (* lambda1 (- (* 1/6 (/ (* (cos phi2) (sin (neg lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2))))) (- (* -1/2 (/ (* (cos phi2) (cos (neg lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2))))) (- (* -1 (/ (* (cos phi2) (sin (neg lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))) (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (+ (/ (* (- (* -1 (/ (* (cos phi2) (sin (neg lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))) (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)))) (- (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* -1/2 (* (cos phi2) (cos (neg lambda2)))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))))))) (+ (/ (* (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2))))) (- (* -1 (/ (* (cos phi2) (sin (neg lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))) (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* lambda1 (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* 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 phi2) (cos (neg lambda2))))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* 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 phi2) (sin (neg lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* -1/2 (* (cos phi2) (cos (neg lambda2))))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (+ (* -2 (* lambda1 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (+ (* 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 (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (+ (* 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 (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (* (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))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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) (- (* -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)))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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)))))) (+ (/ (* (- (* -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) (- (* -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) (* (pow (cos (neg lambda2)) 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))))) (/ (* (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) (- (* -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)))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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)))))) (+ (/ (* (- (* -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)))))) (+ (/ (* (- (* -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) (- (* -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) (* (pow (cos (neg lambda2)) 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))))) (- (+ (* (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) (- (* -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) (* (pow (cos (neg lambda2)) 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)))))) (/ (* (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))))))) (+ (/ (* (- (* -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) (- (* -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) (* (pow (cos (neg lambda2)) 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))))) (/ (* (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) (- (* -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)))))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) #s(hole binary64 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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)))))
#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 phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (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))) (* -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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (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))))) (* 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 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* lambda1 (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* 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 phi2) (cos (neg lambda2))))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* 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 phi2) (sin (neg lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* -1/2 (* (cos phi2) (cos (neg lambda2))))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))))
#s(approx (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ 1 (+ (* -2 (* lambda1 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))))
#s(approx (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ 1 (+ (* 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 (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ 1 (+ (* 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 (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (cos lambda2)))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2)))) #s(hole binary64 (+ 1 (* -1/2 (pow lambda2 2)))))
#s(approx (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow lambda2 2)) (* lambda1 lambda2)))))
#s(approx (* lambda2 (+ lambda1 (* -1/2 lambda2))) #s(hole binary64 (* -1/2 (pow lambda2 2))))
#s(approx (* lambda2 (+ lambda1 (* -1/2 lambda2))) #s(hole binary64 (+ (* -1/2 (pow lambda2 2)) (* lambda1 lambda2))))
#s(approx (+ lambda1 (* -1/2 lambda2)) #s(hole binary64 (* -1/2 lambda2)))
#s(approx (+ lambda1 (* -1/2 lambda2)) #s(hole binary64 (+ lambda1 (* -1/2 lambda2))))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) #s(hole binary64 (cos lambda2)))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) #s(hole binary64 (/ (cos lambda2) lambda1)))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) #s(hole binary64 (/ (+ (cos lambda2) (* lambda1 (sin lambda2))) lambda1)))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) #s(hole binary64 (cos lambda2)))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) #s(hole binary64 (/ (cos lambda2) (pow lambda1 2))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) #s(hole binary64 (/ (+ (cos lambda2) (* lambda1 (sin lambda2))) (pow lambda1 2))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) #s(hole binary64 (/ (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))) (pow lambda1 2))))
#s(approx (- (/ 1 (pow lambda1 2)) 1/2) #s(hole binary64 (/ 1 (pow lambda1 2))))
#s(approx (- (/ 1 (pow lambda1 2)) 1/2) #s(hole binary64 (/ (+ 1 (* -1/2 (pow lambda1 2))) (pow lambda1 2))))
#s(approx (/ 1 (pow lambda1 2)) #s(hole binary64 (/ 1 (pow lambda1 2))))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) #s(hole binary64 (* -1 (/ (cos lambda2) (pow lambda1 2)))))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) #s(hole binary64 (/ (+ (* -1 (cos lambda2)) (* -1 (* lambda1 (sin lambda2)))) (pow lambda1 2))))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) #s(hole binary64 (* -1 (/ (cos lambda2) lambda1))))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) #s(hole binary64 (/ (+ (* -1 (cos lambda2)) (* -1 (* lambda1 (sin lambda2)))) lambda1)))
#s(approx (* -1 (/ (cos lambda2) lambda1)) #s(hole binary64 (* -1 (/ (cos lambda2) lambda1))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* -1 (/ (* lambda1 (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (* -1/2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (* -1/6 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- 1 (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* -1 (/ (* lambda1 (* (cos phi2) (sin (neg lambda2)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (/ (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 3))) (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (/ (* (cos phi2) (sin (neg lambda2))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ 1 (- 1 (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -1 (/ (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 3))) (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (+ (* -1/2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 3))) (* -1/6 (/ (* (cos phi2) (sin (neg lambda2))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (+ (* -1 (/ (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 3))) (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (/ (* (cos phi2) (sin (neg lambda2))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ 1 (- 1 (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (+ (* 1/2 (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (+ (* lambda1 (- (/ (* (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 (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (+ (* 1/2 (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (* 1/2 (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 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 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (- (* -2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2)))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (- (+ (* -2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (* lambda1 (- (+ (* -1 (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2))))) (/ (pow (sin (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2))))) (+ (* 1/2 (/ (pow (cos (neg lambda2)) 3) (pow (- (cos phi1) (cos (neg lambda2))) 2))) (/ (* (sin (neg lambda2)) (- (* -2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (- (cos phi1) (cos (neg lambda2)))))))) (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2)))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (- (+ (* -2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (* lambda1 (- (+ (* -1 (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2))))) (+ (* lambda1 (- (+ (* 1/3 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (+ (* -1/6 (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (pow (- (cos phi1) (cos (neg lambda2))) 2))) (+ (* 1/2 (/ (* (cos (neg lambda2)) (- (* -2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (sin (neg lambda2)) (- (+ (* -1 (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2))))) (/ (pow (sin (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2))))) (+ (* 1/2 (/ (pow (cos (neg lambda2)) 3) (pow (- (cos phi1) (cos (neg lambda2))) 2))) (/ (* (sin (neg lambda2)) (- (* -2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (- (cos phi1) (cos (neg lambda2))))))) (- (cos phi1) (cos (neg lambda2)))))))) (/ (pow (sin (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2)))))) (+ (* 1/2 (/ (pow (cos (neg lambda2)) 3) (pow (- (cos phi1) (cos (neg lambda2))) 2))) (/ (* (sin (neg lambda2)) (- (* -2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (- (cos phi1) (cos (neg lambda2)))))))) (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) #s(hole binary64 (+ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (pow (cos phi1) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (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 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (pow (cos phi1) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ (* lambda1 (- (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* lambda1 (- (* 1/2 (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))) (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* lambda1 (- (+ (* 1/2 (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2))))) (* lambda1 (- (* -1/6 (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2))))) (* (pow (cos phi2) 2) (+ (* -1 (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/6 (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))) (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda1 (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2))))) (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda1 (+ (* 1/2 (* lambda1 (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))))) (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))))) (* 1/2 (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2))))))) (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))))) (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* -1 (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/6 (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* 2 (* lambda1 (* (cos phi2) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda1 (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* lambda1 (+ (* (cos phi2) (* (cos (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda1 (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* lambda1 (+ (* lambda1 (+ (* -1/3 (* (cos phi2) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (+ (* (cos phi2) (* (cos (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))
#s(approx (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2) #s(hole binary64 (pow (- (cos phi1) (cos phi2)) 2)))
#s(approx (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2) #s(hole binary64 (+ (* (pow lambda1 2) (* (cos phi2) (- (cos phi1) (cos phi2)))) (pow (- (cos phi1) (cos phi2)) 2))))
#s(approx (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2) #s(hole binary64 (+ (* (pow lambda1 2) (+ (* (cos phi2) (- (cos phi1) (cos phi2))) (* (pow lambda1 2) (+ (* -1/12 (* (cos phi2) (- (cos phi1) (cos phi2)))) (* 1/4 (pow (cos phi2) 2)))))) (pow (- (cos phi1) (cos phi2)) 2))))
#s(approx (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2) #s(hole binary64 (+ (* (pow lambda1 2) (+ (* (cos phi2) (- (cos phi1) (cos phi2))) (* (pow lambda1 2) (+ (* -1/12 (* (cos phi2) (- (cos phi1) (cos phi2)))) (+ (* 1/4 (pow (cos phi2) 2)) (* (pow lambda1 2) (+ (* -1/24 (pow (cos phi2) 2)) (* 1/360 (* (cos phi2) (- (cos phi1) (cos phi2))))))))))) (pow (- (cos phi1) (cos phi2)) 2))))
#s(approx (- (cos phi1) (* (cos lambda1) (cos phi2))) #s(hole binary64 (- (cos phi1) (cos phi2))))
#s(approx (- (cos phi1) (* (cos lambda1) (cos phi2))) #s(hole binary64 (- (+ (cos phi1) (* 1/2 (* (pow lambda1 2) (cos phi2)))) (cos phi2))))
#s(approx (- (cos phi1) (* (cos lambda1) (cos phi2))) #s(hole binary64 (- (+ (cos phi1) (* (pow lambda1 2) (- (* -1/24 (* (pow lambda1 2) (cos phi2))) (* -1/2 (cos phi2))))) (cos phi2))))
#s(approx (- (cos phi1) (* (cos lambda1) (cos phi2))) #s(hole binary64 (- (+ (cos phi1) (* (pow lambda1 2) (- (* (pow lambda1 2) (- (* 1/720 (* (pow lambda1 2) (cos phi2))) (* 1/24 (cos phi2)))) (* -1/2 (cos phi2))))) (cos phi2))))
#s(approx (* (cos lambda1) (cos phi2)) #s(hole binary64 (cos phi2)))
#s(approx (* (cos lambda1) (cos phi2)) #s(hole binary64 (+ (cos phi2) (* -1/2 (* (pow lambda1 2) (cos phi2))))))
#s(approx (* (cos lambda1) (cos phi2)) #s(hole binary64 (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda1 2) (cos phi2))))))))
#s(approx (* (cos lambda1) (cos phi2)) #s(hole binary64 (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (cos phi2))) (* 1/24 (cos phi2)))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #s(hole binary64 (- (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))))
#s(approx (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #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 (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #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 (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #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 (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #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 (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (* 2 (log (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (+ (* -2 (/ (* lambda1 (sin (neg lambda2))) (cos (neg lambda2)))) (* 2 (log (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (+ (* 2 (log (* (cos phi2) (cos (neg lambda2))))) (* lambda1 (+ (* -2 (/ (sin (neg lambda2)) (cos (neg lambda2)))) (* lambda1 (- (* -1 (/ (pow (sin (neg lambda2)) 2) (pow (cos (neg lambda2)) 2))) 1)))))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (+ (* 2 (log (* (cos phi2) (cos (neg lambda2))))) (* lambda1 (+ (* -2 (/ (sin (neg lambda2)) (cos (neg lambda2)))) (* lambda1 (- (+ (* -1 (/ (pow (sin (neg lambda2)) 2) (pow (cos (neg lambda2)) 2))) (* 1/3 (* lambda1 (+ (* -3 (/ (sin (neg lambda2)) (cos (neg lambda2)))) (+ (* -2 (/ (pow (sin (neg lambda2)) 3) (pow (cos (neg lambda2)) 3))) (/ (sin (neg lambda2)) (cos (neg lambda2)))))))) 1)))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (log (* (cos phi2) (cos (neg lambda2))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (+ (log (* (cos phi2) (cos (neg lambda2)))) (* -1 (/ (* lambda1 (sin (neg lambda2))) (cos (neg lambda2)))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (+ (log (* (cos phi2) (cos (neg lambda2)))) (* lambda1 (+ (* -1 (/ (sin (neg lambda2)) (cos (neg lambda2)))) (* 1/2 (* lambda1 (- (* -1 (/ (pow (sin (neg lambda2)) 2) (pow (cos (neg lambda2)) 2))) 1))))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (+ (log (* (cos phi2) (cos (neg lambda2)))) (* lambda1 (+ (* -1 (/ (sin (neg lambda2)) (cos (neg lambda2)))) (* lambda1 (+ (* 1/6 (* lambda1 (+ (* -3 (/ (sin (neg lambda2)) (cos (neg lambda2)))) (+ (* -2 (/ (pow (sin (neg lambda2)) 3) (pow (cos (neg lambda2)) 3))) (/ (sin (neg lambda2)) (cos (neg lambda2))))))) (* 1/2 (- (* -1 (/ (pow (sin (neg lambda2)) 2) (pow (cos (neg lambda2)) 2))) 1)))))))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (* -1 (pow lambda2 3))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (- (pow lambda1 3) (pow lambda2 3))))
#s(approx (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) #s(hole binary64 (* -1 (pow lambda2 3))))
#s(approx (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) #s(hole binary64 (+ (* -1 (pow lambda2 3)) (pow lambda1 3))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (pow lambda2 2)))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 lambda2) (pow lambda2 2))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ lambda1 lambda2)) (pow lambda2 2))))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) #s(hole binary64 (pow lambda2 2)))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) #s(hole binary64 (+ (* lambda1 lambda2) (pow lambda2 2))))
#s(approx (* lambda1 lambda2) #s(hole binary64 (* lambda1 lambda2)))
#s(approx (pow lambda1 3) #s(hole binary64 (pow lambda1 3)))
#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 (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 (* (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 (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ 1 (* (cos lambda2) (cos phi2)))))
#s(approx (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ 1 (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2))))))
#s(approx (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ 1 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))))
#s(approx (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ 1 (+ (* 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 (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 3)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) #s(hole binary64 (+ (pow lambda1 3) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 3))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 3)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (+ (* -1 (* lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (+ (* lambda1 (- lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) #s(hole binary64 (* -1 (* lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) #s(hole binary64 (* lambda1 (- 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))) lambda1) #s(hole binary64 (* lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (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 (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) #s(hole binary64 (* -1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2))))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) #s(hole binary64 (- (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2))))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) #s(hole binary64 (* -1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) #s(hole binary64 (- lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) #s(hole binary64 (* -1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) #s(hole binary64 (+ lambda1 (* -1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) #s(hole binary64 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))))
#s(approx (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) #s(hole binary64 (/ (+ lambda1 (* -1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) lambda1)))
#s(approx (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) #s(hole binary64 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))))
#s(approx (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) #s(hole binary64 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#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))) lambda1) 1) lambda1) #s(hole binary64 lambda1))
#s(approx (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) 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))) lambda1) 1) #s(hole binary64 1))
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) #s(hole binary64 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))))
#s(approx (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1) #s(hole binary64 1))
#s(approx (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1) #s(hole binary64 (+ 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 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (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 (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (- lambda1 lambda2)))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) lambda1) #s(hole binary64 lambda1))
#s(approx (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) lambda1) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))) lambda1)))))
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) #s(hole binary64 1))
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) #s(hole binary64 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))) lambda1))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 lambda1))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* lambda1 (- (+ 1 (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda2 2)) (pow lambda1 2)))) (/ lambda2 lambda1)))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* lambda1 (- (+ 1 (/ (* lambda2 (+ (* -1 (pow lambda2 2)) (pow lambda2 2))) (pow lambda1 3))) (+ (* -1 (/ (pow lambda2 2) (pow lambda1 2))) (+ (/ lambda2 lambda1) (/ (pow lambda2 2) (pow lambda1 2))))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos phi1) (cos (- lambda1 lambda2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) lambda1)))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))) lambda1)))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))))
#s(approx (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (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) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))) lambda1)))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) #s(hole binary64 (* lambda1 (cos (neg lambda2)))))
#s(approx (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) #s(hole binary64 (* lambda1 (+ (cos (neg lambda2)) (/ (sin (neg lambda2)) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))) lambda1)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))
#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 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) lambda1)))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) #s(hole binary64 (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (cos (- lambda1 lambda2)))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) #s(hole binary64 (* -1 (* lambda1 (sin (neg lambda2))))))
#s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) #s(hole binary64 (* lambda1 (+ (* -1 (sin (neg lambda2))) (/ (cos (neg lambda2)) lambda1)))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (cos lambda1) #s(hole binary64 (cos lambda1)))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (sin (+ phi2 (* 1/2 (PI)))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (* (sin (+ phi2 (* 1/2 (PI)))) (sin (- lambda1 lambda2)))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (* lambda1 (cos lambda2))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (* lambda1 (+ (cos lambda2) (* -1 (/ (sin lambda2) lambda1))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) #s(hole binary64 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) #s(hole binary64 lambda1))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) #s(hole binary64 (* lambda1 (- (+ 1 (* 1/2 (/ (PI) lambda1))) (/ lambda2 lambda1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) lambda1)))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (pow (cos (- lambda1 lambda2)) 2) #s(hole binary64 (pow (cos (- lambda1 lambda2)) 2)))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (cos phi1) (cos (- lambda1 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 (sin lambda1) #s(hole binary64 (sin 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))
#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 (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) #s(hole binary64 (* -1/2 (* (pow lambda1 2) (cos (neg lambda2))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1 (/ (sin (neg lambda2)) lambda1)) (* -1/2 (cos (neg lambda2)))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) #s(hole binary64 (* (pow lambda1 2) (- (+ (* -1/2 (cos (neg lambda2))) (/ (cos (neg lambda2)) (pow lambda1 2))) (/ (sin (neg lambda2)) lambda1)))))
#s(approx (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))) #s(hole binary64 (* -1/2 (* (pow lambda1 2) (cos (neg lambda2))))))
#s(approx (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1 (/ (sin (neg lambda2)) lambda1)) (* -1/2 (cos (neg lambda2)))))))
#s(approx (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))) #s(hole binary64 (* -1/2 (* lambda1 (cos (neg lambda2))))))
#s(approx (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))) #s(hole binary64 (* lambda1 (+ (* -1 (/ (sin (neg lambda2)) lambda1)) (* -1/2 (cos (neg lambda2)))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) #s(hole binary64 (* 1/6 (* (pow lambda1 3) (sin (neg lambda2))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) #s(hole binary64 (* (pow lambda1 3) (+ (* -1/2 (/ (cos (neg lambda2)) lambda1)) (* 1/6 (sin (neg lambda2)))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) #s(hole binary64 (* (pow lambda1 3) (+ (* -1 (/ (sin (neg lambda2)) (pow lambda1 2))) (+ (* -1/2 (/ (cos (neg lambda2)) lambda1)) (* 1/6 (sin (neg lambda2))))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) #s(hole binary64 (* (pow lambda1 3) (- (+ (* -1/2 (/ (cos (neg lambda2)) lambda1)) (+ (* 1/6 (sin (neg lambda2))) (/ (cos (neg lambda2)) (pow lambda1 3)))) (/ (sin (neg lambda2)) (pow lambda1 2))))))
#s(approx (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) #s(hole binary64 (* 1/6 (* (pow lambda1 3) (sin (neg lambda2))))))
#s(approx (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) #s(hole binary64 (* (pow lambda1 3) (+ (* -1/2 (/ (cos (neg lambda2)) lambda1)) (* 1/6 (sin (neg lambda2)))))))
#s(approx (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) #s(hole binary64 (* (pow lambda1 3) (+ (* -1 (/ (sin (neg lambda2)) (pow lambda1 2))) (+ (* -1/2 (/ (cos (neg lambda2)) lambda1)) (* 1/6 (sin (neg lambda2))))))))
#s(approx (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))) #s(hole binary64 (* 1/6 (* (pow lambda1 2) (sin (neg lambda2))))))
#s(approx (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1/2 (/ (cos (neg lambda2)) lambda1)) (* 1/6 (sin (neg lambda2)))))))
#s(approx (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1 (/ (sin (neg lambda2)) (pow lambda1 2))) (+ (* -1/2 (/ (cos (neg lambda2)) lambda1)) (* 1/6 (sin (neg lambda2))))))))
#s(approx (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) #s(hole binary64 (* 1/6 (* (pow lambda1 2) (sin (neg lambda2))))))
#s(approx (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1/2 (/ (cos (neg lambda2)) lambda1)) (* 1/6 (sin (neg lambda2)))))))
#s(approx (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2))))) #s(hole binary64 (* 1/6 (* lambda1 (sin (neg lambda2))))))
#s(approx (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2))))) #s(hole binary64 (* lambda1 (+ (* -1/2 (/ (cos (neg lambda2)) lambda1)) (* 1/6 (sin (neg lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 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 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) 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 (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (* lambda1 (* (cos phi2) (sin lambda2)))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (* lambda1 (+ (* (cos phi2) (sin lambda2)) (/ (* (cos lambda2) (cos phi2)) lambda1)))))
#s(approx (+ (cos lambda2) (* lambda1 (sin lambda2))) #s(hole binary64 (* lambda1 (sin lambda2))))
#s(approx (+ (cos lambda2) (* lambda1 (sin lambda2))) #s(hole binary64 (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1)))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (* lambda1 (sin (+ lambda2 (* 1/2 (PI)))))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (* lambda1 (+ (sin (+ lambda2 (* 1/2 (PI)))) (* -1 (/ (sin lambda2) lambda1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) #s(hole binary64 (* lambda1 (cos lambda2))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) #s(hole binary64 (* lambda1 (+ (cos lambda2) (* -1 (/ (sin lambda2) lambda1))))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) #s(hole binary64 (* lambda1 (+ 1 (* -1/2 (pow lambda2 2))))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) #s(hole binary64 (* lambda1 (+ 1 (+ (* -1/2 (pow lambda2 2)) (/ (* lambda2 (- (* 1/6 (pow lambda2 2)) 1)) lambda1))))))
#s(approx (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)) #s(hole binary64 (* -1/2 (* lambda1 (pow lambda2 2)))))
#s(approx (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)) #s(hole binary64 (* lambda1 (+ (* -1/2 (pow lambda2 2)) (/ (* lambda2 (- (* 1/6 (pow lambda2 2)) 1)) lambda1)))))
#s(approx (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1) #s(hole binary64 (* -1/2 (* lambda1 lambda2))))
#s(approx (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1) #s(hole binary64 (* lambda1 (- (+ (* -1/2 lambda2) (* 1/6 (/ (pow lambda2 2) lambda1))) (/ 1 lambda1)))))
#s(approx (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) #s(hole binary64 (* -1/2 (* lambda1 lambda2))))
#s(approx (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) #s(hole binary64 (* lambda1 (+ (* -1/2 lambda2) (* 1/6 (/ (pow lambda2 2) lambda1))))))
#s(approx (+ (* -1/2 lambda1) (* 1/6 lambda2)) #s(hole binary64 (* -1/2 lambda1)))
#s(approx (+ (* -1/2 lambda1) (* 1/6 lambda2)) #s(hole binary64 (* lambda1 (- (* 1/6 (/ lambda2 lambda1)) 1/2))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (- (* lambda1 (cos lambda2)) (sin lambda2)) #s(hole binary64 (* lambda1 (cos lambda2))))
#s(approx (- (* lambda1 (cos lambda2)) (sin lambda2)) #s(hole binary64 (* lambda1 (+ (cos lambda2) (* -1 (/ (sin lambda2) lambda1))))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) #s(hole binary64 (* 1/2 (* (pow lambda1 2) (sin lambda2)))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) #s(hole binary64 (* (pow lambda1 2) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))))))
#s(approx (* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))) #s(hole binary64 (* 1/2 (* (pow lambda1 2) (sin lambda2)))))
#s(approx (* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))) #s(hole binary64 (* (pow lambda1 2) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))))
#s(approx (* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))))))
#s(approx (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) #s(hole binary64 (* 1/2 (sin lambda2))))
#s(approx (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) #s(hole binary64 (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))))
#s(approx (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) #s(hole binary64 (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))))
#s(approx (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)) #s(hole binary64 (* 1/2 (sin lambda2))))
#s(approx (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)) #s(hole binary64 (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* -1/2 (* (pow lambda1 2) (cos lambda2)))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (/ (sin lambda2) lambda1)))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (+ (/ (cos lambda2) (pow lambda1 2)) (/ (sin lambda2) lambda1))))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (* -1/2 (* lambda1 (cos lambda2)))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (* lambda1 (+ (* -1/2 (cos lambda2)) (/ (sin lambda2) lambda1)))))
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) #s(hole binary64 (* 1/2 (* (pow lambda1 2) (sin lambda2)))))
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) #s(hole binary64 (* (pow lambda1 2) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) #s(hole binary64 (* 1/2 (* lambda1 (sin lambda2)))))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) #s(hole binary64 (* lambda1 (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))))
#s(approx (* lambda1 (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) #s(hole binary64 (* 1/2 (* lambda1 (sin lambda2)))))
#s(approx (* lambda1 (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) #s(hole binary64 (* lambda1 (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (cos phi2)))))
#s(approx (+ 1 (* -1/2 (* lambda1 lambda1))) #s(hole binary64 (* -1/2 (pow lambda1 2))))
#s(approx (+ 1 (* -1/2 (* lambda1 lambda1))) #s(hole binary64 (* (pow lambda1 2) (- (/ 1 (pow lambda1 2)) 1/2))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) #s(hole binary64 (* 1/24 (pow lambda1 4))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) #s(hole binary64 (* (pow lambda1 4) (- 1/24 (* 1/2 (/ 1 (pow lambda1 2)))))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) #s(hole binary64 (* (pow lambda1 4) (- (+ 1/24 (/ 1 (pow lambda1 4))) (* 1/2 (/ 1 (pow lambda1 2)))))))
#s(approx (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2)) #s(hole binary64 (* 1/24 (pow lambda1 4))))
#s(approx (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2)) #s(hole binary64 (* (pow lambda1 4) (- 1/24 (* 1/2 (/ 1 (pow lambda1 2)))))))
#s(approx (- (* 1/24 (* lambda1 lambda1)) 1/2) #s(hole binary64 (* 1/24 (pow lambda1 2))))
#s(approx (- (* 1/24 (* lambda1 lambda1)) 1/2) #s(hole binary64 (* (pow lambda1 2) (- 1/24 (* 1/2 (/ 1 (pow lambda1 2)))))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) #s(hole binary64 (* -1/720 (pow lambda1 6))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) #s(hole binary64 (* (pow lambda1 6) (- (* 1/24 (/ 1 (pow lambda1 2))) 1/720))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) #s(hole binary64 (* (pow lambda1 6) (- (* 1/24 (/ 1 (pow lambda1 2))) (+ 1/720 (/ 1/2 (pow lambda1 4)))))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) #s(hole binary64 (* (pow lambda1 6) (- (+ (* 1/24 (/ 1 (pow lambda1 2))) (/ 1 (pow lambda1 6))) (+ 1/720 (/ 1/2 (pow lambda1 4)))))))
#s(approx (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) #s(hole binary64 (* -1/720 (pow lambda1 6))))
#s(approx (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) #s(hole binary64 (* (pow lambda1 6) (- (* 1/24 (/ 1 (pow lambda1 2))) 1/720))))
#s(approx (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) #s(hole binary64 (* (pow lambda1 6) (- (* 1/24 (/ 1 (pow lambda1 2))) (+ 1/720 (/ 1/2 (pow lambda1 4)))))))
#s(approx (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) #s(hole binary64 (* -1/720 (pow lambda1 4))))
#s(approx (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) #s(hole binary64 (* (pow lambda1 4) (- (* 1/24 (/ 1 (pow lambda1 2))) 1/720))))
#s(approx (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) #s(hole binary64 (* (pow lambda1 4) (- (* 1/24 (/ 1 (pow lambda1 2))) (+ 1/720 (/ 1/2 (pow lambda1 4)))))))
#s(approx (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) #s(hole binary64 (* -1/720 (pow lambda1 4))))
#s(approx (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) #s(hole binary64 (* (pow lambda1 4) (- (* 1/24 (/ 1 (pow lambda1 2))) 1/720))))
#s(approx (+ 1/24 (* -1/720 (* lambda1 lambda1))) #s(hole binary64 (* -1/720 (pow lambda1 2))))
#s(approx (+ 1/24 (* -1/720 (* lambda1 lambda1))) #s(hole binary64 (* (pow lambda1 2) (- (* 1/24 (/ 1 (pow lambda1 2))) 1/720))))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) #s(hole binary64 lambda1))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))))
#s(approx (* lambda1 (- (pow lambda2 -1) (pow lambda1 -1))) #s(hole binary64 (/ lambda1 lambda2)))
#s(approx (* lambda1 (- (pow lambda2 -1) (pow lambda1 -1))) #s(hole binary64 (* lambda1 (- (/ 1 lambda2) (/ 1 lambda1)))))
#s(approx (- (pow lambda2 -1) (pow lambda1 -1)) #s(hole binary64 (/ 1 lambda2)))
#s(approx (- (pow lambda2 -1) (pow lambda1 -1)) #s(hole binary64 (- (/ 1 lambda2) (/ 1 lambda1))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 lambda1))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* lambda1 (- (+ 1 (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda2 2)) (pow lambda1 2)))) (/ lambda2 lambda1)))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* lambda1 (- (+ 1 (/ (* lambda2 (+ (* -1 (pow lambda2 2)) (pow lambda2 2))) (pow lambda1 3))) (+ (* -1 (/ (pow lambda2 2) (pow lambda1 2))) (+ (/ lambda2 lambda1) (/ (pow lambda2 2) (pow lambda1 2))))))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (/ lambda1 lambda2)))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (* lambda1 (- (/ 1 lambda2) (/ 1 lambda1)))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (* lambda1 (- (+ (* -1 (/ (+ lambda2 (* -1 lambda2)) (pow lambda1 2))) (/ 1 lambda2)) (/ 1 lambda1)))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (* lambda1 (- (+ (/ 1 lambda2) (/ (* lambda2 (+ lambda2 (* -1 lambda2))) (pow lambda1 3))) (+ (* -1 (/ lambda2 (pow lambda1 2))) (+ (/ 1 lambda1) (/ lambda2 (pow lambda1 2))))))))
#s(approx (- (pow (/ lambda1 lambda2) 3) 1) #s(hole binary64 (/ (pow lambda1 3) (pow lambda2 3))))
#s(approx (- (pow (/ lambda1 lambda2) 3) 1) #s(hole binary64 (* (pow lambda1 3) (- (/ 1 (pow lambda2 3)) (/ 1 (pow lambda1 3))))))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) #s(hole binary64 (/ (pow lambda1 2) (pow lambda2 2))))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) #s(hole binary64 (* (pow lambda1 2) (+ (/ 1 (* lambda1 lambda2)) (/ 1 (pow lambda2 2))))))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) #s(hole binary64 (* (pow lambda1 2) (+ (/ 1 (* lambda1 lambda2)) (+ (/ 1 (pow lambda1 2)) (/ 1 (pow lambda2 2)))))))
#s(approx (+ 1 (* (/ lambda1 lambda2) 1)) #s(hole binary64 (/ lambda1 lambda2)))
#s(approx (+ 1 (* (/ lambda1 lambda2) 1)) #s(hole binary64 (* lambda1 (+ (/ 1 lambda1) (/ 1 lambda2)))))
#s(approx (* lambda1 (+ (/ 1 lambda1) (/ 1 lambda2))) #s(hole binary64 (/ lambda1 lambda2)))
#s(approx (* lambda1 (+ (/ 1 lambda1) (/ 1 lambda2))) #s(hole binary64 (* lambda1 (+ (/ 1 lambda1) (/ 1 lambda2)))))
#s(approx (+ (/ 1 lambda1) (/ 1 lambda2)) #s(hole binary64 (/ 1 lambda2)))
#s(approx (+ (/ 1 lambda1) (/ 1 lambda2)) #s(hole binary64 (+ (/ 1 lambda1) (/ 1 lambda2))))
#s(approx (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) #s(hole binary64 lambda1))
#s(approx (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))))
#s(approx (+ 1 (* -1 (/ lambda2 lambda1))) #s(hole binary64 1))
#s(approx (+ 1 (* -1 (/ lambda2 lambda1))) #s(hole binary64 (+ 1 (* -1 (/ lambda2 lambda1)))))
#s(approx (+ 1 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) #s(hole binary64 (+ 1 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))
#s(approx (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) #s(hole binary64 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))
#s(approx (- (+ lambda1 (* 1/2 (PI))) lambda2) #s(hole binary64 lambda1))
#s(approx (- (+ lambda1 (* 1/2 (PI))) lambda2) #s(hole binary64 (* lambda1 (- (+ 1 (* 1/2 (/ (PI) lambda1))) (/ lambda2 lambda1)))))
#s(approx (+ lambda1 (* 1/2 (PI))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (* 1/2 (PI))) #s(hole binary64 (* lambda1 (+ 1 (* 1/2 (/ (PI) lambda1))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (/ (- 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #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 (/ (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 3)) #s(hole binary64 (+ 1 (pow (cos (- lambda1 lambda2)) 3))))
#s(approx (pow (cos (- lambda1 lambda2)) 3) #s(hole binary64 (pow (cos (- lambda1 lambda2)) 3)))
#s(approx (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (+ 1 (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) lambda1)))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))
#s(approx (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))
#s(approx (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) #s(hole binary64 (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) #s(hole binary64 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) lambda1)))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) #s(hole binary64 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))))
#s(approx (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) #s(hole binary64 (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))))
#s(approx (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) #s(hole binary64 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))))
#s(approx (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) #s(hole binary64 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))
#s(approx (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) #s(hole binary64 (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))
#s(approx (pow (cos (- lambda1 lambda2)) 4) #s(hole binary64 (pow (cos (- lambda1 lambda2)) 4)))
#s(approx (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) #s(hole binary64 (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))
#s(approx (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) #s(hole binary64 (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))))))
#s(approx (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) #s(hole binary64 (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)))))
#s(approx (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) #s(hole binary64 (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))))
#s(approx (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) #s(hole binary64 (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)))
#s(approx (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) #s(hole binary64 (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))))
#s(approx (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) #s(hole binary64 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))))
#s(approx (pow (cos (- lambda1 lambda2)) 6) #s(hole binary64 (pow (cos (- lambda1 lambda2)) 6)))
#s(approx (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))
#s(approx (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) #s(hole binary64 (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2)))
#s(approx (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (/ (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (/ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (/ (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (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 (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) #s(hole binary64 (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (cos (- lambda1 lambda2)))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (* lambda1 (sin lambda2))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1)))))
#s(approx (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2)))) #s(hole binary64 (* lambda1 lambda2)))
#s(approx (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2)))) #s(hole binary64 (* lambda1 (+ lambda2 (+ (* -1/2 (/ (pow lambda2 2) lambda1)) (/ 1 lambda1))))))
#s(approx (* lambda2 (+ lambda1 (* -1/2 lambda2))) #s(hole binary64 (* lambda1 lambda2)))
#s(approx (* lambda2 (+ lambda1 (* -1/2 lambda2))) #s(hole binary64 (* lambda1 (+ lambda2 (* -1/2 (/ (pow lambda2 2) lambda1))))))
#s(approx (+ lambda1 (* -1/2 lambda2)) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (* -1/2 lambda2)) #s(hole binary64 (* lambda1 (+ 1 (* -1/2 (/ lambda2 lambda1))))))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) #s(hole binary64 (* lambda1 (sin lambda2))))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) #s(hole binary64 (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1)))))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) #s(hole binary64 (sin lambda2)))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) #s(hole binary64 (+ (sin lambda2) (/ (cos lambda2) lambda1))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) #s(hole binary64 (* -1/2 (* (pow lambda1 2) (cos lambda2)))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (/ (sin lambda2) lambda1)))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (+ (/ (cos lambda2) (pow lambda1 2)) (/ (sin lambda2) lambda1))))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) #s(hole binary64 (* -1/2 (cos lambda2))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) #s(hole binary64 (+ (* -1/2 (cos lambda2)) (/ (sin lambda2) lambda1))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) #s(hole binary64 (+ (* -1/2 (cos lambda2)) (+ (/ (cos lambda2) (pow lambda1 2)) (/ (sin lambda2) lambda1)))))
#s(approx (- (/ 1 (pow lambda1 2)) 1/2) #s(hole binary64 -1/2))
#s(approx (- (/ 1 (pow lambda1 2)) 1/2) #s(hole binary64 (- (/ 1 (pow lambda1 2)) 1/2)))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) #s(hole binary64 (* -1 (/ (sin lambda2) lambda1))))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) #s(hole binary64 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) #s(hole binary64 (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1)))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) #s(hole binary64 (+ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (pow (cos phi1) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (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 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (pow (cos phi1) 3))))
#s(approx (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (pow (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))
#s(approx (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2) #s(hole binary64 (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))
#s(approx (- (cos phi1) (* (cos lambda1) (cos phi2))) #s(hole binary64 (- (cos phi1) (* (cos lambda1) (cos phi2)))))
#s(approx (* (cos lambda1) (cos phi2)) #s(hole binary64 (* (cos lambda1) (cos phi2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #s(hole binary64 (- (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (* 2 (log (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (log (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (pow lambda1 3)))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (* (pow lambda1 3) (+ 1 (* -1 (/ (pow lambda2 3) (pow lambda1 3)))))))
#s(approx (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) #s(hole binary64 (pow lambda1 3)))
#s(approx (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) #s(hole binary64 (* (pow lambda1 3) (+ 1 (* -1 (/ (pow lambda2 3) (pow lambda1 3)))))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (pow lambda1 2)))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (* (pow lambda1 2) (+ 1 (/ lambda2 lambda1)))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (* (pow lambda1 2) (+ 1 (+ (/ lambda2 lambda1) (/ (pow lambda2 2) (pow lambda1 2)))))))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) #s(hole binary64 (* lambda1 lambda2)))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) #s(hole binary64 (* lambda1 (+ lambda2 (/ (pow lambda2 2) 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))
#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 (* (cos lambda1) (sin lambda2)) #s(hole binary64 (* (cos lambda1) (sin lambda2))))
#s(approx (+ 1 (* (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 (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 lambda1))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (* lambda1 (- (+ 1 (* -1 (/ (+ (* -1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)) (pow lambda1 2)))) (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (* lambda1 (- (+ 1 (* -1 (/ (* (+ (* -1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (pow lambda1 3)))) (+ (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) (+ (* -1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2))) (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2))))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) #s(hole binary64 (pow lambda1 3)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) #s(hole binary64 (* (pow lambda1 3) (+ 1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 3) (pow lambda1 3))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (pow lambda1 2)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (* (pow lambda1 2) (- (+ 1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2))) (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) #s(hole binary64 (pow lambda1 2)))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))))))
#s(approx (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) #s(hole binary64 lambda1))
#s(approx (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) #s(hole binary64 (pow lambda1 2)))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)))))))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) #s(hole binary64 lambda1))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))))))
#s(approx (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) #s(hole binary64 lambda1))
#s(approx (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))))))
#s(approx (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) #s(hole binary64 1))
#s(approx (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) #s(hole binary64 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #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))) lambda1) 1) 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))) lambda1) 1) #s(hole binary64 (+ 1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1))))
#s(approx (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1) #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 (* (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 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (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 (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) #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))) #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 (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) lambda1) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))) lambda1)) 1)))))
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) #s(hole binary64 (+ 1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))) lambda1))))
#s(approx (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) #s(hole binary64 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))) lambda1)))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (cos (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (+ (* -1 lambda2) (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda2 2)) lambda1))) lambda1)) 1)))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (+ (* -1 lambda2) (* -1 (/ (+ (* -1 (/ (* lambda2 (+ (* -1 (pow lambda2 2)) (pow lambda2 2))) lambda1)) (+ (* -1 (pow lambda2 2)) (pow lambda2 2))) lambda1))) lambda1)) 1)))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (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))))) (* (cos (* 1/2 (PI))) (sin phi1))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (+ (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi1) (+ (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (* (cos (* 1/2 (PI))) (sin phi1)))))
#s(approx (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (sin (neg (+ lambda2 (* -1 lambda1)))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (sin (neg (+ lambda2 (* -1 lambda1)))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (* (sin (neg (+ lambda2 (* -1 lambda1)))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (cos (neg lambda2))) (* -1 (/ (sin (neg lambda2)) lambda1)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (cos (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))
#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 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI))))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) #s(hole binary64 (+ 1 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) #s(hole binary64 (* -1 (* lambda1 (+ (sin (neg lambda2)) (* -1 (/ (cos (neg lambda2)) lambda1)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (neg (+ lambda2 (* -1 lambda1)))) (* -1/2 (* (pow phi2 2) (sin (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))))
#s(approx (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (cos lambda2)) (/ (sin lambda2) lambda1))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (sin (- (* 1/2 (PI)) (+ lambda2 (* -1 lambda1))))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (+ lambda2 (* -1 lambda1))))))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (- (* 1/2 (PI)) lambda2) lambda1)) 1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (/ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (/ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (/ (* (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 (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (- (pow (cos phi1) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (- (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (pow (cos phi1) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))))
#s(approx (pow (cos (- lambda1 lambda2)) 2) #s(hole binary64 (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (cos phi1) (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 (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1 (/ (+ (sin (neg lambda2)) (* -1 (/ (cos (neg lambda2)) lambda1))) lambda1)) (* -1/2 (cos (neg lambda2)))))))
#s(approx (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))) #s(hole binary64 (* -1 (* lambda1 (+ (* 1/2 (cos (neg lambda2))) (/ (sin (neg lambda2)) lambda1))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) #s(hole binary64 (* -1 (* (pow lambda1 3) (+ (* -1/6 (sin (neg lambda2))) (* 1/2 (/ (cos (neg lambda2)) lambda1)))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) #s(hole binary64 (* -1 (* (pow lambda1 3) (+ (* -1 (/ (+ (* -1 (/ (sin (neg lambda2)) lambda1)) (* -1/2 (cos (neg lambda2)))) lambda1)) (* -1/6 (sin (neg lambda2))))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) #s(hole binary64 (* -1 (* (pow lambda1 3) (+ (* -1 (/ (+ (* -1 (/ (+ (sin (neg lambda2)) (* -1 (/ (cos (neg lambda2)) lambda1))) lambda1)) (* -1/2 (cos (neg lambda2)))) lambda1)) (* -1/6 (sin (neg lambda2))))))))
#s(approx (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) #s(hole binary64 (* -1 (* (pow lambda1 3) (+ (* -1/6 (sin (neg lambda2))) (* 1/2 (/ (cos (neg lambda2)) lambda1)))))))
#s(approx (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) #s(hole binary64 (* -1 (* (pow lambda1 3) (+ (* -1 (/ (+ (* -1 (/ (sin (neg lambda2)) lambda1)) (* -1/2 (cos (neg lambda2)))) lambda1)) (* -1/6 (sin (neg lambda2))))))))
#s(approx (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1 (/ (+ (* 1/2 (cos (neg lambda2))) (/ (sin (neg lambda2)) lambda1)) lambda1)) (* 1/6 (sin (neg lambda2)))))))
#s(approx (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2))))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1/6 (sin (neg lambda2))) (* 1/2 (/ (cos (neg lambda2)) lambda1)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (* (cos phi2) (sin lambda2))) (* -1 (/ (* (cos lambda2) (cos phi2)) lambda1)))))))
#s(approx (+ (cos lambda2) (* lambda1 (sin lambda2))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1)))))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (sin (+ lambda2 (* 1/2 (PI))))) (/ (sin lambda2) lambda1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (sin (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (sin (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (cos lambda2)) (/ (sin lambda2) lambda1))))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) #s(hole binary64 (* -1 (* lambda1 (- (* 1/2 (pow lambda2 2)) 1)))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) #s(hole binary64 (* -1 (* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* 1/6 (pow lambda2 2)) 1)) lambda1)) (* 1/2 (pow lambda2 2))) 1)))))
#s(approx (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (/ (* lambda2 (- (* 1/6 (pow lambda2 2)) 1)) lambda1)) (* 1/2 (pow lambda2 2)))))))
#s(approx (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (/ (- (* 1/6 (pow lambda2 2)) 1) lambda1)) (* 1/2 lambda2))))))
#s(approx (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1/6 (/ (pow lambda2 2) lambda1)) (* 1/2 lambda2))))))
#s(approx (+ (* -1/2 lambda1) (* 1/6 lambda2)) #s(hole binary64 (* -1 (* lambda1 (+ 1/2 (* -1/6 (/ lambda2 lambda1)))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (- (* lambda1 (cos lambda2)) (sin lambda2)) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (cos lambda2)) (/ (sin lambda2) lambda1))))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (cos lambda2)) (/ (sin lambda2) lambda1)) lambda1)) (* 1/2 (sin lambda2))))))
#s(approx (* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (cos lambda2)) (/ (sin lambda2) lambda1)) lambda1)) (* 1/2 (sin lambda2))))))
#s(approx (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (cos lambda2)) (/ (sin lambda2) lambda1)) lambda1)) (* 1/2 (sin lambda2)))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (/ (sin lambda2) lambda1)) (* 1/2 (cos lambda2)))))))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (/ (cos lambda2) lambda1)) (* -1/2 (sin lambda2)))))))
#s(approx (* lambda1 (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (/ (cos lambda2) lambda1)) (* -1/2 (sin lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) #s(hole binary64 (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))))
#s(approx (* lambda1 (- (pow lambda2 -1) (pow lambda1 -1))) #s(hole binary64 (* -1 (* lambda1 (- (/ 1 lambda1) (/ 1 lambda2))))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (+ (* -1 lambda2) (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda2 2)) lambda1))) lambda1)) 1)))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (+ (* -1 lambda2) (* -1 (/ (+ (* -1 (/ (* lambda2 (+ (* -1 (pow lambda2 2)) (pow lambda2 2))) lambda1)) (+ (* -1 (pow lambda2 2)) (pow lambda2 2))) lambda1))) lambda1)) 1)))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (* -1 (* lambda1 (- (/ 1 lambda1) (/ 1 lambda2))))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (- (* -1 (/ (+ lambda2 (* -1 lambda2)) lambda1)) 1) lambda1)) (/ 1 lambda2))))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (- (* -1 (/ (+ lambda2 (+ (* -1 lambda2) (* -1 (/ (* lambda2 (+ lambda2 (* -1 lambda2))) lambda1)))) lambda1)) 1) lambda1)) (/ 1 lambda2))))))
#s(approx (- (pow (/ lambda1 lambda2) 3) 1) #s(hole binary64 (* -1 (* (pow lambda1 3) (- (/ 1 (pow lambda1 3)) (/ 1 (pow lambda2 3)))))))
#s(approx (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) #s(hole binary64 (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))))
#s(approx (+ 1 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) #s(hole binary64 (+ 1 (sin (- (* 1/2 (PI)) (+ lambda2 (* -1 lambda1)))))))
#s(approx (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) #s(hole binary64 (sin (- (* 1/2 (PI)) (+ lambda2 (* -1 lambda1))))))
#s(approx (- (+ lambda1 (* 1/2 (PI))) lambda2) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (- (* 1/2 (PI)) lambda2) lambda1)) 1)))))
#s(approx (+ lambda1 (* 1/2 (PI))) #s(hole binary64 (* -1 (* lambda1 (- (* -1/2 (/ (PI) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (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))))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi1) (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (* (cos (* 1/2 (PI))) (sin phi1)))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (/ (- 1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- 1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (/ (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 3))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (/ (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (+ 1 (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 3)) (- (+ 1 (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 3)) #s(hole binary64 (+ 1 (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 3))))
#s(approx (pow (cos (- lambda1 lambda2)) 3) #s(hole binary64 (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 3)))
#s(approx (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ 1 (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (cos (neg (+ lambda2 (* -1 lambda1)))))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (+ 1 (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* (pow (cos phi2) 2) (* (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) 2))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* (pow (cos phi2) 2) (* (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) 2)))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* (pow (cos phi2) 2) (* (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) 2))))
#s(approx (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (/ (- 1 (+ (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (* (pow (cos phi2) 2) (* (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2) (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))) (pow (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) 2))))
#s(approx (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) #s(hole binary64 (- 1 (+ (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (* (pow (cos phi2) 2) (* (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2) (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (* (pow (cos phi2) 2) (* (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2) (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))))
#s(approx (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* (pow (cos phi2) 2) (* (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2) (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))))
#s(approx (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (* (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2) (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) #s(hole binary64 (pow (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) 2)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (- (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)))) (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4))))) (* (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)))) (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))) (/ (* (pow (cos phi2) 6) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)))) (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)))) (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4))))) (* (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)))) (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))))
#s(approx (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) #s(hole binary64 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)))) (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4))))) (* (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) 2)))))))
#s(approx (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) #s(hole binary64 (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)))) (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4))))) (* (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) 2))))))
#s(approx (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)))) (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))))
#s(approx (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)))) (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) #s(hole binary64 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4))))))
#s(approx (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) #s(hole binary64 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)))))
#s(approx (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) #s(hole binary64 (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4))))
#s(approx (pow (cos (- lambda1 lambda2)) 4) #s(hole binary64 (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)))
#s(approx (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) #s(hole binary64 (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4))))) (* (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) 2)))))
#s(approx (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) #s(hole binary64 (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4))))) (* (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 6))))))
#s(approx (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) #s(hole binary64 (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4))))) (* (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) 2)))))
#s(approx (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) #s(hole binary64 (* (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) 2))))
#s(approx (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) #s(hole binary64 (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) 2)))
#s(approx (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (* -1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)))))
#s(approx (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))))
#s(approx (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) #s(hole binary64 (- 1 (* (pow (cos phi2) 6) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 6)))))
#s(approx (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) #s(hole binary64 (* (pow (cos phi2) 6) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 6))))
#s(approx (pow (cos (- lambda1 lambda2)) 6) #s(hole binary64 (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 6)))
#s(approx (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) 2))))
#s(approx (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) #s(hole binary64 (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)))) 2)))
#s(approx (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (/ (* (pow (cos phi2) 6) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)))) (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) #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 phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))) (/ (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))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (/ (* (pow (cos phi2) 3) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 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)))))))) (/ (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (/ (* (pow (cos phi2) 3) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 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)))))))) (/ (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (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 (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (* (pow (cos phi2) 3) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 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 (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) #s(hole binary64 (* (pow (cos phi2) 3) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 3))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1)))))))
#s(approx (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2)))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 lambda2) (* -1 (/ (+ 1 (* -1/2 (pow lambda2 2))) lambda1)))))))
#s(approx (* lambda2 (+ lambda1 (* -1/2 lambda2))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 lambda2) (* 1/2 (/ (pow lambda2 2) lambda1)))))))
#s(approx (+ lambda1 (* -1/2 lambda2)) #s(hole binary64 (* -1 (* lambda1 (- (* 1/2 (/ lambda2 lambda1)) 1)))))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1)))))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) #s(hole binary64 (* -1 (/ (+ (sin lambda2) (/ (cos lambda2) lambda1)) lambda1))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2) (- (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) #s(hole binary64 (+ (* (pow (cos phi2) 3) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 3)) (pow (cos phi1) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (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 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ (* (pow (cos phi2) 3) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 3)) (pow (cos phi1) 3))))
#s(approx (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (* (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (pow (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) 2)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #s(hole binary64 (- (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (* 2 (log (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (log (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (* -1 (* (pow lambda1 3) (- (/ (pow lambda2 3) (pow lambda1 3)) 1)))))
#s(approx (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) #s(hole binary64 (* -1 (* (pow lambda1 3) (- (/ (pow lambda2 3) (pow lambda1 3)) 1)))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -1 (/ (+ (* -1 lambda2) (* -1 (/ (pow lambda2 2) lambda1))) lambda1))))))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 lambda2) (* -1 (/ (pow lambda2 2) 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 (* -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 (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 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 (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (- (+ (* -1 (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2) lambda1)) (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2) lambda1)) (* -1 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))) lambda1)) 1)))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (- (* -1 (/ (- (* -1 (/ (* (+ (* -1 (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2)) (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2)) (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))) lambda1)) (+ (* -1 (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2)) (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2))) lambda1)) (* -1 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))) lambda1)) 1)))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) #s(hole binary64 (* -1 (* (pow lambda1 3) (- (* -1 (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 3) (pow lambda1 3))) 1)))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 3)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -1 (/ (- (* -1 (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2) lambda1)) (* -1 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))) lambda1))))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2)))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -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))) lambda1) #s(hole binary64 (* lambda1 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))))
#s(approx (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -1 (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2) (pow lambda1 2)))))))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) #s(hole binary64 (* -1 (* lambda1 (- (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1) 1)))))
#s(approx (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) #s(hole binary64 (* -1 (* lambda1 (- (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1) 1)))))
#s(approx (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) #s(hole binary64 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)))))
#s(approx (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) #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 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) #s(hole binary64 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 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 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos lambda1) (cos phi2)))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* 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 (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (+ (* (cos (- 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (cos phi2)))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (cos lambda1)))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (cos lambda1) (* lambda2 (sin lambda1)))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos lambda1) (cos phi1))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* lambda2 (sin lambda1))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1))))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1))))))))
#s(approx (cos (neg lambda2)) #s(hole binary64 1))
#s(approx (cos (neg lambda2)) #s(hole binary64 (+ 1 (* -1/2 (pow lambda2 2)))))
#s(approx (cos (neg lambda2)) #s(hole binary64 (+ 1 (* (pow lambda2 2) (- (* 1/24 (pow lambda2 2)) 1/2)))))
#s(approx (cos (neg lambda2)) #s(hole binary64 (+ 1 (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/24 (* -1/720 (pow lambda2 2)))) 1/2)))))
#s(approx (neg lambda2) #s(hole binary64 (* -1 lambda2)))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/6 (* lambda2 (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))) (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (* lambda2 (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/6 (* lambda2 (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))) (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi1) (+ (* (cos lambda1) (cos phi2)) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (+ (* (cos lambda1) (cos phi2)) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (cos phi2)) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin 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)) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (* (cos lambda1) (cos phi2)) (* (cos (* 1/2 (PI))) (sin phi1)))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (* lambda2 (* (cos phi2) (sin lambda1))) (+ (* (cos lambda1) (cos phi2)) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (cos phi2)) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) #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)) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/2 (* lambda2 (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))) (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* lambda2 (+ (* -1/2 (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* 1/6 (* lambda2 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))))) (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (sin (neg lambda2)) #s(hole binary64 (* -1 lambda2)))
#s(approx (sin (neg lambda2)) #s(hole binary64 (* lambda2 (- (* 1/6 (pow lambda2 2)) 1))))
#s(approx (sin (neg lambda2)) #s(hole binary64 (* lambda2 (- (* (pow lambda2 2) (+ 1/6 (* -1/120 (pow lambda2 2)))) 1))))
#s(approx (sin (neg lambda2)) #s(hole binary64 (* lambda2 (- (* (pow lambda2 2) (+ 1/6 (* (pow lambda2 2) (- (* 1/5040 (pow lambda2 2)) 1/120)))) 1))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (sin lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* 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)))))) (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/6 (* 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)))))) (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) #s(hole binary64 lambda1))
#s(approx (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) #s(hole binary64 (+ lambda1 (* lambda2 (- (* -1/2 (* lambda1 lambda2)) 1)))))
#s(approx (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) #s(hole binary64 (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)))))
#s(approx (* lambda1 (cos (neg lambda2))) #s(hole binary64 lambda1))
#s(approx (* lambda1 (cos (neg lambda2))) #s(hole binary64 (+ lambda1 (* -1/2 (* lambda1 (pow lambda2 2))))))
#s(approx (* lambda1 (cos (neg lambda2))) #s(hole binary64 (+ lambda1 (* (pow lambda2 2) (+ (* -1/2 lambda1) (* 1/24 (* lambda1 (pow lambda2 2))))))))
#s(approx (* lambda1 (cos (neg lambda2))) #s(hole binary64 (+ lambda1 (* (pow lambda2 2) (+ (* -1/2 lambda1) (* (pow lambda2 2) (+ (* -1/720 (* lambda1 (pow lambda2 2))) (* 1/24 lambda1))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (cos phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos lambda1) (cos phi2))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (- (/ lambda1 lambda2) 1) #s(hole binary64 (/ (+ lambda1 (* -1 lambda2)) lambda2)))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/6 (* lambda2 (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))))) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) #s(hole binary64 (+ 1 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) #s(hole binary64 (+ 1 (+ (* lambda2 (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/6 (* lambda2 (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))))) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (+ (* lambda2 (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/6 (* lambda2 (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))))) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos lambda1) (cos phi2))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (+ (* 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 (+ 1 (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (cos lambda1))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (+ (cos lambda1) (* lambda2 (sin lambda1))))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1))))))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1))))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1/2 (pow phi1 2)) (* (cos lambda1) (cos phi2)))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1/2 (pow phi1 2)) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1/2 (pow phi1 2)) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1/2 (pow phi1 2)) (+ (* 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 (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) #s(hole binary64 1))
#s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) #s(hole binary64 (+ 1 (* lambda1 lambda2))))
#s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) #s(hole binary64 (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2))))))
#s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) #s(hole binary64 (+ 1 (* lambda2 (+ lambda1 (* lambda2 (- (* -1/6 (* lambda1 lambda2)) 1/2)))))))
#s(approx (* -1 (* lambda1 (sin (neg lambda2)))) #s(hole binary64 (* lambda1 lambda2)))
#s(approx (* -1 (* lambda1 (sin (neg lambda2)))) #s(hole binary64 (* lambda2 (+ lambda1 (* -1/6 (* lambda1 (pow lambda2 2)))))))
#s(approx (* -1 (* lambda1 (sin (neg lambda2)))) #s(hole binary64 (* lambda2 (+ lambda1 (* (pow lambda2 2) (+ (* -1/6 lambda1) (* 1/120 (* lambda1 (pow lambda2 2)))))))))
#s(approx (* -1 (* lambda1 (sin (neg lambda2)))) #s(hole binary64 (* lambda2 (+ lambda1 (* (pow lambda2 2) (+ (* -1/6 lambda1) (* (pow lambda2 2) (+ (* -1/5040 (* lambda1 (pow lambda2 2))) (* 1/120 lambda1)))))))))
#s(approx (* lambda1 (sin (neg lambda2))) #s(hole binary64 (* -1 (* lambda1 lambda2))))
#s(approx (* lambda1 (sin (neg lambda2))) #s(hole binary64 (* lambda2 (+ (* -1 lambda1) (* 1/6 (* lambda1 (pow lambda2 2)))))))
#s(approx (* lambda1 (sin (neg lambda2))) #s(hole binary64 (* lambda2 (+ (* -1 lambda1) (* (pow lambda2 2) (+ (* -1/120 (* lambda1 (pow lambda2 2))) (* 1/6 lambda1)))))))
#s(approx (* lambda1 (sin (neg lambda2))) #s(hole binary64 (* lambda2 (+ (* -1 lambda1) (* (pow lambda2 2) (+ (* 1/6 lambda1) (* (pow lambda2 2) (+ (* -1/120 lambda1) (* 1/5040 (* lambda1 (pow lambda2 2)))))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/6 (* lambda2 (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))))) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos 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)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (* (sin lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* (cos 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)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* 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)))))) (* (cos 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)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/6 (* 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)))))) (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin lambda1) (* -1/2 (* (pow phi2 2) (sin lambda1))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin lambda1) (+ (* -1/2 (* (pow phi2 2) (sin lambda1))) (* lambda2 (+ (* -1 (cos lambda1)) (* 1/2 (* (pow phi2 2) (cos lambda1)))))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin lambda1) (+ (* -1/2 (* (pow phi2 2) (sin lambda1))) (* lambda2 (+ (* -1 (cos lambda1)) (+ (* 1/2 (* (pow phi2 2) (cos lambda1))) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/4 (* (pow phi2 2) (sin lambda1))))))))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin lambda1) (+ (* -1/2 (* (pow phi2 2) (sin lambda1))) (* lambda2 (+ (* -1 (cos lambda1)) (+ (* 1/2 (* (pow phi2 2) (cos lambda1))) (* lambda2 (+ (* -1/2 (sin lambda1)) (+ (* 1/4 (* (pow phi2 2) (sin lambda1))) (* lambda2 (+ (* -1/12 (* (pow phi2 2) (cos lambda1))) (* 1/6 (cos lambda1))))))))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/2 (* lambda2 (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))))) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))) (* lambda2 (+ (* -1/2 (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))) (* 1/6 (* lambda2 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))))))) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (* -1 (* lambda2 (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (* lambda2 (+ (* -1 (sin (+ phi2 (* 1/2 (PI))))) (* 1/6 (* (pow lambda2 2) (sin (+ phi2 (* 1/2 (PI))))))))))
#s(approx (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (* lambda2 (+ (* -1 (sin (+ phi2 (* 1/2 (PI))))) (* (pow lambda2 2) (+ (* -1/120 (* (pow lambda2 2) (sin (+ phi2 (* 1/2 (PI)))))) (* 1/6 (sin (+ phi2 (* 1/2 (PI)))))))))))
#s(approx (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (* lambda2 (+ (* -1 (sin (+ phi2 (* 1/2 (PI))))) (* (pow lambda2 2) (+ (* 1/6 (sin (+ phi2 (* 1/2 (PI))))) (* (pow lambda2 2) (+ (* -1/120 (sin (+ phi2 (* 1/2 (PI))))) (* 1/5040 (* (pow lambda2 2) (sin (+ phi2 (* 1/2 (PI))))))))))))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 lambda1))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ lambda1 (* lambda2 (- (* -1/2 (* lambda1 lambda2)) 1)))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (cos phi2))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* -1/2 (* (pow lambda2 2) (cos phi2)))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda2 2) (cos phi2)))))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (cos phi2))) (* 1/24 (cos phi2))))))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (sin (+ lambda1 (* 1/2 (PI))))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* -1 (* lambda2 (* (cos phi2) (cos (+ lambda1 (* 1/2 (PI))))))) (* (cos phi2) (sin (+ lambda1 (* 1/2 (PI)))))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* -1 (* (cos phi2) (cos (+ lambda1 (* 1/2 (PI)))))) (* -1/2 (* lambda2 (* (cos phi2) (sin (+ lambda1 (* 1/2 (PI))))))))) (* (cos phi2) (sin (+ lambda1 (* 1/2 (PI)))))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* -1 (* (cos phi2) (cos (+ lambda1 (* 1/2 (PI)))))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin (+ lambda1 (* 1/2 (PI)))))) (* 1/6 (* lambda2 (* (cos phi2) (cos (+ lambda1 (* 1/2 (PI))))))))))) (* (cos phi2) (sin (+ lambda1 (* 1/2 (PI)))))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) #s(hole binary64 (sin (+ lambda1 (* 1/2 (PI))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ lambda1 (* 1/2 (PI)))) (* -1 (* lambda2 (cos (+ lambda1 (* 1/2 (PI)))))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ lambda1 (* 1/2 (PI)))) (* lambda2 (+ (* -1 (cos (+ lambda1 (* 1/2 (PI))))) (* -1/2 (* lambda2 (sin (+ lambda1 (* 1/2 (PI)))))))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ lambda1 (* 1/2 (PI)))) (* lambda2 (+ (* -1 (cos (+ lambda1 (* 1/2 (PI))))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 (* 1/2 (PI))))) (* 1/6 (* lambda2 (cos (+ lambda1 (* 1/2 (PI)))))))))))))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) #s(hole binary64 (+ lambda1 (* 1/2 (PI)))))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) #s(hole binary64 (+ lambda1 (+ (* -1 lambda2) (* 1/2 (PI))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (/ (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda2 (- (* -1 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (/ (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -1 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* lambda2 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* -1 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* 1/2 (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (+ (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (/ (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -1 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* lambda2 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* -1 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (* 1/2 (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* lambda2 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (/ (* (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 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* 1/2 (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (* 1/6 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (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 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (+ (* 1/6 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1)))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (+ (/ (* (cos phi2) (* (sin lambda1) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (+ (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (/ (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 (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (- (pow (cos phi1) 2) (pow (cos lambda1) 2)) (- (cos phi1) (cos lambda1)))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda2 (- (* -2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (sin lambda1) (- (pow (cos phi1) 2) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos lambda1)))) (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* lambda2 (- (* -1 (/ (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (cos lambda1)))) (+ (* -1 (/ (* (sin lambda1) (- (* -2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (sin lambda1) (- (pow (cos phi1) 2) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))) (- (cos phi1) (cos lambda1)))) (* 1/2 (/ (* (cos lambda1) (- (pow (cos phi1) 2) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))))) (* -1 (/ (* (sin lambda1) (- (pow (cos phi1) 2) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos lambda1)))) (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* lambda2 (- (+ (* -1 (/ (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (cos lambda1)))) (* lambda2 (- (* -1 (/ (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))) (- (cos phi1) (cos lambda1)))) (+ (* -1 (/ (* (sin lambda1) (- (* -1 (/ (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (cos lambda1)))) (+ (* -1 (/ (* (sin lambda1) (- (* -2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (sin lambda1) (- (pow (cos phi1) 2) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))) (- (cos phi1) (cos lambda1)))) (* 1/2 (/ (* (cos lambda1) (- (pow (cos phi1) 2) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2)))))) (- (cos phi1) (cos lambda1)))) (+ (* 1/6 (/ (* (sin lambda1) (- (pow (cos phi1) 2) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))) (* 1/2 (/ (* (cos lambda1) (- (* -2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (sin lambda1) (- (pow (cos phi1) 2) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))) (- (cos phi1) (cos lambda1))))))))) (+ (* -1 (/ (* (sin lambda1) (- (* -2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (sin lambda1) (- (pow (cos phi1) 2) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))) (- (cos phi1) (cos lambda1)))) (* 1/2 (/ (* (cos lambda1) (- (pow (cos phi1) 2) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))))) (* -1 (/ (* (sin lambda1) (- (pow (cos phi1) 2) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos lambda1)))) (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1))))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (pow (cos phi1) 2) (pow (cos lambda1) 2))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ (* -2 (* lambda2 (* (cos lambda1) (sin lambda1)))) (pow (cos phi1) 2)) (pow (cos lambda1) 2))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ (* lambda2 (- (* -1 (* lambda2 (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 2 (* (cos lambda1) (sin lambda1))))) (pow (cos phi1) 2)) (pow (cos lambda1) 2))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 2 (* (cos lambda1) (sin lambda1))))) (pow (cos phi1) 2)) (pow (cos lambda1) 2))))
#s(approx (pow (cos (- lambda1 lambda2)) 2) #s(hole binary64 (pow (cos lambda1) 2)))
#s(approx (pow (cos (- lambda1 lambda2)) 2) #s(hole binary64 (+ (* 2 (* lambda2 (* (cos lambda1) (sin lambda1)))) (pow (cos lambda1) 2))))
#s(approx (pow (cos (- lambda1 lambda2)) 2) #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 (pow (cos (- lambda1 lambda2)) 2) #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 phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (cos phi1) (cos lambda1))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ (cos phi1) (* -1 (* lambda2 (sin lambda1)))) (cos lambda1))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ (cos phi1) (* lambda2 (+ (* -1 (sin lambda1)) (* 1/2 (* lambda2 (cos lambda1)))))) (cos lambda1))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ (cos phi1) (* lambda2 (+ (* -1 (sin lambda1)) (* lambda2 (- (* 1/6 (* lambda2 (sin lambda1))) (* -1/2 (cos lambda1))))))) (cos lambda1))))
#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 (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 (* (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 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 (* (+ (* (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 lambda2) (cos phi1)) #s(hole binary64 (+ 1 (cos phi1))))
#s(approx (+ (cos lambda2) (cos phi1)) #s(hole binary64 (+ 1 (+ (cos phi1) (* -1/2 (pow lambda2 2))))))
#s(approx (+ (cos lambda2) (cos phi1)) #s(hole binary64 (+ 1 (+ (cos phi1) (* (pow lambda2 2) (- (* 1/24 (pow lambda2 2)) 1/2))))))
#s(approx (+ (cos lambda2) (cos phi1)) #s(hole binary64 (+ 1 (+ (cos phi1) (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/24 (* -1/720 (pow lambda2 2)))) 1/2))))))
#s(approx (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 (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) #s(hole binary64 (+ 1 (* -1/2 (pow lambda1 2)))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda1 lambda2)))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ lambda1 (* lambda2 (- (* 1/4 (pow lambda1 2)) 1/2))))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ lambda1 (* lambda2 (- (+ (* -1/6 (* lambda1 lambda2)) (* 1/4 (pow lambda1 2))) 1/2))))))))
#s(approx (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))) #s(hole binary64 (* -1/2 (pow lambda1 2))))
#s(approx (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))) #s(hole binary64 (+ (* -1/2 (pow lambda1 2)) (* lambda1 lambda2))))
#s(approx (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))) #s(hole binary64 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ lambda1 (* 1/4 (* (pow lambda1 2) lambda2)))))))
#s(approx (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))) #s(hole binary64 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ lambda1 (* lambda2 (+ (* -1/6 (* lambda1 lambda2)) (* 1/4 (pow lambda1 2)))))))))
#s(approx (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))) #s(hole binary64 (* -1/2 lambda1)))
#s(approx (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))) #s(hole binary64 (+ lambda2 (* -1/2 lambda1))))
#s(approx (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ 1 (* 1/4 (* lambda1 lambda2)))))))
#s(approx (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ 1 (* lambda2 (+ (* -1/6 lambda2) (* 1/4 lambda1))))))))
#s(approx (* -1/2 (* lambda1 (cos (neg lambda2)))) #s(hole binary64 (* -1/2 lambda1)))
#s(approx (* -1/2 (* lambda1 (cos (neg lambda2)))) #s(hole binary64 (+ (* -1/2 lambda1) (* 1/4 (* lambda1 (pow lambda2 2))))))
#s(approx (* -1/2 (* lambda1 (cos (neg lambda2)))) #s(hole binary64 (+ (* -1/2 lambda1) (* (pow lambda2 2) (+ (* -1/48 (* lambda1 (pow lambda2 2))) (* 1/4 lambda1))))))
#s(approx (* -1/2 (* lambda1 (cos (neg lambda2)))) #s(hole binary64 (+ (* -1/2 lambda1) (* (pow lambda2 2) (+ (* 1/4 lambda1) (* (pow lambda2 2) (+ (* -1/48 lambda1) (* 1/1440 (* lambda1 (pow lambda2 2))))))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) #s(hole binary64 (+ 1 (* -1/2 (pow lambda1 2)))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda1 (* lambda2 (+ 1 (* -1/6 (pow lambda1 2)))))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ (* lambda1 (+ 1 (* -1/6 (pow lambda1 2)))) (* lambda2 (- (* 1/4 (pow lambda1 2)) 1/2))))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ (* lambda1 (+ 1 (* -1/6 (pow lambda1 2)))) (* lambda2 (- (+ (* 1/4 (pow lambda1 2)) (* lambda1 (* lambda2 (- (* 1/36 (pow lambda1 2)) 1/6)))) 1/2))))))))
#s(approx (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) #s(hole binary64 (* -1/2 (pow lambda1 2))))
#s(approx (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) #s(hole binary64 (+ (* -1/2 (pow lambda1 2)) (* lambda1 (* lambda2 (+ 1 (* -1/6 (pow lambda1 2))))))))
#s(approx (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) #s(hole binary64 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ (* 1/4 (* (pow lambda1 2) lambda2)) (* lambda1 (+ 1 (* -1/6 (pow lambda1 2)))))))))
#s(approx (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) #s(hole binary64 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ (* lambda1 (+ 1 (* -1/6 (pow lambda1 2)))) (* lambda2 (+ (* 1/4 (pow lambda1 2)) (* lambda1 (* lambda2 (- (* 1/36 (pow lambda1 2)) 1/6))))))))))
#s(approx (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))) #s(hole binary64 (* -1/2 lambda1)))
#s(approx (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ 1 (* -1/6 (pow lambda1 2)))))))
#s(approx (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ 1 (+ (* -1/6 (pow lambda1 2)) (* 1/4 (* lambda1 lambda2))))))))
#s(approx (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ 1 (+ (* -1/6 (pow lambda1 2)) (* lambda2 (+ (* 1/4 lambda1) (* lambda2 (- (* 1/36 (pow lambda1 2)) 1/6))))))))))
#s(approx (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) #s(hole binary64 (* -1/2 lambda1)))
#s(approx (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) #s(hole binary64 (+ (* -1/2 lambda1) (* -1/6 (* (pow lambda1 2) lambda2)))))
#s(approx (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ (* -1/6 (pow lambda1 2)) (* 1/4 (* lambda1 lambda2)))))))
#s(approx (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ (* -1/6 (pow lambda1 2)) (* lambda2 (+ (* 1/36 (* (pow lambda1 2) lambda2)) (* 1/4 lambda1))))))))
#s(approx (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2))))) #s(hole binary64 -1/2))
#s(approx (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2))))) #s(hole binary64 (- (* -1/6 (* lambda1 lambda2)) 1/2)))
#s(approx (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2))))) #s(hole binary64 (- (* lambda2 (+ (* -1/6 lambda1) (* 1/4 lambda2))) 1/2)))
#s(approx (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2))))) #s(hole binary64 (- (* lambda2 (+ (* -1/6 lambda1) (* lambda2 (+ 1/4 (* 1/36 (* lambda1 lambda2)))))) 1/2)))
#s(approx (* 1/6 (* lambda1 (sin (neg lambda2)))) #s(hole binary64 (* -1/6 (* lambda1 lambda2))))
#s(approx (* 1/6 (* lambda1 (sin (neg lambda2)))) #s(hole binary64 (* lambda2 (+ (* -1/6 lambda1) (* 1/36 (* lambda1 (pow lambda2 2)))))))
#s(approx (* 1/6 (* lambda1 (sin (neg lambda2)))) #s(hole binary64 (* lambda2 (+ (* -1/6 lambda1) (* (pow lambda2 2) (+ (* -1/720 (* lambda1 (pow lambda2 2))) (* 1/36 lambda1)))))))
#s(approx (* 1/6 (* lambda1 (sin (neg lambda2)))) #s(hole binary64 (* lambda2 (+ (* -1/6 lambda1) (* (pow lambda2 2) (+ (* 1/36 lambda1) (* (pow lambda2 2) (+ (* -1/720 lambda1) (* 1/30240 (* lambda1 (pow lambda2 2)))))))))))
#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 (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (cos phi2)))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (+ (cos phi2) (* lambda1 (* lambda2 (cos phi2))))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (+ (cos phi2) (* lambda2 (+ (* -1/2 (* lambda2 (cos phi2))) (* lambda1 (cos phi2)))))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (+ (cos phi2) (* lambda2 (+ (* lambda1 (cos phi2)) (* lambda2 (+ (* -1/2 (cos phi2)) (* -1/6 (* lambda1 (* lambda2 (cos phi2)))))))))))
#s(approx (+ (cos lambda2) (* lambda1 (sin lambda2))) #s(hole binary64 1))
#s(approx (+ (cos lambda2) (* lambda1 (sin lambda2))) #s(hole binary64 (+ 1 (* lambda1 lambda2))))
#s(approx (+ (cos lambda2) (* lambda1 (sin lambda2))) #s(hole binary64 (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2))))))
#s(approx (+ (cos lambda2) (* lambda1 (sin lambda2))) #s(hole binary64 (+ 1 (* lambda2 (+ lambda1 (* lambda2 (- (* -1/6 (* lambda1 lambda2)) 1/2)))))))
#s(approx (* lambda1 (sin lambda2)) #s(hole binary64 (* lambda1 lambda2)))
#s(approx (* lambda1 (sin lambda2)) #s(hole binary64 (* lambda2 (+ lambda1 (* -1/6 (* lambda1 (pow lambda2 2)))))))
#s(approx (* lambda1 (sin lambda2)) #s(hole binary64 (* lambda2 (+ lambda1 (* (pow lambda2 2) (+ (* -1/6 lambda1) (* 1/120 (* lambda1 (pow lambda2 2)))))))))
#s(approx (* lambda1 (sin lambda2)) #s(hole binary64 (* lambda2 (+ lambda1 (* (pow lambda2 2) (+ (* -1/6 lambda1) (* (pow lambda2 2) (+ (* -1/5040 (* lambda1 (pow lambda2 2))) (* 1/120 lambda1)))))))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (* lambda1 (sin (* 1/2 (PI))))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ (* lambda1 (sin (* 1/2 (PI)))) (* lambda2 (- (* lambda1 (cos (* 1/2 (PI)))) 1)))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ (* lambda1 (sin (* 1/2 (PI)))) (* lambda2 (- (+ (* -1/2 (* lambda1 (* lambda2 (sin (* 1/2 (PI)))))) (* lambda1 (cos (* 1/2 (PI))))) 1)))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ (* lambda1 (sin (* 1/2 (PI)))) (* lambda2 (- (+ (* lambda1 (cos (* 1/2 (PI)))) (* lambda2 (+ (* -1/2 (* lambda1 (sin (* 1/2 (PI))))) (* lambda2 (+ 1/6 (* -1/6 (* lambda1 (cos (* 1/2 (PI)))))))))) 1)))))
#s(approx (sin (+ lambda2 (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ lambda2 (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* lambda2 (cos (* 1/2 (PI)))))))
#s(approx (sin (+ lambda2 (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* lambda2 (+ (cos (* 1/2 (PI))) (* -1/2 (* lambda2 (sin (* 1/2 (PI))))))))))
#s(approx (sin (+ lambda2 (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* lambda2 (+ (cos (* 1/2 (PI))) (* lambda2 (+ (* -1/2 (sin (* 1/2 (PI)))) (* -1/6 (* lambda2 (cos (* 1/2 (PI))))))))))))
#s(approx (+ lambda2 (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ lambda2 (/ (PI) 2)) #s(hole binary64 (+ lambda2 (* 1/2 (PI)))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (sin lambda1)))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) #s(hole binary64 lambda1))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) #s(hole binary64 (+ lambda1 (* lambda2 (- (* -1/2 (* lambda1 lambda2)) 1)))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) #s(hole binary64 (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) #s(hole binary64 (+ lambda1 (* lambda2 (- (* -1/2 (* lambda1 lambda2)) 1)))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) #s(hole binary64 (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)))))
#s(approx (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)) #s(hole binary64 (* -1 lambda2)))
#s(approx (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)) #s(hole binary64 (* lambda2 (- (* -1/2 (* lambda1 lambda2)) 1))))
#s(approx (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)) #s(hole binary64 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))))
#s(approx (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1) #s(hole binary64 -1))
#s(approx (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1) #s(hole binary64 (- (* -1/2 (* lambda1 lambda2)) 1)))
#s(approx (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1) #s(hole binary64 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)))
#s(approx (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) #s(hole binary64 (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2)))))
#s(approx (* 1/6 lambda2) #s(hole binary64 (* 1/6 lambda2)))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos lambda1) (cos phi2)))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* 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 (- (* lambda1 (cos lambda2)) (sin lambda2)) #s(hole binary64 lambda1))
#s(approx (- (* lambda1 (cos lambda2)) (sin lambda2)) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (- (* lambda1 (cos lambda2)) (sin lambda2)) #s(hole binary64 (+ lambda1 (* lambda2 (- (* -1/2 (* lambda1 lambda2)) 1)))))
#s(approx (- (* lambda1 (cos lambda2)) (sin lambda2)) #s(hole binary64 (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)))))
#s(approx (* lambda1 (cos lambda2)) #s(hole binary64 lambda1))
#s(approx (* lambda1 (cos lambda2)) #s(hole binary64 (+ lambda1 (* -1/2 (* lambda1 (pow lambda2 2))))))
#s(approx (* lambda1 (cos lambda2)) #s(hole binary64 (+ lambda1 (* (pow lambda2 2) (+ (* -1/2 lambda1) (* 1/24 (* lambda1 (pow lambda2 2))))))))
#s(approx (* lambda1 (cos lambda2)) #s(hole binary64 (+ lambda1 (* (pow lambda2 2) (+ (* -1/2 lambda1) (* (pow lambda2 2) (+ (* -1/720 (* lambda1 (pow lambda2 2))) (* 1/24 lambda1))))))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) #s(hole binary64 lambda1))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) #s(hole binary64 (+ lambda1 (* lambda2 (- (* 1/2 (pow lambda1 2)) 1)))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) #s(hole binary64 (+ lambda1 (* lambda2 (- (+ (* -1/2 (* lambda1 lambda2)) (* 1/2 (pow lambda1 2))) 1)))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) #s(hole binary64 (+ lambda1 (* lambda2 (- (+ (* 1/2 (pow lambda1 2)) (* lambda2 (+ (* -1/2 lambda1) (* lambda2 (+ 1/6 (* -1/12 (pow lambda1 2))))))) 1)))))
#s(approx (* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))) #s(hole binary64 lambda1))
#s(approx (* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))) #s(hole binary64 (+ lambda1 (* (pow lambda1 2) (* lambda2 (- 1/2 (/ 1 (pow lambda1 2))))))))
#s(approx (* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))) #s(hole binary64 (+ lambda1 (* lambda2 (+ (* -1/2 (* lambda1 lambda2)) (* (pow lambda1 2) (- 1/2 (/ 1 (pow lambda1 2)))))))))
#s(approx (* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))) #s(hole binary64 (+ lambda1 (* lambda2 (+ (* lambda2 (+ (* -1/2 lambda1) (* (pow lambda1 2) (* lambda2 (- (* 1/6 (/ 1 (pow lambda1 2))) 1/12))))) (* (pow lambda1 2) (- 1/2 (/ 1 (pow lambda1 2)))))))))
#s(approx (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) #s(hole binary64 (/ 1 lambda1)))
#s(approx (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) #s(hole binary64 (+ (* lambda2 (- 1/2 (/ 1 (pow lambda1 2)))) (/ 1 lambda1))))
#s(approx (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) #s(hole binary64 (+ (* lambda2 (- (+ 1/2 (* -1/2 (/ lambda2 lambda1))) (/ 1 (pow lambda1 2)))) (/ 1 lambda1))))
#s(approx (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) #s(hole binary64 (+ (* lambda2 (- (+ 1/2 (* lambda2 (- (* lambda2 (- (* 1/6 (/ 1 (pow lambda1 2))) 1/12)) (* 1/2 (/ 1 lambda1))))) (/ 1 (pow lambda1 2)))) (/ 1 lambda1))))
#s(approx (/ (sin lambda2) (pow lambda1 2)) #s(hole binary64 (/ lambda2 (pow lambda1 2))))
#s(approx (/ (sin lambda2) (pow lambda1 2)) #s(hole binary64 (* lambda2 (+ (* -1/6 (/ (pow lambda2 2) (pow lambda1 2))) (/ 1 (pow lambda1 2))))))
#s(approx (/ (sin lambda2) (pow lambda1 2)) #s(hole binary64 (* lambda2 (+ (* (pow lambda2 2) (- (* 1/120 (/ (pow lambda2 2) (pow lambda1 2))) (* 1/6 (/ 1 (pow lambda1 2))))) (/ 1 (pow lambda1 2))))))
#s(approx (/ (sin lambda2) (pow lambda1 2)) #s(hole binary64 (* lambda2 (+ (* (pow lambda2 2) (- (* (pow lambda2 2) (+ (* -1/5040 (/ (pow lambda2 2) (pow lambda1 2))) (* 1/120 (/ 1 (pow lambda1 2))))) (* 1/6 (/ 1 (pow lambda1 2))))) (/ 1 (pow lambda1 2))))))
#s(approx (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)) #s(hole binary64 (/ 1 lambda1)))
#s(approx (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)) #s(hole binary64 (+ (* 1/2 lambda2) (/ 1 lambda1))))
#s(approx (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)) #s(hole binary64 (+ (* lambda2 (+ 1/2 (* -1/2 (/ lambda2 lambda1)))) (/ 1 lambda1))))
#s(approx (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)) #s(hole binary64 (+ (* lambda2 (+ 1/2 (* lambda2 (- (* -1/12 lambda2) (* 1/2 (/ 1 lambda1)))))) (/ 1 lambda1))))
#s(approx (/ (cos lambda2) lambda1) #s(hole binary64 (/ 1 lambda1)))
#s(approx (/ (cos lambda2) lambda1) #s(hole binary64 (+ (* -1/2 (/ (pow lambda2 2) lambda1)) (/ 1 lambda1))))
#s(approx (/ (cos lambda2) lambda1) #s(hole binary64 (+ (* (pow lambda2 2) (- (* 1/24 (/ (pow lambda2 2) lambda1)) (* 1/2 (/ 1 lambda1)))) (/ 1 lambda1))))
#s(approx (/ (cos lambda2) lambda1) #s(hole binary64 (+ (* (pow lambda2 2) (- (* (pow lambda2 2) (+ (* -1/720 (/ (pow lambda2 2) lambda1)) (* 1/24 (/ 1 lambda1)))) (* 1/2 (/ 1 lambda1)))) (/ 1 lambda1))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ 1 (* -1/2 (pow lambda1 2)))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda1 lambda2)))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ lambda1 (* lambda2 (- (* 1/4 (pow lambda1 2)) 1/2))))))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ lambda1 (* lambda2 (- (+ (* -1/6 (* lambda1 lambda2)) (* 1/4 (pow lambda1 2))) 1/2))))))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (* -1/2 lambda1)))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (+ lambda2 (* -1/2 lambda1))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ 1 (* 1/4 (* lambda1 lambda2)))))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ 1 (* lambda2 (+ (* -1/6 lambda2) (* 1/4 lambda1))))))))
#s(approx (* (* (cos lambda2) lambda1) -1/2) #s(hole binary64 (* -1/2 lambda1)))
#s(approx (* (* (cos lambda2) lambda1) -1/2) #s(hole binary64 (+ (* -1/2 lambda1) (* 1/4 (* lambda1 (pow lambda2 2))))))
#s(approx (* (* (cos lambda2) lambda1) -1/2) #s(hole binary64 (+ (* -1/2 lambda1) (* (pow lambda2 2) (+ (* -1/48 (* lambda1 (pow lambda2 2))) (* 1/4 lambda1))))))
#s(approx (* (* (cos lambda2) lambda1) -1/2) #s(hole binary64 (+ (* -1/2 lambda1) (* (pow lambda2 2) (+ (* 1/4 lambda1) (* (pow lambda2 2) (+ (* -1/48 lambda1) (* 1/1440 (* lambda1 (pow lambda2 2))))))))))
#s(approx (* (cos lambda2) lambda1) #s(hole binary64 lambda1))
#s(approx (* (cos lambda2) lambda1) #s(hole binary64 (+ lambda1 (* -1/2 (* lambda1 (pow lambda2 2))))))
#s(approx (* (cos lambda2) lambda1) #s(hole binary64 (+ lambda1 (* (pow lambda2 2) (+ (* -1/2 lambda1) (* 1/24 (* lambda1 (pow lambda2 2))))))))
#s(approx (* (cos lambda2) lambda1) #s(hole binary64 (+ lambda1 (* (pow lambda2 2) (+ (* -1/2 lambda1) (* (pow lambda2 2) (+ (* -1/720 (* lambda1 (pow lambda2 2))) (* 1/24 lambda1))))))))
#s(approx (+ 1 (* (cos lambda2) (cos phi2))) #s(hole binary64 (+ 1 (cos phi2))))
#s(approx (+ 1 (* (cos lambda2) (cos phi2))) #s(hole binary64 (+ 1 (+ (cos phi2) (* -1/2 (* (pow lambda2 2) (cos phi2)))))))
#s(approx (+ 1 (* (cos lambda2) (cos phi2))) #s(hole binary64 (+ 1 (+ (cos phi2) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda2 2) (cos phi2)))))))))
#s(approx (+ 1 (* (cos lambda2) (cos phi2))) #s(hole binary64 (+ 1 (+ (cos phi2) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (cos phi2))) (* 1/24 (cos phi2))))))))))
#s(approx (* (cos lambda2) (cos phi2)) #s(hole binary64 (cos phi2)))
#s(approx (* (cos lambda2) (cos phi2)) #s(hole binary64 (+ (cos phi2) (* -1/2 (* (pow lambda2 2) (cos phi2))))))
#s(approx (* (cos lambda2) (cos phi2)) #s(hole binary64 (+ (cos phi2) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda2 2) (cos phi2))))))))
#s(approx (* (cos lambda2) (cos phi2)) #s(hole binary64 (+ (cos phi2) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (cos phi2))) (* 1/24 (cos phi2)))))))))
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) #s(hole binary64 lambda1))
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) #s(hole binary64 (+ lambda1 (* 1/2 (* (pow lambda1 2) lambda2)))))
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) #s(hole binary64 (+ lambda1 (* lambda2 (+ (* -1/2 (* lambda1 lambda2)) (* 1/2 (pow lambda1 2)))))))
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) #s(hole binary64 (+ lambda1 (* lambda2 (+ (* 1/2 (pow lambda1 2)) (* lambda2 (+ (* -1/2 lambda1) (* -1/12 (* (pow lambda1 2) lambda2)))))))))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) #s(hole binary64 1))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) #s(hole binary64 (+ 1 (* 1/2 (* lambda1 lambda2)))))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) #s(hole binary64 (+ 1 (* lambda2 (+ (* -1/2 lambda2) (* 1/2 lambda1))))))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) #s(hole binary64 (+ 1 (* lambda2 (+ (* 1/2 lambda1) (* lambda2 (- (* -1/12 (* lambda1 lambda2)) 1/2)))))))
#s(approx (* lambda1 (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) #s(hole binary64 1))
#s(approx (* lambda1 (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) #s(hole binary64 (+ 1 (* 1/2 (* lambda1 lambda2)))))
#s(approx (* lambda1 (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) #s(hole binary64 (+ 1 (* lambda2 (+ (* -1/2 lambda2) (* 1/2 lambda1))))))
#s(approx (* lambda1 (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) #s(hole binary64 (+ 1 (* lambda2 (+ (* 1/2 lambda1) (* lambda2 (- (* -1/12 (* lambda1 lambda2)) 1/2)))))))
#s(approx (* -1/2 (* lambda1 (neg (sin lambda2)))) #s(hole binary64 (* 1/2 (* lambda1 lambda2))))
#s(approx (* -1/2 (* lambda1 (neg (sin lambda2)))) #s(hole binary64 (* lambda2 (+ (* -1/12 (* lambda1 (pow lambda2 2))) (* 1/2 lambda1)))))
#s(approx (* -1/2 (* lambda1 (neg (sin lambda2)))) #s(hole binary64 (* lambda2 (+ (* 1/2 lambda1) (* (pow lambda2 2) (+ (* -1/12 lambda1) (* 1/240 (* lambda1 (pow lambda2 2)))))))))
#s(approx (* -1/2 (* lambda1 (neg (sin lambda2)))) #s(hole binary64 (* lambda2 (+ (* 1/2 lambda1) (* (pow lambda2 2) (+ (* -1/12 lambda1) (* (pow lambda2 2) (+ (* -1/10080 (* lambda1 (pow lambda2 2))) (* 1/240 lambda1)))))))))
#s(approx (* lambda1 (neg (sin lambda2))) #s(hole binary64 (* -1 (* lambda1 lambda2))))
#s(approx (* lambda1 (neg (sin lambda2))) #s(hole binary64 (* lambda2 (+ (* -1 lambda1) (* 1/6 (* lambda1 (pow lambda2 2)))))))
#s(approx (* lambda1 (neg (sin lambda2))) #s(hole binary64 (* lambda2 (+ (* -1 lambda1) (* (pow lambda2 2) (+ (* -1/120 (* lambda1 (pow lambda2 2))) (* 1/6 lambda1)))))))
#s(approx (* lambda1 (neg (sin lambda2))) #s(hole binary64 (* lambda2 (+ (* -1 lambda1) (* (pow lambda2 2) (+ (* 1/6 lambda1) (* (pow lambda2 2) (+ (* -1/120 lambda1) (* 1/5040 (* lambda1 (pow lambda2 2)))))))))))
#s(approx (* lambda1 (- (pow lambda2 -1) (pow lambda1 -1))) #s(hole binary64 (/ (+ lambda1 (* -1 lambda2)) lambda2)))
#s(approx (- (pow lambda2 -1) (pow lambda1 -1)) #s(hole binary64 (/ (+ 1 (* -1 (/ lambda2 lambda1))) lambda2)))
#s(approx (/ 1 lambda2) #s(hole binary64 (/ 1 lambda2)))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (/ (+ lambda1 (* -1 lambda2)) lambda2)))
#s(approx (- (pow (/ lambda1 lambda2) 3) 1) #s(hole binary64 (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (pow lambda2 3))))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) #s(hole binary64 (/ (+ (* lambda1 lambda2) (pow lambda1 2)) (pow lambda2 2))))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) #s(hole binary64 (/ (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)) (pow lambda2 2))))
#s(approx (+ 1 (* (/ lambda1 lambda2) 1)) #s(hole binary64 (/ (+ lambda1 lambda2) lambda2)))
#s(approx (* lambda1 (+ (/ 1 lambda1) (/ 1 lambda2))) #s(hole binary64 (/ (+ lambda1 lambda2) lambda2)))
#s(approx (+ (/ 1 lambda1) (/ 1 lambda2)) #s(hole binary64 (/ (+ 1 (/ lambda2 lambda1)) lambda2)))
#s(approx (+ 1 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) #s(hole binary64 (+ 1 (sin (+ lambda1 (* 1/2 (PI)))))))
#s(approx (+ 1 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) #s(hole binary64 (+ 1 (+ (sin (+ lambda1 (* 1/2 (PI)))) (* -1 (* lambda2 (cos (+ lambda1 (* 1/2 (PI))))))))))
#s(approx (+ 1 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) #s(hole binary64 (+ 1 (+ (sin (+ lambda1 (* 1/2 (PI)))) (* lambda2 (+ (* -1 (cos (+ lambda1 (* 1/2 (PI))))) (* -1/2 (* lambda2 (sin (+ lambda1 (* 1/2 (PI))))))))))))
#s(approx (+ 1 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) #s(hole binary64 (+ 1 (+ (sin (+ lambda1 (* 1/2 (PI)))) (* lambda2 (+ (* -1 (cos (+ lambda1 (* 1/2 (PI))))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 (* 1/2 (PI))))) (* 1/6 (* lambda2 (cos (+ lambda1 (* 1/2 (PI))))))))))))))
#s(approx (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) #s(hole binary64 (sin (+ lambda1 (* 1/2 (PI))))))
#s(approx (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) #s(hole binary64 (+ (sin (+ lambda1 (* 1/2 (PI)))) (* -1 (* lambda2 (cos (+ lambda1 (* 1/2 (PI)))))))))
#s(approx (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) #s(hole binary64 (+ (sin (+ lambda1 (* 1/2 (PI)))) (* lambda2 (+ (* -1 (cos (+ lambda1 (* 1/2 (PI))))) (* -1/2 (* lambda2 (sin (+ lambda1 (* 1/2 (PI)))))))))))
#s(approx (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) #s(hole binary64 (+ (sin (+ lambda1 (* 1/2 (PI)))) (* lambda2 (+ (* -1 (cos (+ lambda1 (* 1/2 (PI))))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 (* 1/2 (PI))))) (* 1/6 (* lambda2 (cos (+ lambda1 (* 1/2 (PI)))))))))))))
#s(approx (- (+ lambda1 (* 1/2 (PI))) lambda2) #s(hole binary64 (+ lambda1 (* 1/2 (PI)))))
#s(approx (- (+ lambda1 (* 1/2 (PI))) lambda2) #s(hole binary64 (+ lambda1 (+ (* -1 lambda2) (* 1/2 (PI))))))
#s(approx (- (* 1/2 (PI)) lambda2) #s(hole binary64 (* 1/2 (PI))))
#s(approx (- (* 1/2 (PI)) lambda2) #s(hole binary64 (+ (* -1 lambda2) (* 1/2 (PI)))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/6 (* lambda2 (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))) (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (+ (* lambda2 (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/6 (* lambda2 (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))) (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* (cos lambda1) (cos phi2)) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (+ (* (cos lambda1) (cos phi2)) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (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)) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (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)) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (+ (* lambda2 (sin lambda1)) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (+ (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (+ (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos lambda1) (* (cos (* 1/2 (PI))) (sin phi1)))))
#s(approx (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos lambda1) (+ (* lambda2 (sin lambda1)) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos lambda1) (+ (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos lambda1) (+ (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (/ (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (- 1 (* (cos lambda1) (cos phi2))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (- (+ (* lambda2 (- (* -2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- 1 (* (cos lambda1) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda1) (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ 1 (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- 1 (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- 1 (* (cos lambda1) (cos phi2))))) (* lambda2 (- (* -1 (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (* -2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- 1 (* (cos lambda1) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda1) (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (- 1 (* (cos lambda1) (cos phi2))))) (* 1/2 (/ (* (cos lambda1) (* (cos phi2) (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))) (* -1 (/ (* (cos phi2) (* (sin lambda1) (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ 1 (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- 1 (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- 1 (* (cos lambda1) (cos phi2))))) (* lambda2 (- (+ (* -1 (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (- 1 (* (cos lambda1) (cos phi2))))) (* lambda2 (- (* -1 (/ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (* -1 (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (* -2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- 1 (* (cos lambda1) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda1) (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (- 1 (* (cos lambda1) (cos phi2))))) (* 1/2 (/ (* (cos lambda1) (* (cos phi2) (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* 1/6 (/ (* (cos phi2) (* (sin lambda1) (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (* 1/2 (/ (* (cos lambda1) (* (cos phi2) (- (* -2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- 1 (* (cos lambda1) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda1) (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (- 1 (* (cos lambda1) (cos phi2)))))))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (* -2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- 1 (* (cos lambda1) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda1) (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (- 1 (* (cos lambda1) (cos phi2))))) (* 1/2 (/ (* (cos lambda1) (* (cos phi2) (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))) (* -1 (/ (* (cos phi2) (* (sin lambda1) (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ 1 (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- 1 (* (cos lambda1) (cos phi2)))))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- (+ 1 (* -2 (* lambda2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- (+ 1 (* 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 lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- (+ 1 (* 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 lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) #s(hole binary64 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) #s(hole binary64 (+ (* 2 (* lambda2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) #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 (* (cos phi2) (cos (- lambda1 lambda2))) 2) #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 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- 1 (* (cos lambda1) (cos phi2)))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* -1 (* lambda2 (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (cos phi2)))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* lambda2 (- (* 1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (cos phi2)))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* 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 (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (/ (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* lambda2 (- (/ (* (pow (cos phi2) 3) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1)))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)))) (+ (/ 1 (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #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)))))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (+ (/ (* (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* -1/2 (* (cos lambda1) (cos phi2))))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)) (/ (* (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1))) (- (/ (* (pow (cos phi2) 3) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1)))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))))))) (/ (* (pow (cos phi2) 3) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))))) (/ (* (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1)))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)))) (+ (/ 1 (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #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))))))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (+ (/ (* (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* -1/6 (* (cos phi2) (sin lambda1))))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)) (+ (/ (* (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (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)))))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (+ (/ (* (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* -1/2 (* (cos lambda1) (cos phi2))))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)) (/ (* (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1))) (- (/ (* (pow (cos phi2) 3) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1)))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))))))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (- (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* -1/2 (* (cos lambda1) (cos phi2)))) (- (/ (* (pow (cos phi2) 3) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1)))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (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)))))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))))) (+ (/ (* (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* -1/2 (* (cos lambda1) (cos phi2))))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)) (/ (* (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1))) (- (/ (* (pow (cos phi2) 3) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1)))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))))))) (/ (* (pow (cos phi2) 3) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))))) (/ (* (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1)))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)))) (+ (/ 1 (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))))))))
#s(approx (/ (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (+ 1 (pow (cos lambda1) 3)) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))))
#s(approx (/ (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (- (+ (* 2 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))) (/ (* (pow (cos lambda1) 2) (sin lambda1)) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))) (/ (* (+ 1 (pow (cos lambda1) 3)) (+ (* -1 (sin lambda1)) (* 2 (* (cos lambda1) (sin lambda1))))) (pow (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)) 2)))) (+ (/ 1 (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1))) (/ (pow (cos lambda1) 3) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))))))
#s(approx (/ (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (- (+ (* 2 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))) (+ (* lambda2 (- (+ (* -1/2 (/ (pow (cos lambda1) 3) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))) (+ (* 2 (/ (* (cos lambda1) (pow (sin lambda1) 2)) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))) (/ (* (cos lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1))))) (+ (/ (* (+ 1 (pow (cos lambda1) 3)) (- (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (* -1/2 (cos lambda1)))) (pow (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)) 2)) (/ (* (+ (* -1 (sin lambda1)) (* 2 (* (cos lambda1) (sin lambda1)))) (- (+ (* 2 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))) (/ (* (pow (cos lambda1) 2) (sin lambda1)) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))) (/ (* (+ 1 (pow (cos lambda1) 3)) (+ (* -1 (sin lambda1)) (* 2 (* (cos lambda1) (sin lambda1))))) (pow (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)) 2)))) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))))) (/ (* (pow (cos lambda1) 2) (sin lambda1)) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1))))) (/ (* (+ 1 (pow (cos lambda1) 3)) (+ (* -1 (sin lambda1)) (* 2 (* (cos lambda1) (sin lambda1))))) (pow (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)) 2)))) (+ (/ 1 (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1))) (/ (pow (cos lambda1) 3) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))))))
#s(approx (/ (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (- (+ (* 2 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))) (+ (* lambda2 (- (+ (* -1/2 (/ (pow (cos lambda1) 3) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))) (+ (* 2 (/ (* (cos lambda1) (pow (sin lambda1) 2)) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))) (+ (* lambda2 (- (+ (* -1 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))) (+ (* -1/6 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))) (+ (/ (* (cos lambda1) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1))) (/ (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))))) (+ (/ (* (+ 1 (pow (cos lambda1) 3)) (+ (* -1 (* (cos lambda1) (sin lambda1))) (+ (* -1/3 (* (cos lambda1) (sin lambda1))) (* 1/6 (sin lambda1))))) (pow (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)) 2)) (+ (/ (* (+ (* -1 (sin lambda1)) (* 2 (* (cos lambda1) (sin lambda1)))) (- (+ (* -1/2 (/ (pow (cos lambda1) 3) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))) (+ (* 2 (/ (* (cos lambda1) (pow (sin lambda1) 2)) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))) (/ (* (cos lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1))))) (+ (/ (* (+ 1 (pow (cos lambda1) 3)) (- (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (* -1/2 (cos lambda1)))) (pow (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)) 2)) (/ (* (+ (* -1 (sin lambda1)) (* 2 (* (cos lambda1) (sin lambda1)))) (- (+ (* 2 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))) (/ (* (pow (cos lambda1) 2) (sin lambda1)) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))) (/ (* (+ 1 (pow (cos lambda1) 3)) (+ (* -1 (sin lambda1)) (* 2 (* (cos lambda1) (sin lambda1))))) (pow (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)) 2)))) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))))) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1))) (/ (* (- (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (* -1/2 (cos lambda1))) (- (+ (* 2 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))) (/ (* (pow (cos lambda1) 2) (sin lambda1)) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))) (/ (* (+ 1 (pow (cos lambda1) 3)) (+ (* -1 (sin lambda1)) (* 2 (* (cos lambda1) (sin lambda1))))) (pow (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)) 2)))) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1))))))) (/ (* (cos lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))))) (+ (/ (* (+ 1 (pow (cos lambda1) 3)) (- (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (* -1/2 (cos lambda1)))) (pow (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)) 2)) (/ (* (+ (* -1 (sin lambda1)) (* 2 (* (cos lambda1) (sin lambda1)))) (- (+ (* 2 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))) (/ (* (pow (cos lambda1) 2) (sin lambda1)) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))) (/ (* (+ 1 (pow (cos lambda1) 3)) (+ (* -1 (sin lambda1)) (* 2 (* (cos lambda1) (sin lambda1))))) (pow (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)) 2)))) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))))) (/ (* (pow (cos lambda1) 2) (sin lambda1)) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1))))) (/ (* (+ 1 (pow (cos lambda1) 3)) (+ (* -1 (sin lambda1)) (* 2 (* (cos lambda1) (sin lambda1))))) (pow (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)) 2)))) (+ (/ 1 (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1))) (/ (pow (cos lambda1) 3) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 3)) #s(hole binary64 (+ 1 (pow (cos lambda1) 3))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 3)) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))) (pow (cos lambda1) 3)))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 3)) #s(hole binary64 (+ 1 (+ (* 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 (+ 1 (pow (cos (- lambda1 lambda2)) 3)) #s(hole binary64 (+ 1 (+ (* 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)) 3) #s(hole binary64 (pow (cos lambda1) 3)))
#s(approx (pow (cos (- lambda1 lambda2)) 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)) 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)) 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 (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1))))
#s(approx (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ 1 (+ (* lambda2 (+ (* -1 (sin lambda1)) (* 2 (* (cos lambda1) (sin lambda1))))) (pow (cos lambda1) 2))) (cos lambda1))))
#s(approx (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ 1 (+ (* lambda2 (+ (* -1 (sin lambda1)) (+ (* 2 (* (cos lambda1) (sin lambda1))) (* lambda2 (- (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (* -1/2 (cos lambda1))))))) (pow (cos lambda1) 2))) (cos lambda1))))
#s(approx (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ 1 (+ (* lambda2 (+ (* -1 (sin lambda1)) (+ (* 2 (* (cos lambda1) (sin lambda1))) (* lambda2 (- (+ (* -1 (pow (cos lambda1) 2)) (+ (* lambda2 (+ (* -1 (* (cos lambda1) (sin lambda1))) (+ (* -1/3 (* (cos lambda1) (sin lambda1))) (* 1/6 (sin lambda1))))) (pow (sin lambda1) 2))) (* -1/2 (cos lambda1))))))) (pow (cos lambda1) 2))) (cos lambda1))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (+ 1 (pow (cos lambda1) 2))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (+ 1 (+ (* 2 (* lambda2 (* (cos lambda1) (sin lambda1)))) (pow (cos lambda1) 2)))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* 2 (* (cos lambda1) (sin lambda1))) (* lambda2 (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (pow (cos lambda1) 2)))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (+ 1 (+ (* 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 (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda2 (- (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* lambda2 (- (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (/ (* (+ (* (cos lambda1) (* (cos phi2) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 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))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 4)) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* lambda2 (- (+ (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* lambda2 (- (* 1/6 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (/ (* (+ (* (cos lambda1) (* (cos phi2) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 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))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 4)) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (/ (* (+ (* -1 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 1/3 (* (cos phi2) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 4)) (+ (/ (* (+ (* (cos lambda1) (* (cos phi2) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 1/6 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (+ (* (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (/ (* (+ (* (cos lambda1) (* (cos phi2) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 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))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 4)) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (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 (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (/ (- 1 (+ (* (cos lambda1) (cos phi2)) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))
#s(approx (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (- (+ (* lambda2 (- (* -1 (/ (+ (* (cos phi2) (sin lambda1)) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (* -2 (/ (* (cos phi2) (* (sin lambda1) (- 1 (+ (* (cos lambda1) (cos phi2)) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 3))))) (/ 1 (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (+ (/ (* (cos lambda1) (cos phi2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- 1 (* (cos lambda1) (cos phi2))))))))
#s(approx (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -1 (/ (+ (* (cos phi2) (sin lambda1)) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (* lambda2 (- (* -1 (/ (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* -1 (/ (+ (* (cos phi2) (sin lambda1)) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (* -2 (/ (* (cos phi2) (* (sin lambda1) (- 1 (+ (* (cos lambda1) (cos phi2)) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 3)))))) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- 1 (+ (* (cos lambda1) (cos phi2)) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2)))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 4)))))) (* -2 (/ (* (cos phi2) (* (sin lambda1) (- 1 (+ (* (cos lambda1) (cos phi2)) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 3))))) (/ 1 (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (+ (/ (* (cos lambda1) (cos phi2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- 1 (* (cos lambda1) (cos phi2))))))))
#s(approx (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -1 (/ (+ (* (cos phi2) (sin lambda1)) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (* lambda2 (- (+ (* -1 (/ (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (* lambda2 (- (* -1 (/ (+ (* -1/6 (* (cos phi2) (sin lambda1))) (* (pow (cos phi2) 2) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 1/6 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (+ (* (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))) (- 1 (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* -1 (/ (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* -1 (/ (+ (* (cos phi2) (sin lambda1)) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (* -2 (/ (* (cos phi2) (* (sin lambda1) (- 1 (+ (* (cos lambda1) (cos phi2)) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 3)))))) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- 1 (+ (* (cos lambda1) (cos phi2)) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2)))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 4)))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (/ (* (+ (* -1 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 1/3 (* (cos phi2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (- 1 (+ (* (cos lambda1) (cos phi2)) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2)))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 4)) (/ (* (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (* -1 (/ (+ (* (cos phi2) (sin lambda1)) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (* -2 (/ (* (cos phi2) (* (sin lambda1) (- 1 (+ (* (cos lambda1) (cos phi2)) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 3))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* -1 (/ (+ (* (cos phi2) (sin lambda1)) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (* -2 (/ (* (cos phi2) (* (sin lambda1) (- 1 (+ (* (cos lambda1) (cos phi2)) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 3)))))) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- 1 (+ (* (cos lambda1) (cos phi2)) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2)))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 4)))))) (* -2 (/ (* (cos phi2) (* (sin lambda1) (- 1 (+ (* (cos lambda1) (cos phi2)) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 3))))) (/ 1 (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (+ (/ (* (cos lambda1) (cos phi2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- 1 (* (cos lambda1) (cos phi2))))))))
#s(approx (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) #s(hole binary64 (- 1 (+ (* (cos lambda1) (cos phi2)) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))
#s(approx (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) #s(hole binary64 (- (+ 1 (* -1 (* lambda2 (+ (* (cos phi2) (sin lambda1)) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2)))))))))))) (+ (* (cos lambda1) (cos phi2)) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))
#s(approx (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) #s(hole binary64 (- (+ 1 (* lambda2 (- (* -1 (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))))))) (+ (* (cos phi2) (sin lambda1)) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2)))))))))))) (+ (* (cos lambda1) (cos phi2)) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))
#s(approx (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) #s(hole binary64 (- (+ 1 (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (+ (* -1/6 (* (cos phi2) (sin lambda1))) (* (pow (cos phi2) 2) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 1/6 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (+ (* (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))) (- 1 (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))))))))) (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))))))) (+ (* (cos phi2) (sin lambda1)) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2)))))))))))) (+ (* (cos lambda1) (cos phi2)) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* (cos lambda1) (cos phi2)) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2))))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* lambda2 (+ (* (cos phi2) (sin lambda1)) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2)))))))))) (+ (* (cos lambda1) (cos phi2)) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2))))))))) (+ (* (cos phi2) (sin lambda1)) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))))))) (+ (* (cos lambda1) (cos phi2)) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (+ (* lambda2 (+ (* -1/6 (* (cos phi2) (sin lambda1))) (* (pow (cos phi2) 2) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 1/6 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (+ (* (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))) (- 1 (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1))))))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))))))) (+ (* (cos phi2) (sin lambda1)) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))))))) (+ (* (cos lambda1) (cos phi2)) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))
#s(approx (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2)))))))
#s(approx (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda2 (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2))))))))
#s(approx (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))))) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2)))))))))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2))))))))
#s(approx (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* lambda2 (* (pow (cos phi2) 2) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 1/6 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (+ (* (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))) (- 1 (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2)))))))))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2))))))))
#s(approx (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (* (pow (cos lambda1) 2) (- 1 (* (cos lambda1) (cos phi2))))))
#s(approx (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2)))))))) (* (pow (cos lambda1) 2) (- 1 (* (cos lambda1) (cos phi2)))))))
#s(approx (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (+ (* 2 (* (cos lambda1) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2)))))) (* lambda2 (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))))))) (* (pow (cos lambda1) 2) (- 1 (* (cos lambda1) (cos phi2)))))))
#s(approx (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (+ (* 2 (* (cos lambda1) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2)))))) (* lambda2 (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (+ (* lambda2 (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 1/6 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (+ (* (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))) (- 1 (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1))))))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2))))))))))) (* (pow (cos lambda1) 2) (- 1 (* (cos lambda1) (cos phi2)))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) #s(hole binary64 (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) #s(hole binary64 (+ (* -2 (* lambda2 (* (cos phi2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) #s(hole binary64 (+ (* lambda2 (+ (* -2 (* (cos phi2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2)))))) (* lambda2 (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) #s(hole binary64 (+ (* lambda2 (+ (* -2 (* (cos phi2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2)))))) (* lambda2 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 1/3 (* (cos phi2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (* lambda2 (- (* -2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (* 1/2 (/ 1 (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (* 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) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))))) (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (* 1/2 (/ 1 (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (* 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) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))))) (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (* 1/2 (/ 1 (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos lambda1) 2)) (- (cos phi1) (cos lambda1)))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (cos lambda1)))) (+ (* lambda2 (- (* -2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (sin lambda1) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))) (* 1/2 (/ 1 (- (cos phi1) (cos lambda1)))))) (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (cos lambda1)))) (+ (* lambda2 (- (+ (* -2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* lambda2 (- (* -1 (/ (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (cos lambda1)))) (+ (* -1 (/ (* (sin lambda1) (- (* -2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (sin lambda1) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))) (- (cos phi1) (cos lambda1)))) (* 1/2 (/ (* (cos lambda1) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))))) (* -1 (/ (* (sin lambda1) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))) (* 1/2 (/ 1 (- (cos phi1) (cos lambda1)))))) (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (cos lambda1)))) (+ (* lambda2 (- (+ (* -2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* lambda2 (- (+ (* -1 (/ (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (cos lambda1)))) (* lambda2 (- (* -1 (/ (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))) (- (cos phi1) (cos lambda1)))) (+ (* -1 (/ (* (sin lambda1) (- (* -1 (/ (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (cos lambda1)))) (+ (* -1 (/ (* (sin lambda1) (- (* -2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (sin lambda1) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))) (- (cos phi1) (cos lambda1)))) (* 1/2 (/ (* (cos lambda1) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2)))))) (- (cos phi1) (cos lambda1)))) (+ (* 1/6 (/ (* (sin lambda1) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))) (* 1/2 (/ (* (cos lambda1) (- (* -2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (sin lambda1) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))) (- (cos phi1) (cos lambda1))))))))) (+ (* -1 (/ (* (sin lambda1) (- (* -2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (sin lambda1) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))) (- (cos phi1) (cos lambda1)))) (* 1/2 (/ (* (cos lambda1) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))))) (* -1 (/ (* (sin lambda1) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))) (* 1/2 (/ 1 (- (cos phi1) (cos lambda1)))))) (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1))))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos lambda1) 2))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ 1/2 (+ (* -2 (* lambda2 (* (cos lambda1) (sin lambda1)))) (* 1/2 (cos (* 2 phi1))))) (pow (cos lambda1) 2))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* lambda2 (- (* -1 (* lambda2 (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 2 (* (cos lambda1) (sin lambda1))))))) (pow (cos lambda1) 2))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 2 (* (cos lambda1) (sin lambda1))))))) (pow (cos lambda1) 2))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* lambda2 (- (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (/ (pow (cos phi1) 6) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (/ (* (pow (cos lambda1) 6) (pow (cos phi2) 6)) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (* lambda2 (- (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (+ (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (- (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))) (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (/ (pow (cos phi1) 6) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (/ (* (pow (cos lambda1) 6) (pow (cos phi2) 6)) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (* lambda2 (- (+ (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (* lambda2 (- (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (+ (* -1/2 (pow (cos lambda1) 3)) (+ (* 2 (* (cos lambda1) (pow (sin lambda1) 2))) (* (cos lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* 2 (* (pow (cos lambda1) 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 phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (+ (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (- (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (- (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (+ (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (- (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))))) (+ (* 1/6 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))))) (+ (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (- (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))) (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (/ (pow (cos phi1) 6) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (/ (* (pow (cos lambda1) 6) (pow (cos phi2) 6)) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (pow (cos lambda1) 6) (pow (cos phi2) 6)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (+ (* lambda2 (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4)))))) (/ (* (pow (cos lambda1) 6) (* (pow (cos phi2) 6) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))))) (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))))) (/ (* (pow (cos lambda1) 6) (pow (cos phi2) 6)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (+ (* lambda2 (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4)))))) (+ (* lambda2 (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (/ (* (cos lambda1) (cos phi2)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (+ (/ (* (+ (* -4 (* (cos phi2) (* (sin lambda1) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))) (+ (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (- (* 2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (pow (cos lambda1) 6) (* (pow (cos phi2) 6) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos lambda1) 6) (* (pow (cos phi2) 6) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (/ (* (cos lambda1) (cos phi2)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (+ (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))))))))) (/ (* (pow (cos lambda1) 6) (* (pow (cos phi2) 6) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))))) (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))))) (/ (* (pow (cos lambda1) 6) (pow (cos phi2) 6)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (+ (* lambda2 (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4)))))) (+ (* lambda2 (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (/ (* (cos lambda1) (cos phi2)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (+ (/ (* (+ (* -4 (* (cos phi2) (* (sin lambda1) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))) (+ (* lambda2 (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (/ (* (cos lambda1) (cos phi2)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/6 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 1/2 (/ (* (cos lambda1) (* (cos phi2) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (+ (* -1/2 (pow (cos lambda1) 3)) (+ (* 2 (* (cos lambda1) (pow (sin lambda1) 2))) (* (cos lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* 2 (* (pow (cos lambda1) 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 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -1 (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1)))) (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))))) (+ (* 1/6 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* (pow (cos phi2) 3) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))) (+ (/ (* (+ (* -4 (* (cos phi2) (* (sin lambda1) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (+ (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))))) (* 2 (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* -1 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 1/3 (* (cos phi2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (+ (/ (* (+ (* -4 (* (cos phi2) (* (sin lambda1) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))))) (+ (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (- (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (- (* 2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (pow (cos lambda1) 6) (* (pow (cos phi2) 6) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos lambda1) 6) (* (pow (cos phi2) 6) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- 1 (* (cos lambda1) (cos phi2)))))) (- (* 2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (pow (cos lambda1) 6) (* (pow (cos phi2) 6) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos lambda1) 6) (* (pow (cos phi2) 6) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))))) (+ (* 1/6 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (/ (* (cos lambda1) (cos phi2)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/6 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 1/2 (/ (* (cos lambda1) (* (cos phi2) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (+ (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 6) (+ (* 2 (* (+ (* -1/2 (pow (cos lambda1) 3)) (+ (* 2 (* (cos lambda1) (pow (sin lambda1) 2))) (* (cos lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* 2 (* (pow (cos lambda1) 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)))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))))))))))) (+ (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (- (* 2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (pow (cos lambda1) 6) (* (pow (cos phi2) 6) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos lambda1) 6) (* (pow (cos phi2) 6) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (/ (* (cos lambda1) (cos phi2)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (+ (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))))))))) (/ (* (pow (cos lambda1) 6) (* (pow (cos phi2) 6) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))))) (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))))) (/ (* (pow (cos lambda1) 6) (pow (cos phi2) 6)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (+ (* lambda2 (- (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4)))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))) (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (+ (* lambda2 (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4)))))) (* lambda2 (- (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (/ (* (cos lambda1) (cos phi2)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (+ (/ (* (+ (* -4 (* (cos phi2) (* (sin lambda1) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (/ (* (cos lambda1) (cos phi2)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))) (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (+ (* lambda2 (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4)))))) (* lambda2 (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (/ (* (cos lambda1) (cos phi2)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (+ (/ (* (+ (* -4 (* (cos phi2) (* (sin lambda1) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))) (* lambda2 (- (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (/ (* (cos lambda1) (cos phi2)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/6 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 1/2 (/ (* (cos lambda1) (* (cos phi2) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (+ (* -1/2 (pow (cos lambda1) 3)) (+ (* 2 (* (cos lambda1) (pow (sin lambda1) 2))) (* (cos lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* 2 (* (pow (cos lambda1) 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 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -1 (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1)))) (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))))) (+ (* 1/6 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* (pow (cos phi2) 3) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))) (+ (/ (* (+ (* -4 (* (cos phi2) (* (sin lambda1) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (+ (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))))) (* 2 (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* -1 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 1/3 (* (cos phi2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (+ (/ (* (+ (* -4 (* (cos phi2) (* (sin lambda1) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (/ (* (cos lambda1) (cos phi2)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/6 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 1/2 (/ (* (cos lambda1) (* (cos phi2) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (/ (* (cos lambda1) (cos phi2)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))) (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))))))
#s(approx (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) #s(hole binary64 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))))
#s(approx (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) #s(hole binary64 (+ (* lambda2 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4)))))) (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))))
#s(approx (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (/ (* (cos lambda1) (cos phi2)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (+ (/ (* (+ (* -4 (* (cos phi2) (* (sin lambda1) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))) (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))))) (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))))
#s(approx (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* lambda2 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (/ (* (cos lambda1) (cos phi2)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/6 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 1/2 (/ (* (cos lambda1) (* (cos phi2) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (+ (* -1/2 (pow (cos lambda1) 3)) (+ (* 2 (* (cos lambda1) (pow (sin lambda1) 2))) (* (cos lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* 2 (* (pow (cos lambda1) 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 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -1 (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1)))) (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))))) (+ (* 1/6 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* (pow (cos phi2) 3) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))) (+ (/ (* (+ (* -4 (* (cos phi2) (* (sin lambda1) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (+ (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))))) (* 2 (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* -1 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 1/3 (* (cos phi2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (+ (/ (* (+ (* -4 (* (cos phi2) (* (sin lambda1) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))))) (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (/ (* (cos lambda1) (cos phi2)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (+ (/ (* (+ (* -4 (* (cos phi2) (* (sin lambda1) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))))) (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))))) (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))))
#s(approx (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) #s(hole binary64 (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))
#s(approx (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) #s(hole binary64 (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* lambda2 (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))))
#s(approx (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) #s(hole binary64 (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* lambda2 (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* lambda2 (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (/ (* (cos lambda1) (cos phi2)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (+ (/ (* (+ (* -4 (* (cos phi2) (* (sin lambda1) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))))
#s(approx (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) #s(hole binary64 (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* lambda2 (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* lambda2 (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (/ (* (cos lambda1) (cos phi2)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* lambda2 (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (/ (* (cos lambda1) (cos phi2)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/6 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 1/2 (/ (* (cos lambda1) (* (cos phi2) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (+ (* -1/2 (pow (cos lambda1) 3)) (+ (* 2 (* (cos lambda1) (pow (sin lambda1) 2))) (* (cos lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* 2 (* (pow (cos lambda1) 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 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -1 (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1)))) (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))))) (+ (* 1/6 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* (pow (cos phi2) 3) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))) (+ (/ (* (+ (* -4 (* (cos phi2) (* (sin lambda1) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (+ (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))))) (* 2 (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* -1 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 1/3 (* (cos phi2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (+ (/ (* (+ (* -4 (* (cos phi2) (* (sin lambda1) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))) (+ (/ (* (+ (* -4 (* (cos phi2) (* (sin lambda1) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))))
#s(approx (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))))
#s(approx (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* -1 (* lambda2 (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))) (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))))))
#s(approx (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda2 (- (* -1 (* lambda2 (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (/ (* (cos lambda1) (cos phi2)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))) (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))))))
#s(approx (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (/ (* (cos lambda1) (cos phi2)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/6 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 1/2 (/ (* (cos lambda1) (* (cos phi2) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (/ (* (cos lambda1) (cos phi2)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))) (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))))))
#s(approx (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))))
#s(approx (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))))
#s(approx (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (+ (* lambda2 (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- 1 (* (cos lambda1) (cos phi2))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))))
#s(approx (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (+ (* lambda2 (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (+ (* lambda2 (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))))) (+ (* 1/6 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))))
#s(approx (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) #s(hole binary64 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))
#s(approx (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))) (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))))))
#s(approx (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (+ (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))) (* lambda2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))))) (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))))))
#s(approx (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (+ (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))) (* lambda2 (+ (* lambda2 (+ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))))))) (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))))))
#s(approx (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) #s(hole binary64 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))))
#s(approx (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) #s(hole binary64 (+ (* lambda2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))) (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))
#s(approx (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) #s(hole binary64 (+ (* lambda2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (+ (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))) (* lambda2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))))) (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))
#s(approx (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) #s(hole binary64 (+ (* lambda2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (+ (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))) (* lambda2 (+ (* lambda2 (+ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))))))) (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))
#s(approx (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) #s(hole binary64 (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))
#s(approx (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) #s(hole binary64 (+ (* 4 (* lambda2 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))))
#s(approx (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) #s(hole binary64 (+ (* lambda2 (+ (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))) (* lambda2 (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))))
#s(approx (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) #s(hole binary64 (+ (* lambda2 (+ (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))) (* lambda2 (+ (* lambda2 (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))))) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))))
#s(approx (pow (cos (- lambda1 lambda2)) 4) #s(hole binary64 (pow (cos lambda1) 4)))
#s(approx (pow (cos (- lambda1 lambda2)) 4) #s(hole binary64 (+ (* 4 (* lambda2 (* (pow (cos lambda1) 3) (sin lambda1)))) (pow (cos lambda1) 4))))
#s(approx (pow (cos (- lambda1 lambda2)) 4) #s(hole binary64 (+ (* lambda2 (+ (* 4 (* (pow (cos lambda1) 3) (sin lambda1))) (* lambda2 (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (pow (cos lambda1) 4))))
#s(approx (pow (cos (- lambda1 lambda2)) 4) #s(hole binary64 (+ (* lambda2 (+ (* 4 (* (pow (cos lambda1) 3) (sin lambda1))) (* lambda2 (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (+ (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))) (* lambda2 (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))))))) (pow (cos lambda1) 4))))
#s(approx (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) #s(hole binary64 (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))
#s(approx (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) #s(hole binary64 (+ (* lambda2 (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))
#s(approx (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) #s(hole binary64 (+ (* lambda2 (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* lambda2 (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (+ (/ (* (+ (* -4 (* (cos phi2) (* (sin lambda1) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))
#s(approx (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) #s(hole binary64 (+ (* lambda2 (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* lambda2 (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* lambda2 (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (+ (* -1/2 (pow (cos lambda1) 3)) (+ (* 2 (* (cos lambda1) (pow (sin lambda1) 2))) (* (cos lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* 2 (* (pow (cos lambda1) 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 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -1 (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1)))) (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))))) (+ (* 1/6 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* (pow (cos phi2) 3) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (+ (/ (* (+ (* -4 (* (cos phi2) (* (sin lambda1) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (+ (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))))) (* 2 (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* -1 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 1/3 (* (cos phi2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (+ (/ (* (+ (* -4 (* (cos phi2) (* (sin lambda1) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (+ (/ (* (+ (* -4 (* (cos phi2) (* (sin lambda1) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))
#s(approx (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) #s(hole binary64 (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))))
#s(approx (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) #s(hole binary64 (+ (* lambda2 (+ (* -2 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))))) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))))))
#s(approx (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) #s(hole binary64 (+ (* lambda2 (+ (* -2 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))))) (+ (* lambda2 (+ (* -2 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))))) (+ (* -1 (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))))) (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))))) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))))))
#s(approx (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) #s(hole binary64 (+ (* lambda2 (+ (* -2 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))))) (+ (* lambda2 (+ (* -2 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))))) (+ (* -1 (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))))) (+ (* lambda2 (+ (* -2 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))))) (+ (* -1 (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))))) (+ (* -1 (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (+ (* -1/2 (pow (cos lambda1) 3)) (+ (* 2 (* (cos lambda1) (pow (sin lambda1) 2))) (* (cos lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* 2 (* (pow (cos lambda1) 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)))))))))))) (* (+ (* -1 (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1)))) (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))))) (+ (* 1/6 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* (pow (cos phi2) 3) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))))))) (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))))))) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))))))
#s(approx (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) #s(hole binary64 (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))))
#s(approx (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) #s(hole binary64 (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (+ (* lambda2 (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))))))
#s(approx (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) #s(hole binary64 (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (+ (* lambda2 (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (+ (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))) (* lambda2 (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2)))))))))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))))))
#s(approx (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) #s(hole binary64 (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (+ (* lambda2 (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (+ (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))) (* lambda2 (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2)))) (* lambda2 (+ (* -1 (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1)))) (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))))) (+ (* 1/6 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* (pow (cos phi2) 3) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))))))))))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))))))
#s(approx (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) #s(hole binary64 (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))))
#s(approx (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) #s(hole binary64 (+ (* lambda2 (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))))
#s(approx (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) #s(hole binary64 (+ (* lambda2 (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* lambda2 (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2)))))))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))))
#s(approx (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) #s(hole binary64 (+ (* lambda2 (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* lambda2 (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2)))) (* lambda2 (+ (* -1 (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1)))) (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/6 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* (pow (cos phi2) 3) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))))))))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))))
#s(approx (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) #s(hole binary64 (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))
#s(approx (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) #s(hole binary64 (- (+ (* -2 (* lambda2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))))) (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))) 2)))
#s(approx (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) #s(hole binary64 (- (+ (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* lambda2 (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* -1 (* lambda2 (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))) 2)))
#s(approx (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) #s(hole binary64 (- (+ (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* lambda2 (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* lambda2 (+ (* -1 (* lambda2 (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))))) (* -1 (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))))) 2)))
#s(approx (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ (* -2 (* lambda2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))))) (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))))
#s(approx (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* lambda2 (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* -1 (* lambda2 (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))))))
#s(approx (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* lambda2 (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* lambda2 (+ (* -1 (* lambda2 (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))))) (* -1 (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))))))
#s(approx (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))
#s(approx (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (+ (* 2 (* lambda2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) #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 (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) #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 (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) #s(hole binary64 (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))))
#s(approx (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) #s(hole binary64 (- (+ 1 (* -2 (* lambda2 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))))) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))))
#s(approx (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) #s(hole binary64 (- (+ 1 (* lambda2 (- (* -1 (* lambda2 (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))))) (* 2 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))))))) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))))
#s(approx (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) #s(hole binary64 (- (+ 1 (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (* (pow (cos phi2) 6) (+ (* 2 (* (+ (* -1/2 (pow (cos lambda1) 3)) (+ (* 2 (* (cos lambda1) (pow (sin lambda1) 2))) (* (cos lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* 2 (* (pow (cos lambda1) 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) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))))) (* 2 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))))))) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))))
#s(approx (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) #s(hole binary64 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))
#s(approx (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) #s(hole binary64 (+ (* 2 (* lambda2 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))))) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))))
#s(approx (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) #s(hole binary64 (+ (* lambda2 (+ (* 2 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* lambda2 (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))))) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))))
#s(approx (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) #s(hole binary64 (+ (* lambda2 (+ (* 2 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* lambda2 (+ (* lambda2 (* (pow (cos phi2) 6) (+ (* 2 (* (+ (* -1/2 (pow (cos lambda1) 3)) (+ (* 2 (* (cos lambda1) (pow (sin lambda1) 2))) (* (cos lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* 2 (* (pow (cos lambda1) 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) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))))))) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))))
#s(approx (pow (cos (- lambda1 lambda2)) 6) #s(hole binary64 (pow (cos lambda1) 6)))
#s(approx (pow (cos (- lambda1 lambda2)) 6) #s(hole binary64 (+ (* 2 (* lambda2 (* (pow (cos lambda1) 3) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (pow (cos lambda1) 6))))
#s(approx (pow (cos (- lambda1 lambda2)) 6) #s(hole binary64 (+ (* lambda2 (+ (* 2 (* (pow (cos lambda1) 3) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* lambda2 (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))))) (pow (cos lambda1) 6))))
#s(approx (pow (cos (- lambda1 lambda2)) 6) #s(hole binary64 (+ (* lambda2 (+ (* 2 (* (pow (cos lambda1) 3) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* lambda2 (+ (* 2 (* (pow (cos lambda1) 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))))))) (+ (* lambda2 (+ (* 2 (* (+ (* -1/2 (pow (cos lambda1) 3)) (+ (* 2 (* (cos lambda1) (pow (sin lambda1) 2))) (* (cos lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))))) (pow (cos lambda1) 6))))
#s(approx (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))
#s(approx (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (* lambda2 (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))
#s(approx (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (* lambda2 (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (* lambda2 (+ (* -4 (* (cos phi2) (* (sin lambda1) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))
#s(approx (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (* lambda2 (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (* lambda2 (+ (* -4 (* (cos phi2) (* (sin lambda1) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* lambda2 (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))))) (* 2 (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* -1 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 1/3 (* (cos phi2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2)))))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))))))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))
#s(approx (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) #s(hole binary64 (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2)))
#s(approx (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) #s(hole binary64 (+ (* 2 (* lambda2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2))))
#s(approx (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) #s(hole binary64 (+ (* lambda2 (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* lambda2 (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2))))) (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2))))
#s(approx (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) #s(hole binary64 (+ (* lambda2 (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* lambda2 (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (+ (* lambda2 (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))))) (* 2 (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)))))) (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2))))
#s(approx (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (/ (* (pow (cos lambda1) 6) (pow (cos phi2) 6)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda2 (- (* 2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (pow (cos lambda1) 6) (* (pow (cos phi2) 6) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ (* (pow (cos lambda1) 6) (pow (cos phi2) 6)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))))))
#s(approx (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda2 (- (+ (* 2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (* lambda2 (- (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (- (* 2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (pow (cos lambda1) 6) (* (pow (cos phi2) 6) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos lambda1) 6) (* (pow (cos phi2) 6) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))) (/ (* (pow (cos lambda1) 6) (* (pow (cos phi2) 6) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ (* (pow (cos lambda1) 6) (pow (cos phi2) 6)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))))))
#s(approx (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda2 (- (+ (* 2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (* lambda2 (- (+ (* lambda2 (- (/ (* (pow (cos phi2) 6) (+ (* 2 (* (+ (* -1/2 (pow (cos lambda1) 3)) (+ (* 2 (* (cos lambda1) (pow (sin lambda1) 2))) (* (cos lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* 2 (* (pow (cos lambda1) 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)))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (- (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (- (* 2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (pow (cos lambda1) 6) (* (pow (cos phi2) 6) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos lambda1) 6) (* (pow (cos phi2) 6) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- 1 (* (cos lambda1) (cos phi2)))))) (- (* 2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (pow (cos lambda1) 6) (* (pow (cos phi2) 6) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos lambda1) 6) (* (pow (cos phi2) 6) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))))) (+ (* 1/6 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))) (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (- (* 2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (pow (cos lambda1) 6) (* (pow (cos phi2) 6) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos lambda1) 6) (* (pow (cos phi2) 6) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))) (/ (* (pow (cos lambda1) 6) (* (pow (cos phi2) 6) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ (* (pow (cos lambda1) 6) (pow (cos phi2) 6)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))))))
#s(approx (* (cos phi2) (cos lambda2)) #s(hole binary64 (cos phi2)))
#s(approx (* (cos phi2) (cos lambda2)) #s(hole binary64 (+ (cos phi2) (* -1/2 (* (pow lambda2 2) (cos phi2))))))
#s(approx (* (cos phi2) (cos lambda2)) #s(hole binary64 (+ (cos phi2) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda2 2) (cos phi2))))))))
#s(approx (* (cos phi2) (cos lambda2)) #s(hole binary64 (+ (cos phi2) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (cos phi2))) (* 1/24 (cos phi2)))))))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (/ (* (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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) (- (* 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 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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi1) (* (cos phi2) (sin lambda1)))) 2)) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2)))) 3))) (+ (/ (* (- (* 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) (- (* 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) 3) (* (pow (cos phi2) 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)) (/ (* (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))))))) (/ (* (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) (- (* 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 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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi1) (* (cos phi2) (sin lambda1)))) 2)) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (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 lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (* (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (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))))))) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2)))) 3))) (+ (/ (* (- (* 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))))) (+ (/ (* (- (* 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) (- (* 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) 3) (* (pow (cos phi2) 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))))) (- (+ (* (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) (- (* 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) 3) (* (pow (cos phi2) 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)) (/ (* (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))))))))) (/ (* (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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi1) (* (cos phi2) (sin lambda1)))) 2)) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2)))) 3))) (+ (/ (* (- (* 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) (- (* 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) 3) (* (pow (cos phi2) 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)) (/ (* (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))))))) (/ (* (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) (- (* 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 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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (pow (cos phi1) 3) (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2)))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* -1 (/ (* lambda2 (* (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 phi1) 3) (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* lambda2 (- (* -1 (* lambda2 (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi1) (* (cos phi2) (sin lambda1)))) 2)) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (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))))) (/ (* (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 phi1) 3) (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (+ (* -1 (/ (* (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi1) (* (cos phi2) (sin lambda1)))) 2)) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (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 lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (* (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (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))))))) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi1) (* (cos phi2) (sin lambda1)))) 2)) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (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))))) (/ (* (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 phi1) 3) (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2))))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* lambda2 (- (/ (* (cos phi2) (sin lambda1)) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))))) (/ 1 (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* lambda2 (- (+ (* lambda2 (- (* -1/2 (/ (* (cos lambda1) (cos phi2)) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))) (+ (/ (* (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1))) (- (/ (* (cos phi2) (sin lambda1)) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))))) (/ (* (cos phi2) (sin lambda1)) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))))) (/ 1 (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* lambda2 (- (+ (* lambda2 (- (+ (* -1/2 (/ (* (cos lambda1) (cos phi2)) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))) (* lambda2 (- (* -1/6 (/ (* (cos phi2) (sin lambda1)) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))) (+ (/ (* (- (* -1/2 (/ (* (cos lambda1) (cos phi2)) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))) (+ (/ (* (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1))) (- (/ (* (cos phi2) (sin lambda1)) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)))) (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (+ (/ (* (- (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* -1/2 (* (cos lambda1) (cos phi2)))) (- (/ (* (cos phi2) (sin lambda1)) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))))))) (+ (/ (* (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1))) (- (/ (* (cos phi2) (sin lambda1)) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))))) (/ (* (cos phi2) (sin lambda1)) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))))) (/ 1 (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* lambda2 (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1)))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))) (* (cos lambda1) (cos phi2)))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* 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 phi2)))))) (* (cos phi2) (sin lambda1)))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))) (* (cos lambda1) (cos phi2)))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* 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 phi2) (sin lambda1))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* -1/2 (* (cos lambda1) (cos phi2)))))) (* (cos phi2) (sin lambda1)))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))) (* (cos lambda1) (cos phi2)))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (+ (* 2 (* lambda2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (+ (* 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 (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (+ (* 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 (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (* (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)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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) (- (* 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))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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))))) (+ (/ (* (- (* 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) (- (* 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) 3) (* (pow (cos phi2) 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))))) (/ (* (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) (- (* 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))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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))))) (+ (/ (* (- (* 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))))) (+ (/ (* (- (* 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) (- (* 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) 3) (* (pow (cos phi2) 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))))) (- (+ (* (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) (- (* 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) 3) (* (pow (cos phi2) 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)))))) (/ (* (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)))))) (+ (/ (* (- (* 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) (- (* 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) 3) (* (pow (cos phi2) 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))))) (/ (* (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) (- (* 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))))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) #s(hole binary64 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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)))))
#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 phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (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))) (* -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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (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))))) (* -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 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))))
#s(approx (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* lambda2 (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1)))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))) (* (cos lambda1) (cos phi2)))))
#s(approx (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* 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 phi2)))))) (* (cos phi2) (sin lambda1)))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))) (* (cos lambda1) (cos phi2)))))
#s(approx (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* 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 phi2) (sin lambda1))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* -1/2 (* (cos lambda1) (cos phi2)))))) (* (cos phi2) (sin lambda1)))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))) (* (cos lambda1) (cos phi2)))))
#s(approx (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ 1 (+ (* 2 (* lambda2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))))
#s(approx (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ 1 (+ (* 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 (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ 1 (+ (* 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 (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 1))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (+ 1 (* lambda1 lambda2))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2))))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (+ 1 (* lambda2 (+ lambda1 (* lambda2 (- (* -1/6 (* lambda1 lambda2)) 1/2)))))))
#s(approx (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2)))) #s(hole binary64 1))
#s(approx (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2)))) #s(hole binary64 (+ 1 (* lambda1 lambda2))))
#s(approx (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2)))) #s(hole binary64 (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2))))))
#s(approx (* lambda2 (+ lambda1 (* -1/2 lambda2))) #s(hole binary64 (* lambda2 (+ lambda1 (* -1/2 lambda2)))))
#s(approx (* -1/2 lambda2) #s(hole binary64 (* -1/2 lambda2)))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) #s(hole binary64 1))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) #s(hole binary64 (+ 1 (* lambda1 lambda2))))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) #s(hole binary64 (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2))))))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) #s(hole binary64 (+ 1 (* lambda2 (+ lambda1 (* lambda2 (- (* -1/6 (* lambda1 lambda2)) 1/2)))))))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) #s(hole binary64 (/ 1 lambda1)))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) #s(hole binary64 (+ lambda2 (/ 1 lambda1))))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) #s(hole binary64 (+ (* lambda2 (+ 1 (* -1/2 (/ lambda2 lambda1)))) (/ 1 lambda1))))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) #s(hole binary64 (+ (* lambda2 (+ 1 (* lambda2 (- (* -1/6 lambda2) (* 1/2 (/ 1 lambda1)))))) (/ 1 lambda1))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) #s(hole binary64 (* (pow lambda1 2) (- (/ 1 (pow lambda1 2)) 1/2))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) #s(hole binary64 (+ (* lambda1 lambda2) (* (pow lambda1 2) (- (/ 1 (pow lambda1 2)) 1/2)))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) #s(hole binary64 (+ (* lambda2 (+ lambda1 (* (pow lambda1 2) (* lambda2 (- 1/4 (* 1/2 (/ 1 (pow lambda1 2)))))))) (* (pow lambda1 2) (- (/ 1 (pow lambda1 2)) 1/2)))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) #s(hole binary64 (+ (* lambda2 (+ lambda1 (* lambda2 (+ (* -1/6 (* lambda1 lambda2)) (* (pow lambda1 2) (- 1/4 (* 1/2 (/ 1 (pow lambda1 2))))))))) (* (pow lambda1 2) (- (/ 1 (pow lambda1 2)) 1/2)))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) #s(hole binary64 (- (/ 1 (pow lambda1 2)) 1/2)))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) #s(hole binary64 (- (+ (/ 1 (pow lambda1 2)) (/ lambda2 lambda1)) 1/2)))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) #s(hole binary64 (- (+ (* lambda2 (+ (* lambda2 (- 1/4 (* 1/2 (/ 1 (pow lambda1 2))))) (/ 1 lambda1))) (/ 1 (pow lambda1 2))) 1/2)))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) #s(hole binary64 (- (+ (* lambda2 (+ (* lambda2 (- (+ 1/4 (* -1/6 (/ lambda2 lambda1))) (* 1/2 (/ 1 (pow lambda1 2))))) (/ 1 lambda1))) (/ 1 (pow lambda1 2))) 1/2)))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) #s(hole binary64 (/ -1 (pow lambda1 2))))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) #s(hole binary64 (- (* -1 (/ lambda2 lambda1)) (/ 1 (pow lambda1 2)))))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) #s(hole binary64 (- (* lambda2 (- (* 1/2 (/ lambda2 (pow lambda1 2))) (/ 1 lambda1))) (/ 1 (pow lambda1 2)))))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) #s(hole binary64 (- (* lambda2 (- (* lambda2 (+ (* 1/6 (/ lambda2 lambda1)) (* 1/2 (/ 1 (pow lambda1 2))))) (/ 1 lambda1))) (/ 1 (pow lambda1 2)))))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) #s(hole binary64 (/ -1 lambda1)))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) #s(hole binary64 (- (* -1 lambda2) (/ 1 lambda1))))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) #s(hole binary64 (- (* lambda2 (- (* 1/2 (/ lambda2 lambda1)) 1)) (/ 1 lambda1))))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) #s(hole binary64 (- (* lambda2 (- (* lambda2 (+ (* 1/6 lambda2) (* 1/2 (/ 1 lambda1)))) 1)) (/ 1 lambda1))))
#s(approx (* -1 (/ (cos lambda2) lambda1)) #s(hole binary64 (/ -1 lambda1)))
#s(approx (* -1 (/ (cos lambda2) lambda1)) #s(hole binary64 (- (* 1/2 (/ (pow lambda2 2) lambda1)) (/ 1 lambda1))))
#s(approx (* -1 (/ (cos lambda2) lambda1)) #s(hole binary64 (- (* (pow lambda2 2) (+ (* -1/24 (/ (pow lambda2 2) lambda1)) (* 1/2 (/ 1 lambda1)))) (/ 1 lambda1))))
#s(approx (* -1 (/ (cos lambda2) lambda1)) #s(hole binary64 (- (* (pow lambda2 2) (+ (* (pow lambda2 2) (- (* 1/720 (/ (pow lambda2 2) lambda1)) (* 1/24 (/ 1 lambda1)))) (* 1/2 (/ 1 lambda1)))) (/ 1 lambda1))))
#s(approx (* -1/2 (cos lambda2)) #s(hole binary64 -1/2))
#s(approx (* -1/2 (cos lambda2)) #s(hole binary64 (- (* 1/4 (pow lambda2 2)) 1/2)))
#s(approx (* -1/2 (cos lambda2)) #s(hole binary64 (- (* (pow lambda2 2) (+ 1/4 (* -1/48 (pow lambda2 2)))) 1/2)))
#s(approx (* -1/2 (cos lambda2)) #s(hole binary64 (- (* (pow lambda2 2) (+ 1/4 (* (pow lambda2 2) (- (* 1/1440 (pow lambda2 2)) 1/48)))) 1/2)))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (/ (* lambda2 (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1)))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda2 (- (* -1 (* lambda2 (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (+ (* 1/6 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1)))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (/ (* (cos phi2) (* (sin lambda1) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- 1 (* (cos lambda1) (cos phi2))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (/ 1 (- 1 (* (cos lambda1) (cos phi2)))) (/ (* lambda2 (* (cos phi2) (sin lambda1))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* lambda2 (- (* -1 (* lambda2 (+ (* -1 (/ (* (pow (cos phi2) 2) (pow (sin lambda1) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 3))) (* 1/2 (/ (* (cos lambda1) (cos phi2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (* -1 (/ (* (cos phi2) (sin lambda1)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ 1 (- 1 (* (cos lambda1) (cos phi2)))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (+ (* 1/6 (/ (* (cos phi2) (sin lambda1)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (+ (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (pow (- 1 (* (cos lambda1) (cos phi2))) 3))) (/ (* (cos phi2) (* (sin lambda1) (+ (* -1 (/ (* (pow (cos phi2) 2) (pow (sin lambda1) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 3))) (* 1/2 (/ (* (cos lambda1) (cos phi2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* -1 (/ (* (pow (cos phi2) 2) (pow (sin lambda1) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 3))) (* 1/2 (/ (* (cos lambda1) (cos phi2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (* -1 (/ (* (cos phi2) (sin lambda1)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ 1 (- 1 (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (/ (* (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 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* 1/2 (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))))) (* -1 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (+ (* lambda2 (- (/ (* (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) (- (/ (* (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 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* 1/2 (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (* 1/6 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (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 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))) (/ (* (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 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* 1/2 (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))))) (* -1 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #s(hole binary64 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #s(hole binary64 (+ (* 2 (* lambda2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 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 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1)))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (- (* 2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (pow (- (cos phi1) (cos lambda1)) 2))))) (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (- (+ (* 2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* lambda2 (- (+ (* -1 (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1)))) (/ (pow (sin lambda1) 2) (- (cos phi1) (cos lambda1)))) (+ (* -1 (/ (* (sin lambda1) (- (* 2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (pow (- (cos phi1) (cos lambda1)) 2))))) (- (cos phi1) (cos lambda1)))) (* 1/2 (/ (pow (cos lambda1) 3) (pow (- (cos phi1) (cos lambda1)) 2))))))) (* -1 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (pow (- (cos phi1) (cos lambda1)) 2))))) (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (- (+ (* 2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* lambda2 (- (+ (* -1 (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1)))) (+ (* lambda2 (- (+ (* -1 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1/3 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1))))) (+ (* -1 (/ (* (sin lambda1) (- (+ (* -1 (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1)))) (/ (pow (sin lambda1) 2) (- (cos phi1) (cos lambda1)))) (+ (* -1 (/ (* (sin lambda1) (- (* 2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (pow (- (cos phi1) (cos lambda1)) 2))))) (- (cos phi1) (cos lambda1)))) (* 1/2 (/ (pow (cos lambda1) 3) (pow (- (cos phi1) (cos lambda1)) 2)))))) (- (cos phi1) (cos lambda1)))) (+ (* 1/6 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (pow (- (cos phi1) (cos lambda1)) 2))) (* 1/2 (/ (* (cos lambda1) (- (* 2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (pow (- (cos phi1) (cos lambda1)) 2))))) (- (cos phi1) (cos lambda1)))))))) (/ (pow (sin lambda1) 2) (- (cos phi1) (cos lambda1))))) (+ (* -1 (/ (* (sin lambda1) (- (* 2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (pow (- (cos phi1) (cos lambda1)) 2))))) (- (cos phi1) (cos lambda1)))) (* 1/2 (/ (pow (cos lambda1) 3) (pow (- (cos phi1) (cos lambda1)) 2))))))) (* -1 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (pow (- (cos phi1) (cos lambda1)) 2))))) (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) #s(hole binary64 (+ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (cos phi1) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (cos phi1) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ (* lambda2 (- (* -1 (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1)))) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))))) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -1 (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1)))) (* lambda2 (- (* 1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2)))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))))) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))))) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -1 (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1)))) (* lambda2 (- (+ (* 1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2)))) (* lambda2 (- (* 1/6 (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1)))) (* (pow (cos phi2) 2) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 1/6 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (+ (* (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))))))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))))) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))))) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* -1 (* lambda2 (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))))) (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1)))) (* 1/2 (* lambda2 (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))))))) (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1)))) (* lambda2 (+ (* 1/6 (* lambda2 (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))))) (* 1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2)))))))) (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* lambda2 (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* lambda2 (* (pow (cos phi2) 2) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 1/6 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (+ (* (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* -2 (* lambda2 (* (cos phi2) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda2 (+ (* -2 (* (cos phi2) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (* lambda2 (+ (* (cos lambda1) (* (cos phi2) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda2 (+ (* -2 (* (cos phi2) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (* lambda2 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 1/3 (* (cos phi2) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (+ (* (cos lambda1) (* (cos phi2) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))
#s(approx (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #s(hole binary64 (- (pow (cos phi1) 2) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #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 (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #s(hole binary64 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #s(hole binary64 (+ (* 2 (* lambda2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #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 (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #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 (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (* 2 (log (* (cos lambda1) (cos phi2))))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (+ (* 2 (log (* (cos lambda1) (cos phi2)))) (* 2 (/ (* lambda2 (sin lambda1)) (cos lambda1))))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (+ (* 2 (log (* (cos lambda1) (cos phi2)))) (* lambda2 (+ (* 2 (/ (sin lambda1) (cos lambda1))) (* lambda2 (- (* -1 (/ (pow (sin lambda1) 2) (pow (cos lambda1) 2))) 1)))))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (+ (* 2 (log (* (cos lambda1) (cos phi2)))) (* lambda2 (+ (* 2 (/ (sin lambda1) (cos lambda1))) (* lambda2 (- (+ (* -1 (/ (pow (sin lambda1) 2) (pow (cos lambda1) 2))) (* 1/3 (* lambda2 (+ (* -1 (/ (sin lambda1) (cos lambda1))) (+ (* 2 (/ (pow (sin lambda1) 3) (pow (cos lambda1) 3))) (* 3 (/ (sin lambda1) (cos lambda1)))))))) 1)))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (log (* (cos lambda1) (cos phi2)))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (+ (log (* (cos lambda1) (cos phi2))) (/ (* lambda2 (sin lambda1)) (cos lambda1)))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (+ (log (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* 1/2 (* lambda2 (- (* -1 (/ (pow (sin lambda1) 2) (pow (cos lambda1) 2))) 1))) (/ (sin lambda1) (cos lambda1)))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (+ (log (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* lambda2 (+ (* 1/6 (* lambda2 (+ (* -1 (/ (sin lambda1) (cos lambda1))) (+ (* 2 (/ (pow (sin lambda1) 3) (pow (cos lambda1) 3))) (* 3 (/ (sin lambda1) (cos lambda1))))))) (* 1/2 (- (* -1 (/ (pow (sin lambda1) 2) (pow (cos lambda1) 2))) 1)))) (/ (sin lambda1) (cos lambda1)))))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (+ (* -1 (pow lambda2 3)) (pow lambda1 3))))
#s(approx (pow lambda2 3) #s(hole binary64 (pow lambda2 3)))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 lambda2) (pow lambda1 2))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) #s(hole binary64 (* lambda2 (+ lambda1 lambda2))))
#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 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 (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ 1 (* (cos lambda1) (cos phi2)))))
#s(approx (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ 1 (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ 1 (+ (* 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 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (/ (+ (pow lambda1 3) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 3)) (- (+ (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)) (* lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (- (+ (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)) (* lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) #s(hole binary64 (- (pow lambda1 2) (* lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) #s(hole binary64 (/ (- (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)) (- lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* lambda2 (- (* -1 (/ (+ (* -1 (pow lambda1 2)) (pow lambda1 2)) (pow lambda2 2))) (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* lambda2 (- (/ (* lambda1 (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) (pow lambda2 3)) (+ 1 (+ (* -1 (/ lambda1 lambda2)) (+ (* -1 (/ (pow lambda1 2) (pow lambda2 2))) (/ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (cos (neg lambda2)) #s(hole binary64 (cos (neg lambda2))))
#s(approx (sin (neg lambda2)) #s(hole binary64 (sin (neg lambda2))))
#s(approx (* lambda2 (- (/ lambda1 lambda2) 1)) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1))))
#s(approx (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos lambda2) (cos phi2)))))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) #s(hole binary64 (* -1 lambda2)))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) #s(hole binary64 (* lambda2 (- (+ (* 1/2 (/ (PI) lambda2)) (/ lambda1 lambda2)) 1))))
#s(approx (cos lambda2) #s(hole binary64 (cos lambda2)))
#s(approx (sin lambda2) #s(hole binary64 (sin lambda2)))
#s(approx (+ (cos lambda2) (cos phi1)) #s(hole binary64 (+ (cos lambda2) (cos phi1))))
#s(approx (neg (sin lambda2)) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))))
#s(approx (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))) #s(hole binary64 (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg 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 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) #s(hole binary64 (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))))
#s(approx (sin (+ lambda2 (/ (PI) 2))) #s(hole binary64 (sin (+ lambda2 (* 1/2 (PI))))))
#s(approx (+ lambda2 (/ (PI) 2)) #s(hole binary64 lambda2))
#s(approx (+ lambda2 (/ (PI) 2)) #s(hole binary64 (* lambda2 (+ 1 (* 1/2 (/ (PI) lambda2))))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) #s(hole binary64 (* 1/6 (pow lambda2 3))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) #s(hole binary64 (* (pow lambda2 3) (+ 1/6 (* -1/2 (/ lambda1 lambda2))))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) #s(hole binary64 (* (pow lambda2 3) (- (+ 1/6 (* -1/2 (/ lambda1 lambda2))) (/ 1 (pow lambda2 2))))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) #s(hole binary64 (* (pow lambda2 3) (- (+ 1/6 (+ (* -1/2 (/ lambda1 lambda2)) (/ lambda1 (pow lambda2 3)))) (/ 1 (pow lambda2 2))))))
#s(approx (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)) #s(hole binary64 (* 1/6 (pow lambda2 3))))
#s(approx (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)) #s(hole binary64 (* (pow lambda2 3) (+ 1/6 (* -1/2 (/ lambda1 lambda2))))))
#s(approx (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)) #s(hole binary64 (* (pow lambda2 3) (- (+ 1/6 (* -1/2 (/ lambda1 lambda2))) (/ 1 (pow lambda2 2))))))
#s(approx (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1) #s(hole binary64 (* 1/6 (pow lambda2 2))))
#s(approx (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1) #s(hole binary64 (* (pow lambda2 2) (+ 1/6 (* -1/2 (/ lambda1 lambda2))))))
#s(approx (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1) #s(hole binary64 (* (pow lambda2 2) (- (+ 1/6 (* -1/2 (/ lambda1 lambda2))) (/ 1 (pow lambda2 2))))))
#s(approx (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) #s(hole binary64 (* (pow lambda2 2) (+ 1/6 (* -1/2 (/ lambda1 lambda2))))))
#s(approx (+ (* -1/2 lambda1) (* 1/6 lambda2)) #s(hole binary64 (* lambda2 (+ 1/6 (* -1/2 (/ lambda1 lambda2))))))
#s(approx (+ 1 (* (cos lambda2) (cos phi2))) #s(hole binary64 (+ 1 (* (cos lambda2) (cos phi2)))))
#s(approx (* (cos lambda2) (cos phi2)) #s(hole binary64 (* (cos lambda2) (cos phi2))))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* lambda2 (- (* -1 (/ (+ (* -1 (pow lambda1 2)) (pow lambda1 2)) (pow lambda2 2))) (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* lambda2 (- (/ (* lambda1 (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) (pow lambda2 3)) (+ 1 (+ (* -1 (/ lambda1 lambda2)) (+ (* -1 (/ (pow lambda1 2) (pow lambda2 2))) (/ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (- (* -1 (/ (+ (* -1 (pow lambda1 2)) (pow lambda1 2)) (pow lambda2 2))) (+ 1 (* -1 (/ lambda1 lambda2))))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (- (/ (* lambda1 (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) (pow lambda2 3)) (+ 1 (+ (* -1 (/ lambda1 lambda2)) (+ (* -1 (/ (pow lambda1 2) (pow lambda2 2))) (/ (pow lambda1 2) (pow lambda2 2))))))))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) #s(hole binary64 (+ 1 (+ (/ lambda1 lambda2) (/ (pow lambda1 2) (pow lambda2 2))))))
#s(approx (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1))))
#s(approx (+ 1 (* -1 (/ lambda2 lambda1))) #s(hole binary64 (* lambda2 (- (/ 1 lambda2) (/ 1 lambda1)))))
#s(approx (- (+ lambda1 (* 1/2 (PI))) lambda2) #s(hole binary64 (* -1 lambda2)))
#s(approx (- (+ lambda1 (* 1/2 (PI))) lambda2) #s(hole binary64 (* lambda2 (- (+ (* 1/2 (/ (PI) lambda2)) (/ lambda1 lambda2)) 1))))
#s(approx (- (* 1/2 (PI)) lambda2) #s(hole binary64 (* -1 lambda2)))
#s(approx (- (* 1/2 (PI)) lambda2) #s(hole binary64 (* lambda2 (- (* 1/2 (/ (PI) lambda2)) 1))))
#s(approx (* (cos phi2) (cos lambda2)) #s(hole binary64 (* (cos lambda2) (cos phi2))))
#s(approx (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2)))) #s(hole binary64 (* -1/2 (pow lambda2 2))))
#s(approx (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2)))) #s(hole binary64 (* (pow lambda2 2) (- (/ lambda1 lambda2) 1/2))))
#s(approx (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2)))) #s(hole binary64 (* (pow lambda2 2) (- (+ (/ 1 (pow lambda2 2)) (/ lambda1 lambda2)) 1/2))))
#s(approx (* lambda2 (+ lambda1 (* -1/2 lambda2))) #s(hole binary64 (* (pow lambda2 2) (- (/ lambda1 lambda2) 1/2))))
#s(approx (+ lambda1 (* -1/2 lambda2)) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1/2))))
#s(approx (* -1/2 (cos lambda2)) #s(hole binary64 (* -1/2 (cos lambda2))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (* (pow lambda2 3) (- (/ (pow lambda1 3) (pow lambda2 3)) 1))))
#s(approx (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) #s(hole binary64 (* (pow lambda2 3) (- (/ (pow lambda1 3) (pow lambda2 3)) 1))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (* (pow lambda2 2) (+ 1 (/ lambda1 lambda2)))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (* (pow lambda2 2) (+ 1 (+ (/ lambda1 lambda2) (/ (pow lambda1 2) (pow lambda2 2)))))))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) #s(hole binary64 (* (pow lambda2 2) (+ 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))) lambda1) 1) 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))) lambda1) 1) #s(hole binary64 (+ 1 (/ (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) lambda1))))
#s(approx (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1) #s(hole binary64 (/ (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) lambda1)))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (* (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 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (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 (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) #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))) #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 (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) lambda1) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))) lambda1)))))
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) #s(hole binary64 (+ 1 (/ (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))) lambda1))))
#s(approx (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) #s(hole binary64 (/ (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))) lambda1)))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (cos (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ (- (+ (* -1 (/ (pow lambda1 2) lambda2)) (/ (pow lambda1 2) lambda2)) (* -1 lambda1)) lambda2)))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ (- (* -1 (/ (- (/ (* lambda1 (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) lambda2) (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) lambda2)) (* -1 lambda1)) lambda2)))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos phi1) (cos (+ lambda1 (* -1 lambda2))))))
#s(approx (cos (neg lambda2)) #s(hole binary64 (cos (* -1 lambda2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (* (cos (+ lambda1 (* -1 lambda2))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (+ (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (+ (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi1) (+ (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1)))))
#s(approx (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (sin (+ lambda1 (* -1 lambda2))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (sin (+ lambda1 (* -1 lambda2))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (* (sin (+ lambda1 (* -1 lambda2))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (sin (neg lambda2)) #s(hole binary64 (sin (* -1 lambda2))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) #s(hole binary64 (+ (sin (* -1 lambda2)) (* lambda1 (cos (* -1 lambda2))))))
#s(approx (* lambda1 (cos (neg lambda2))) #s(hole binary64 (* lambda1 (cos (* -1 lambda2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (cos (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))
#s(approx (* lambda2 (- (/ lambda1 lambda2) 1)) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI))))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) #s(hole binary64 (+ 1 (* (cos (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (* (cos (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (cos (+ lambda1 (* -1 lambda2))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) #s(hole binary64 (+ (cos (* -1 lambda2)) (* -1 (* lambda1 (sin (* -1 lambda2)))))))
#s(approx (* -1 (* lambda1 (sin (neg lambda2)))) #s(hole binary64 (* -1 (* lambda1 (sin (* -1 lambda2))))))
#s(approx (* lambda1 (sin (neg lambda2))) #s(hole binary64 (* lambda1 (sin (* -1 lambda2)))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (+ lambda1 (* -1 lambda2))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (+ lambda1 (* -1 lambda2))) (* -1/2 (* (pow phi2 2) (sin (+ lambda1 (* -1 lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (sin (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (sin (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (* (sin (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (* (sin (* -1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (sin (+ lambda1 (+ (* -1 lambda2) (* 1/2 (PI)))))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) #s(hole binary64 (sin (+ lambda1 (+ (* -1 lambda2) (* 1/2 (PI)))))))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ (+ lambda1 (* 1/2 (PI))) lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (/ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (/ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (/ (* (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 (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (- (pow (cos phi1) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (- (cos phi1) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (pow (cos phi1) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))))
#s(approx (pow (cos (- lambda1 lambda2)) 2) #s(hole binary64 (pow (cos (+ lambda1 (* -1 lambda2))) 2)))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (cos phi1) (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 (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) #s(hole binary64 (+ (cos (* -1 lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (* -1 lambda2)))) (sin (* -1 lambda2)))))))
#s(approx (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))) #s(hole binary64 (* lambda1 (- (* -1/2 (* lambda1 (cos (* -1 lambda2)))) (sin (* -1 lambda2))))))
#s(approx (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))) #s(hole binary64 (- (* -1/2 (* lambda1 (cos (* -1 lambda2)))) (sin (* -1 lambda2)))))
#s(approx (* -1/2 (* lambda1 (cos (neg lambda2)))) #s(hole binary64 (* -1/2 (* lambda1 (cos (* -1 lambda2))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) #s(hole binary64 (+ (cos (* -1 lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (* -1 lambda2))) (* 1/6 (* lambda1 (sin (* -1 lambda2)))))) (sin (* -1 lambda2)))))))
#s(approx (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) #s(hole binary64 (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (* -1 lambda2))) (* 1/6 (* lambda1 (sin (* -1 lambda2)))))) (sin (* -1 lambda2))))))
#s(approx (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))) #s(hole binary64 (- (* lambda1 (+ (* -1/2 (cos (* -1 lambda2))) (* 1/6 (* lambda1 (sin (* -1 lambda2)))))) (sin (* -1 lambda2)))))
#s(approx (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) #s(hole binary64 (* lambda1 (+ (* -1/2 (cos (* -1 lambda2))) (* 1/6 (* lambda1 (sin (* -1 lambda2))))))))
#s(approx (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2))))) #s(hole binary64 (+ (* -1/2 (cos (* -1 lambda2))) (* 1/6 (* lambda1 (sin (* -1 lambda2)))))))
#s(approx (* 1/6 (* lambda1 (sin (neg lambda2)))) #s(hole binary64 (* 1/6 (* lambda1 (sin (* -1 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (- (* lambda1 (sin (- (* 1/2 (PI)) (* -1 lambda2)))) (sin lambda2))))
#s(approx (sin (+ lambda2 (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (* -1 lambda2)))))
#s(approx (+ lambda2 (/ (PI) 2)) #s(hole binary64 (* -1 (* lambda2 (- (* -1/2 (/ (PI) lambda2)) 1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (sin (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) #s(hole binary64 (* -1 (* (pow lambda2 3) (- (* 1/2 (/ lambda1 lambda2)) 1/6)))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) #s(hole binary64 (* -1 (* (pow lambda2 3) (- (* -1 (/ (- (* -1/2 lambda1) (/ 1 lambda2)) lambda2)) 1/6)))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) #s(hole binary64 (* -1 (* (pow lambda2 3) (- (* -1 (/ (+ (* -1 (/ (+ 1 (* -1 (/ lambda1 lambda2))) lambda2)) (* -1/2 lambda1)) lambda2)) 1/6)))))
#s(approx (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)) #s(hole binary64 (* -1 (* (pow lambda2 3) (- (* 1/2 (/ lambda1 lambda2)) 1/6)))))
#s(approx (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)) #s(hole binary64 (* -1 (* (pow lambda2 3) (- (* -1 (/ (- (* -1/2 lambda1) (/ 1 lambda2)) lambda2)) 1/6)))))
#s(approx (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1) #s(hole binary64 (* (pow lambda2 2) (+ 1/6 (* -1 (/ (+ (* 1/2 lambda1) (/ 1 lambda2)) lambda2))))))
#s(approx (+ (* -1/2 lambda1) (* 1/6 lambda2)) #s(hole binary64 (* -1 (* lambda2 (- (* 1/2 (/ lambda1 lambda2)) 1/6)))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ (+ lambda1 (* -1 (/ (+ (* -1 (pow lambda1 2)) (pow lambda1 2)) lambda2))) lambda2)))))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ (+ lambda1 (* -1 (/ (+ (* -1 (/ (* lambda1 (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) lambda2)) (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) lambda2))) lambda2)))))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (- (* -1 (/ (- (+ (* -1 (/ (pow lambda1 2) lambda2)) (/ (pow lambda1 2) lambda2)) lambda1) lambda2)) 1)))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (- (* -1 (/ (- (* -1 (/ (- (/ (* lambda1 (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) lambda2) (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) lambda2)) lambda1) lambda2)) 1)))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) #s(hole binary64 (+ 1 (* -1 (/ (+ (* -1 lambda1) (* -1 (/ (pow lambda1 2) lambda2))) lambda2)))))
#s(approx (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (+ 1 (* -1 (/ lambda2 lambda1))) #s(hole binary64 (* -1 (* lambda2 (- (/ 1 lambda1) (/ 1 lambda2))))))
#s(approx (+ 1 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) #s(hole binary64 (+ 1 (sin (+ lambda1 (+ (* -1 lambda2) (* 1/2 (PI))))))))
#s(approx (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) #s(hole binary64 (sin (+ lambda1 (+ (* -1 lambda2) (* 1/2 (PI)))))))
#s(approx (- (+ lambda1 (* 1/2 (PI))) lambda2) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ (+ lambda1 (* 1/2 (PI))) lambda2)))))))
#s(approx (- (* 1/2 (PI)) lambda2) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1/2 (/ (PI) lambda2)))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (* (cos (+ lambda1 (* -1 lambda2))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (+ (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi1) (+ (cos (+ lambda1 (* -1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos (+ lambda1 (* -1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (/ (- 1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- 1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (/ (+ 1 (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 3))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (/ (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (+ 1 (pow (cos (+ lambda1 (* -1 lambda2))) 3)) (- (+ 1 (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 3)) #s(hole binary64 (+ 1 (pow (cos (+ lambda1 (* -1 lambda2))) 3))))
#s(approx (pow (cos (- lambda1 lambda2)) 3) #s(hole binary64 (pow (cos (+ lambda1 (* -1 lambda2))) 3)))
#s(approx (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ 1 (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (cos (+ lambda1 (* -1 lambda2))))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (+ 1 (pow (cos (+ lambda1 (* -1 lambda2))) 2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* (pow (cos phi2) 2) (* (pow (cos (+ lambda1 (* -1 lambda2))) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) 2))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* (pow (cos phi2) 2) (* (pow (cos (+ lambda1 (* -1 lambda2))) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) 2)))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* (pow (cos phi2) 2) (* (pow (cos (+ lambda1 (* -1 lambda2))) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) 2))))
#s(approx (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (/ (- 1 (+ (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (* (pow (cos phi2) 2) (* (pow (cos (+ lambda1 (* -1 lambda2))) 2) (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))) (pow (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) 2))))
#s(approx (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) #s(hole binary64 (- 1 (+ (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (* (pow (cos phi2) 2) (* (pow (cos (+ lambda1 (* -1 lambda2))) 2) (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (* (pow (cos phi2) 2) (* (pow (cos (+ lambda1 (* -1 lambda2))) 2) (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))))
#s(approx (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* (pow (cos phi2) 2) (* (pow (cos (+ lambda1 (* -1 lambda2))) 2) (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (* (pow (cos (+ lambda1 (* -1 lambda2))) 2) (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) #s(hole binary64 (pow (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) 2)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (- (cos phi1) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (+ lambda1 (* -1 lambda2))) 2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (+ lambda1 (* -1 lambda2))) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (+ lambda1 (* -1 lambda2))) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (+ lambda1 (* -1 lambda2))) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)))) (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4))))) (* (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (+ lambda1 (* -1 lambda2))) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)))) (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))) (/ (* (pow (cos phi2) 6) (pow (cos (+ lambda1 (* -1 lambda2))) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)))) (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)))) (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4))))) (* (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (+ lambda1 (* -1 lambda2))) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)))) (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))))
#s(approx (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) #s(hole binary64 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)))) (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4))))) (* (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (+ lambda1 (* -1 lambda2))) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) 2)))))))
#s(approx (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) #s(hole binary64 (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)))) (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4))))) (* (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (+ lambda1 (* -1 lambda2))) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) 2))))))
#s(approx (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)))) (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)))) (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) #s(hole binary64 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4))))))
#s(approx (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) #s(hole binary64 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)))))
#s(approx (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) #s(hole binary64 (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4))))
#s(approx (pow (cos (- lambda1 lambda2)) 4) #s(hole binary64 (pow (cos (+ lambda1 (* -1 lambda2))) 4)))
#s(approx (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) #s(hole binary64 (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4))))) (* (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (+ lambda1 (* -1 lambda2))) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) 2)))))
#s(approx (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) #s(hole binary64 (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4))))) (* (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (+ lambda1 (* -1 lambda2))) 6))))))
#s(approx (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) #s(hole binary64 (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4))))) (* (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) 2)))))
#s(approx (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) #s(hole binary64 (* (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) 2))))
#s(approx (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) #s(hole binary64 (- (* -1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) 2)))
#s(approx (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (* -1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)))))
#s(approx (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))))
#s(approx (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) #s(hole binary64 (- 1 (* (pow (cos phi2) 6) (pow (cos (+ lambda1 (* -1 lambda2))) 6)))))
#s(approx (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) #s(hole binary64 (* (pow (cos phi2) 6) (pow (cos (+ lambda1 (* -1 lambda2))) 6))))
#s(approx (pow (cos (- lambda1 lambda2)) 6) #s(hole binary64 (pow (cos (+ lambda1 (* -1 lambda2))) 6)))
#s(approx (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) 2))))
#s(approx (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) #s(hole binary64 (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)))) 2)))
#s(approx (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (/ (* (pow (cos phi2) 6) (pow (cos (+ lambda1 (* -1 lambda2))) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)))) (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (/ (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (/ (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))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (/ (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (/ (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (/ (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (/ (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (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 (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 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 (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) #s(hole binary64 (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 3))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ 1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)))))
#s(approx (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2)))) #s(hole binary64 (* (pow lambda2 2) (- (* -1 (/ (- (* -1 lambda1) (/ 1 lambda2)) lambda2)) 1/2))))
#s(approx (+ lambda1 (* -1/2 lambda2)) #s(hole binary64 (* -1 (* lambda2 (+ 1/2 (* -1 (/ lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (pow (cos (+ lambda1 (* -1 lambda2))) 2) (- (cos phi1) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) #s(hole binary64 (+ (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 3)) (pow (cos phi1) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (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 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 3)) (pow (cos phi1) 3))))
#s(approx (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (* (pow (cos (+ lambda1 (* -1 lambda2))) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (pow (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) 2)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #s(hole binary64 (- (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (* 2 (log (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (log (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (* -1 (* (pow lambda2 3) (+ 1 (* -1 (/ (pow lambda1 3) (pow lambda2 3))))))))
#s(approx (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) #s(hole binary64 (* -1 (* (pow lambda2 3) (+ 1 (* -1 (/ (pow lambda1 3) (pow lambda2 3))))))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (* (pow lambda2 2) (+ 1 (* -1 (/ (+ (* -1 lambda1) (* -1 (/ (pow lambda1 2) lambda2))) lambda2))))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (/ (+ (pow lambda1 3) (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 3)) (- (+ (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 2)) (* lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) #s(hole binary64 (+ (pow lambda1 3) (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 3))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 3)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (- (+ (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 2)) (* lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 2)))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) #s(hole binary64 (- (pow lambda1 2) (* 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))) lambda1) #s(hole binary64 (* lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) #s(hole binary64 (/ (- (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 2)) (- lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) #s(hole binary64 (- (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 2))))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) #s(hole binary64 (- lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) lambda1))))))
#s(approx (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) #s(hole binary64 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) lambda1)))))
#s(approx (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) #s(hole binary64 (* -1 (/ (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) lambda1))))
#s(approx (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) #s(hole binary64 (/ (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) lambda1)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #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 (- 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 (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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (cos (- lambda1 lambda2)))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (* -1/2 (pow phi1 2))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (+ (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (+ (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ 1 (+ (* phi1 (cos (* 1/2 (PI)))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ 1 (+ (* phi1 (+ (cos (* 1/2 (PI))) (* -1/2 phi1))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ 1 (+ (* phi1 (+ (cos (* 1/2 (PI))) (* phi1 (- (* -1/6 (* phi1 (cos (* 1/2 (PI))))) 1/2)))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (* (cos phi2) (cos (- lambda1 lambda2)))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (* phi1 (cos (* 1/2 (PI)))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (* phi1 (+ (cos (* 1/2 (PI))) (* -1/6 (* (pow phi1 2) (cos (* 1/2 (PI))))))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (* phi1 (+ (cos (* 1/2 (PI))) (* (pow phi1 2) (+ (* -1/6 (cos (* 1/2 (PI)))) (* 1/120 (* (pow phi1 2) (cos (* 1/2 (PI))))))))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi1)) #s(hole binary64 (* phi1 (cos (* 1/2 (PI))))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi1)) #s(hole binary64 (* phi1 (+ (cos (* 1/2 (PI))) (* -1/6 (* (pow phi1 2) (cos (* 1/2 (PI)))))))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi1)) #s(hole binary64 (* phi1 (+ (cos (* 1/2 (PI))) (* (pow phi1 2) (+ (* -1/6 (cos (* 1/2 (PI)))) (* 1/120 (* (pow phi1 2) (cos (* 1/2 (PI)))))))))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi1)) #s(hole binary64 (* phi1 (+ (cos (* 1/2 (PI))) (* (pow phi1 2) (+ (* -1/6 (cos (* 1/2 (PI)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (cos (* 1/2 (PI))))) (* 1/120 (cos (* 1/2 (PI))))))))))))
#s(approx (sin phi1) #s(hole binary64 phi1))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* -1/6 (pow phi1 2))))))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* (pow phi1 2) (- (* 1/120 (pow phi1 2)) 1/6))))))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/120 (* -1/5040 (pow phi1 2)))) 1/6))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ 1 (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ 1 (+ (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ 1 (+ (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* -1/2 (pow phi1 2)) #s(hole binary64 (* -1/2 (pow phi1 2))))
#s(approx (pow phi1 2) #s(hole binary64 (pow phi1 2)))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (* (cos phi2) (cos (- lambda1 lambda2)))))
#s(approx (* phi1 phi1) #s(hole binary64 (pow phi1 2)))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (* (cos lambda2) (cos phi2)))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos lambda2) (cos phi2))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos lambda2) (cos phi2)) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos lambda2) (cos phi2)) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos phi1) (cos phi2)) #s(hole binary64 (+ 1 (cos phi2))))
#s(approx (+ (cos phi1) (cos phi2)) #s(hole binary64 (+ 1 (+ (cos phi2) (* -1/2 (pow phi1 2))))))
#s(approx (+ (cos phi1) (cos phi2)) #s(hole binary64 (+ 1 (+ (cos phi2) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (cos phi2)) #s(hole binary64 (+ 1 (+ (cos phi2) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (/ 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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 1/2 (/ 1 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* (pow phi1 2) (- (+ (* -1/4 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 1/24 (/ 1 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* (pow phi1 2) (- (+ (* -1/4 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* (pow phi1 2) (- (+ (* -1/720 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/720 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/48 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (* 1/2 (/ (+ (* -1/4 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))) (+ (* -1/2 (/ (- (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 1/24 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* 1/24 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 2/45 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 1/24 (/ 1 (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 (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (- 1 (cos (- lambda1 lambda2))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* -1/2 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2))))))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* 1/3 (/ 1 (- 1 (cos (- lambda1 lambda2))))) (+ (* 1/24 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (+ (* -1/2 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (- 1 (cos (- lambda1 lambda2)))))))) (+ (* -1/2 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2))))))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* -1 (* (pow phi1 2) (+ (* -1/2 (/ (- (* 1/3 (/ 1 (- 1 (cos (- lambda1 lambda2))))) (+ (* 1/24 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (+ (* -1/2 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (- 1 (cos (- lambda1 lambda2))))))) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (/ (+ (* -1/2 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/720 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* 2/45 (/ 1 (- 1 (cos (- lambda1 lambda2)))))))))) (* 1/3 (/ 1 (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/24 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (+ (* -1/2 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (- 1 (cos (- lambda1 lambda2)))))))) (+ (* -1/2 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2))))))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- 1 (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ 1 (* -1 (pow phi1 2))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1))) (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))) #s(hole binary64 (- 1 (cos (- lambda1 lambda2)))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ 1 (* -1/2 (pow phi1 2))) (cos (- lambda1 lambda2)))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))) (cos (- lambda1 lambda2)))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))) (cos (- lambda1 lambda2)))))
#s(approx (+ 1 (* -1/2 (pow phi1 2))) #s(hole binary64 1))
#s(approx (+ 1 (* -1/2 (pow phi1 2))) #s(hole binary64 (+ 1 (* -1/2 (pow phi1 2)))))
#s(approx (+ (cos lambda2) (cos phi1)) #s(hole binary64 (+ 1 (cos lambda2))))
#s(approx (+ (cos lambda2) (cos phi1)) #s(hole binary64 (+ 1 (+ (cos lambda2) (* -1/2 (pow phi1 2))))))
#s(approx (+ (cos lambda2) (cos phi1)) #s(hole binary64 (+ 1 (+ (cos lambda2) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos lambda2) (cos phi1)) #s(hole binary64 (+ 1 (+ (cos lambda2) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos 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 lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (* (cos lambda1) (cos phi2)))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* phi1 (cos (* 1/2 (PI)))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* phi1 (+ (cos (* 1/2 (PI))) (* -1/2 phi1))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* phi1 (+ (cos (* 1/2 (PI))) (* phi1 (- (* -1/6 (* phi1 (cos (* 1/2 (PI))))) 1/2)))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ 1 (cos (- lambda1 lambda2)))))
#s(approx (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (* phi1 (cos (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (* phi1 (+ (cos (* 1/2 (PI))) (* -1/2 phi1)))))))
#s(approx (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (* phi1 (+ (cos (* 1/2 (PI))) (* phi1 (- (* -1/6 (* phi1 (cos (* 1/2 (PI))))) 1/2))))))))
#s(approx (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (cos (- lambda1 lambda2))))
#s(approx (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (* phi1 (cos (* 1/2 (PI)))))))
#s(approx (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (* phi1 (+ (cos (* 1/2 (PI))) (* -1/6 (* (pow phi1 2) (cos (* 1/2 (PI))))))))))
#s(approx (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (* phi1 (+ (cos (* 1/2 (PI))) (* (pow phi1 2) (+ (* -1/6 (cos (* 1/2 (PI)))) (* 1/120 (* (pow phi1 2) (cos (* 1/2 (PI))))))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* -1 (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))) (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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 (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 4))) (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 11/24 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (/ (* (+ 1/4 (* 1/12 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 4))))))))) (+ (* -1 (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))) (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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 (/ (* (+ 1/4 (* 1/12 (- 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)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* -1 (/ (- (* 1/3 (/ 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)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 4))) (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 11/24 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (/ (* (+ 1/4 (* 1/12 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 4)))))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* -1/720 (/ (* (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)))))) (+ (* 151/720 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ (* (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (- (* -1/360 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) 1/24)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 4))))))))) (* 1/3 (/ 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)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 4))) (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 11/24 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (/ (* (+ 1/4 (* 1/12 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 4))))))))) (+ (* -1 (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))) (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (- 1 (cos (- lambda1 lambda2))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* -1/2 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2))))))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* 1/3 (/ 1 (- 1 (cos (- lambda1 lambda2))))) (+ (* 1/24 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (+ (* -1/2 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (- 1 (cos (- lambda1 lambda2)))))))) (+ (* -1/2 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2))))))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* -1 (* (pow phi1 2) (+ (* -1/2 (/ (- (* 1/3 (/ 1 (- 1 (cos (- lambda1 lambda2))))) (+ (* 1/24 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (+ (* -1/2 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (- 1 (cos (- lambda1 lambda2))))))) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (/ (+ (* -1/2 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/720 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* 2/45 (/ 1 (- 1 (cos (- lambda1 lambda2)))))))))) (* 1/3 (/ 1 (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/24 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (+ (* -1/2 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (- 1 (cos (- lambda1 lambda2)))))))) (+ (* -1/2 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2))))))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- 1 (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ 1 (* -1 (pow phi1 2))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 phi1)))) #s(hole binary64 1))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 phi1)))) #s(hole binary64 (+ 1 (* -1 (pow phi1 2)))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 phi1)))) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 phi1)))) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))))
#s(approx (* 1/2 (cos (* 2 phi1))) #s(hole binary64 1/2))
#s(approx (* 1/2 (cos (* 2 phi1))) #s(hole binary64 (+ 1/2 (* -1 (pow phi1 2)))))
#s(approx (* 1/2 (cos (* 2 phi1))) #s(hole binary64 (+ 1/2 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)))))
#s(approx (* 1/2 (cos (* 2 phi1))) #s(hole binary64 (+ 1/2 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))))
#s(approx (cos (* 2 phi1)) #s(hole binary64 1))
#s(approx (cos (* 2 phi1)) #s(hole binary64 (+ 1 (* -2 (pow phi1 2)))))
#s(approx (cos (* 2 phi1)) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* 2/3 (pow phi1 2)) 2)))))
#s(approx (cos (* 2 phi1)) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/3 (* -4/45 (pow phi1 2)))) 2)))))
#s(approx (* 2 phi1) #s(hole binary64 (* 2 phi1)))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* 4 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (+ (* -1 (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (+ (* 1/24 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ 5/3 (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* -1 (* (pow phi1 2) (+ (* -1 (/ (* (+ (* -1/2 (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (+ (* 1/24 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ 5/3 (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (+ (* 47/15 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- (* 4 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (+ (* -1 (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (+ (* 1/24 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ 5/3 (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (/ (* (+ (* -1/2 (+ 5/3 (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))))) (+ (* -1/720 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/24 (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -2/45 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 34/45))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))))) (* 4 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (+ (* -1 (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (+ (* 1/24 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ 5/3 (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (- (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (/ 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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (+ (* -1 (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 1 (* -1/2 (* (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))))) (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* 1/24 (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 7/8 (/ 1 (- (+ 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) (pow (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* 1/3 (/ 1 (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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))))) (/ (* (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) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 1 (* -1/2 (* (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))))) (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* -1 (* (pow phi1 2) (+ (* -1 (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (- (+ (* 1/24 (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 7/8 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2))))))) (+ (* 1/3 (/ 1 (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (* (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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)))))) (+ (* -1 (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 2/45 (* -1/720 (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* -1 (/ (+ 2/45 (* -1/720 (* (cos phi2) (cos (- lambda1 lambda2))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 61/240 (/ 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 (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (pow (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (/ (* (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))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (- 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)))) 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))) (* 7/8 (/ 1 (- (+ 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) (pow (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* 1/3 (/ 1 (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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))))) (/ (* (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) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 1 (* -1/2 (* (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))))) (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* 1/24 (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 7/8 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2))))))) (+ (* 1/3 (/ 1 (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* -1 (* (pow phi1 2) (+ (* -1 (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (- (+ (* 1/24 (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 7/8 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2))))))) (+ (* 1/3 (/ 1 (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (* (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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)))))) (+ (* -1 (/ (+ 2/45 (* -1/720 (* (cos phi2) (cos (- lambda1 lambda2))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 61/240 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2))))))))))) (+ (* 1/24 (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 7/8 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))))))) (+ (* 1/3 (/ 1 (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (* (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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (/ (* (pow phi1 2) (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (/ (* (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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* (pow phi1 2) (- (* -1 (* (pow phi1 2) (+ (* -1 (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (pow (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (/ (* (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) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (/ (* (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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* -1 (* (pow phi1 2) (+ (* -1 (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 2/45 (* -1/720 (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1 (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (pow (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (/ (* (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))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (- 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)))) 3)))))) (+ (* -1 (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (pow (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (/ (* (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) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (/ (* (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 phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi1 2) (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi1 2) (- (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* (pow phi1 2) (- (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 1/24 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi1 2) (- (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* (pow phi1 2) (- (+ (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* (pow phi1 2) (- (* 1/720 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* -1/2 (/ (- (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 1/24 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* 1/24 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 2/45 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 1/24 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi1 2) (- (* -1 (* (pow phi1 2) (+ (* -1/4 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* -1 (* (pow phi1 2) (+ (* -1/720 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/48 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (* 1/2 (/ (+ (* -1/4 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))) (+ (* -1/4 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#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 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow phi1 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (pow phi1 2) (- (* -1 (* (pow phi1 2) (+ (* -1/4 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 3))) (* 1/24 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (* -1/2 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* -1 (* (pow phi1 2) (+ (* -1/720 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (+ (* 1/48 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 3))) (* 1/2 (/ (+ (* -1/4 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 3))) (* 1/24 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (- 1 (cos (- lambda1 lambda2))))))))) (+ (* -1/4 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 3))) (* 1/24 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (* -1/2 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) #s(hole binary64 (+ 1 (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) #s(hole binary64 (+ 1 (+ (* -3/2 (pow phi1 2)) (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (exp (* (log (cos phi1)) 3)) #s(hole binary64 1))
#s(approx (exp (* (log (cos phi1)) 3)) #s(hole binary64 (+ 1 (* -3/2 (pow phi1 2)))))
#s(approx (exp (* (log (cos phi1)) 3)) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* 7/8 (pow phi1 2)) 3/2)))))
#s(approx (exp (* (log (cos phi1)) 3)) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 7/8 (* -61/240 (pow phi1 2)))) 3/2)))))
#s(approx (* (log (cos phi1)) 3) #s(hole binary64 (* -3/2 (pow phi1 2))))
#s(approx (* (log (cos phi1)) 3) #s(hole binary64 (* (pow phi1 2) (- (* -1/4 (pow phi1 2)) 3/2))))
#s(approx (* (log (cos phi1)) 3) #s(hole binary64 (* (pow phi1 2) (- (* (pow phi1 2) (- (* -1/15 (pow phi1 2)) 1/4)) 3/2))))
#s(approx (* (log (cos phi1)) 3) #s(hole binary64 (* (pow phi1 2) (- (* (pow phi1 2) (- (* (pow phi1 2) (- (* -17/840 (pow phi1 2)) 1/15)) 1/4)) 3/2))))
#s(approx (log (cos phi1)) #s(hole binary64 (* -1/2 (pow phi1 2))))
#s(approx (log (cos phi1)) #s(hole binary64 (* (pow phi1 2) (- (* -1/12 (pow phi1 2)) 1/2))))
#s(approx (log (cos phi1)) #s(hole binary64 (* (pow phi1 2) (- (* (pow phi1 2) (- (* -1/45 (pow phi1 2)) 1/12)) 1/2))))
#s(approx (log (cos phi1)) #s(hole binary64 (* (pow phi1 2) (- (* (pow phi1 2) (- (* (pow phi1 2) (- (* -17/2520 (pow phi1 2)) 1/45)) 1/12)) 1/2))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ 1 (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ 1 (+ (* -3/2 (pow phi1 2)) (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ 1 (+ (* (pow phi1 2) (- (* 7/8 (pow phi1 2)) 3/2)) (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ 1 (+ (* (pow phi1 2) (- (* (pow phi1 2) (+ 7/8 (* -61/240 (pow phi1 2)))) 3/2)) (* (pow (cos phi2) 3) (pow (cos (- 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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- 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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (* -1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ 1/2 (* -1/2 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))))))) (+ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (+ (* -1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow phi1 2) (- (+ 13/24 (* 1/3 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 1/24 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))) (+ 1/2 (* -1/2 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))))))) (+ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (+ (* -1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow phi1 2) (- (+ 13/24 (+ (* 1/3 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow phi1 2) (- (* -2/45 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ 151/720 (* -1/720 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))))) (* 1/24 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))) (+ 1/2 (* -1/2 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))))))) (+ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (* -1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) 1/2))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (+ (* -1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow phi1 2) (+ 13/24 (* 1/3 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) 1/2))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (+ (* -1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow phi1 2) (+ 13/24 (+ (* 1/3 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow phi1 2) (- (* -2/45 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) 151/720)))))) 1/2))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* -1/2 (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* (pow phi1 2) (+ (* -1/2 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 1/24 (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* (pow phi1 2) (+ (* -1/2 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (* 1/24 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))))))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi1 2) (+ (* -1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow phi1 2) (+ 1/4 (* 1/12 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi1 2) (+ (* -1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow phi1 2) (+ 1/4 (+ (* 1/12 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow phi1 2) (- (* -1/360 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) 1/24))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))
#s(approx (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2) #s(hole binary64 (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))
#s(approx (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (- 1 (* (cos lambda1) (cos phi2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))
#s(approx (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2) #s(hole binary64 (+ (* (pow phi1 2) (+ (* -1 (- 1 (* (cos lambda1) (cos phi2)))) (* (pow phi1 2) (+ 1/4 (* 1/12 (- 1 (* (cos lambda1) (cos phi2)))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))
#s(approx (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2) #s(hole binary64 (+ (* (pow phi1 2) (+ (* -1 (- 1 (* (cos lambda1) (cos phi2)))) (* (pow phi1 2) (+ 1/4 (+ (* 1/12 (- 1 (* (cos lambda1) (cos phi2)))) (* (pow phi1 2) (- (* -1/360 (- 1 (* (cos lambda1) (cos phi2)))) 1/24))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))
#s(approx (- (cos phi1) (* (cos lambda1) (cos phi2))) #s(hole binary64 (- 1 (* (cos lambda1) (cos phi2)))))
#s(approx (- (cos phi1) (* (cos lambda1) (cos phi2))) #s(hole binary64 (- (+ 1 (* -1/2 (pow phi1 2))) (* (cos lambda1) (cos phi2)))))
#s(approx (- (cos phi1) (* (cos lambda1) (cos phi2))) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))) (* (cos lambda1) (cos phi2)))))
#s(approx (- (cos phi1) (* (cos lambda1) (cos phi2))) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))) (* (cos lambda1) (cos phi2)))))
#s(approx (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #s(hole binary64 (- 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #s(hole binary64 (- (+ 1 (* -1 (pow phi1 2))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #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 (cos phi1) #s(hole binary64 (cos phi1)))
#s(approx (* (cos (* 1/2 (PI))) (sin phi1)) #s(hole binary64 (* (cos (* 1/2 (PI))) (sin phi1))))
#s(approx (sin phi1) #s(hole binary64 (sin phi1)))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (* -1/2 (pow phi1 2))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (* (pow phi1 2) (- (+ (/ 1 (pow phi1 2)) (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow phi1 2))) 1/2))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (* -1/2 (pow phi1 2))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (* (pow phi1 2) (- (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow phi1 2)) 1/2))))
#s(approx (+ (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi1) (cos phi2))))
#s(approx (pow (cos phi1) 2) #s(hole binary64 (pow (cos phi1) 2)))
#s(approx (+ 1 (* -1/2 (pow phi1 2))) #s(hole binary64 (* -1/2 (pow phi1 2))))
#s(approx (+ 1 (* -1/2 (pow phi1 2))) #s(hole binary64 (* (pow phi1 2) (- (/ 1 (pow phi1 2)) 1/2))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 phi1)))) #s(hole binary64 (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
#s(approx (* 1/2 (cos (* 2 phi1))) #s(hole binary64 (* 1/2 (cos (* 2 phi1)))))
#s(approx (cos (* 2 phi1)) #s(hole binary64 (cos (* 2 phi1))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (* (pow phi1 2) (- (+ (* -1 (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (/ 1 (* (pow phi1 2) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (pow phi1 2) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (* (pow phi1 2) (+ (* -1 (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (/ 1 (* (pow phi1 2) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))))
#s(approx (exp (* (log (cos phi1)) 3)) #s(hole binary64 (pow (cos phi1) 3)))
#s(approx (* (log (cos phi1)) 3) #s(hole binary64 (* 3 (log (cos phi1)))))
#s(approx (log (cos phi1)) #s(hole binary64 (log (cos phi1))))
#s(approx (pow (cos phi1) 3) #s(hole binary64 (pow (cos phi1) 3)))
#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 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (cos (- lambda1 lambda2)))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* -1/2 (* (pow phi2 2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* (pow phi2 2) (+ (* -1/2 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* 1/24 (* (pow phi2 2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* (pow phi2 2) (+ (* -1/2 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (* 1/24 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ (cos phi1) (cos (- lambda1 lambda2)))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* phi2 (+ (* -1/2 (* phi2 (cos (- lambda1 lambda2)))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* phi2 (+ (* phi2 (+ (* -1/2 (cos (- lambda1 lambda2))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (cos (- lambda1 lambda2))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (* phi2 (+ (* -1/2 (* phi2 (cos (- lambda1 lambda2)))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (* phi2 (+ (* phi2 (+ (* -1/2 (cos (- lambda1 lambda2))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))))
#s(approx (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))) #s(hole binary64 1))
#s(approx (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))) #s(hole binary64 (+ 1 (* phi2 (cos (* 1/2 (PI)))))))
#s(approx (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))) #s(hole binary64 (+ 1 (* phi2 (+ (cos (* 1/2 (PI))) (* -1/2 phi2))))))
#s(approx (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))) #s(hole binary64 (+ 1 (* phi2 (+ (cos (* 1/2 (PI))) (* phi2 (- (* -1/6 (* phi2 (cos (* 1/2 (PI))))) 1/2)))))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi2)) #s(hole binary64 (* phi2 (cos (* 1/2 (PI))))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi2)) #s(hole binary64 (* phi2 (+ (cos (* 1/2 (PI))) (* -1/6 (* (pow phi2 2) (cos (* 1/2 (PI)))))))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi2)) #s(hole binary64 (* phi2 (+ (cos (* 1/2 (PI))) (* (pow phi2 2) (+ (* -1/6 (cos (* 1/2 (PI)))) (* 1/120 (* (pow phi2 2) (cos (* 1/2 (PI)))))))))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi2)) #s(hole binary64 (* phi2 (+ (cos (* 1/2 (PI))) (* (pow phi2 2) (+ (* -1/6 (cos (* 1/2 (PI)))) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (cos (* 1/2 (PI))))) (* 1/120 (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 phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (+ (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (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))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (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))) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (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) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* phi2 (* (cos (* 1/2 (PI))) (sin (- lambda1 lambda2)))))))
#s(approx (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* phi2 (+ (* -1/2 (* phi2 (sin (- lambda1 lambda2)))) (* (cos (* 1/2 (PI))) (sin (- lambda1 lambda2))))))))
#s(approx (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* phi2 (+ (* phi2 (+ (* -1/2 (sin (- lambda1 lambda2))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (sin (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (sin (- lambda1 lambda2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (+ (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* -1/2 (* (pow phi2 2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (+ (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* (pow phi2 2) (+ (* -1/2 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* 1/24 (* (pow phi2 2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (+ (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* (pow phi2 2) (+ (* -1/2 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (* 1/24 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* -1/2 (* (pow phi2 2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* (pow phi2 2) (+ (* -1/2 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* 1/24 (* (pow phi2 2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* (pow phi2 2) (+ (* -1/2 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (* 1/24 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) #s(hole binary64 (+ 1 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) #s(hole binary64 (+ 1 (+ (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) #s(hole binary64 (+ 1 (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) #s(hole binary64 (+ 1 (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (+ (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (sin (+ phi2 (* 1/2 (PI)))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ phi2 (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi2 (cos (* 1/2 (PI)))))))
#s(approx (sin (+ phi2 (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi2 (+ (cos (* 1/2 (PI))) (* -1/2 (* phi2 (sin (* 1/2 (PI))))))))))
#s(approx (sin (+ phi2 (* 1/2 (PI)))) #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 (+ phi2 (* 1/2 (PI))) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ phi2 (* 1/2 (PI))) #s(hole binary64 (+ phi2 (* 1/2 (PI)))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (* -1/2 (pow phi1 2))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (+ (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* -1/2 (pow phi1 2)))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (+ (* -1/2 (pow phi1 2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2)))))))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (+ (* -1/2 (pow phi1 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 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (* -1/2 (pow phi1 2)))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* -1/2 (pow phi1 2))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (* -1/2 (pow phi1 2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (* -1/2 (pow phi1 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 (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (* (cos lambda1) (sin (* 1/2 (PI))))))
#s(approx (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (+ (* phi2 (* (cos lambda1) (cos (* 1/2 (PI))))) (* (cos lambda1) (sin (* 1/2 (PI)))))))
#s(approx (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos lambda1) (sin (* 1/2 (PI)))))) (* (cos lambda1) (cos (* 1/2 (PI)))))) (* (cos lambda1) (sin (* 1/2 (PI)))))))
#s(approx (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos lambda1) (sin (* 1/2 (PI))))) (* -1/6 (* phi2 (* (cos lambda1) (cos (* 1/2 (PI)))))))) (* (cos lambda1) (cos (* 1/2 (PI)))))) (* (cos lambda1) (sin (* 1/2 (PI)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#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 (+ 1 (* -1/2 (* phi2 phi2))) #s(hole binary64 1))
#s(approx (+ 1 (* -1/2 (* phi2 phi2))) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (* -1/2 (* phi2 phi2)) #s(hole binary64 (* -1/2 (pow phi2 2))))
#s(approx (* phi2 phi2) #s(hole binary64 (pow phi2 2)))
#s(approx (sin (+ phi2 (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ phi2 (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi2 (cos (* 1/2 (PI)))))))
#s(approx (sin (+ phi2 (/ (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 (/ (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 (+ phi2 (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ phi2 (/ (PI) 2)) #s(hole binary64 (+ phi2 (* 1/2 (PI)))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (* (* phi2 phi2) -1/2) #s(hole binary64 (* -1/2 (pow phi2 2))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (* (sin (* 1/2 (PI))) (sin (- lambda1 lambda2)))))
#s(approx (* (sin (+ phi2 (/ (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 (/ (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 (/ (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 (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (* (sin (neg lambda2)) (sin (* 1/2 (PI))))))
#s(approx (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (+ (* phi2 (* (cos (* 1/2 (PI))) (sin (neg lambda2)))) (* (sin (neg lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (+ (* phi2 (+ (* -1/2 (* phi2 (* (sin (neg lambda2)) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (sin (neg lambda2))))) (* (sin (neg lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (sin (neg lambda2)) (sin (* 1/2 (PI))))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (sin (neg lambda2))))))) (* (cos (* 1/2 (PI))) (sin (neg lambda2))))) (* (sin (neg lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda2) (cos phi1))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda2) (+ (cos phi1) (* -1/2 (* (pow phi2 2) (cos lambda2)))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda2) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* 1/24 (* (pow phi2 2) (cos lambda2)))))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda2) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda2))) (* 1/24 (cos lambda2))))))))))
#s(approx (+ (cos phi1) (cos phi2)) #s(hole binary64 (+ 1 (cos phi1))))
#s(approx (+ (cos phi1) (cos phi2)) #s(hole binary64 (+ 1 (+ (cos phi1) (* -1/2 (pow phi2 2))))))
#s(approx (+ (cos phi1) (cos phi2)) #s(hole binary64 (+ 1 (+ (cos phi1) (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2))))))
#s(approx (+ (cos phi1) (cos phi2)) #s(hole binary64 (+ 1 (+ (cos phi1) (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* -1/2 (* (pow phi2 2) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* 1/24 (* (pow phi2 2) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))) (* 1/24 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (/ (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* (pow phi2 2) (- (+ (* -1/24 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (+ (* -1/4 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3))) (+ (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* (pow phi2 2) (- (+ (* -1/24 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))) (* (pow phi2 2) (- (+ (* -1/24 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/720 (/ (pow (cos (- lambda1 lambda2)) 3) (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 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2)))))))) (- (cos phi1) (cos (- lambda1 lambda2))))))) (+ (* -1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -1/4 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3))) (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* -2/45 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/720 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/48 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3)))))))))) (+ (* -1/4 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3))) (+ (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (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 (+ (* (* phi2 phi2) -1/2) 1) #s(hole binary64 1))
#s(approx (+ (* (* phi2 phi2) -1/2) 1) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (* (* phi2 phi2) (- (pow phi2 -2) 1/2)) #s(hole binary64 1))
#s(approx (* (* phi2 phi2) (- (pow phi2 -2) 1/2)) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (- (pow phi2 -2) 1/2) #s(hole binary64 (/ 1 (pow phi2 2))))
#s(approx (- (pow phi2 -2) 1/2) #s(hole binary64 (/ (+ 1 (* -1/2 (pow phi2 2))) (pow phi2 2))))
#s(approx (pow phi2 -2) #s(hole binary64 (/ 1 (pow phi2 2))))
#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 (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) #s(hole binary64 1))
#s(approx (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))))
#s(approx (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2)) #s(hole binary64 (* -1/2 (pow phi2 2))))
#s(approx (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2)) #s(hole binary64 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2))))
#s(approx (- (* 1/24 (* phi2 phi2)) 1/2) #s(hole binary64 -1/2))
#s(approx (- (* 1/24 (* phi2 phi2)) 1/2) #s(hole binary64 (- (* 1/24 (pow phi2 2)) 1/2)))
#s(approx (* 1/24 (* phi2 phi2)) #s(hole binary64 (* 1/24 (pow phi2 2))))
#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 (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (+ (cos lambda2) (+ (* lambda1 (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* -1/2 (* lambda1 (sin lambda2)))))))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (+ (cos lambda2) (+ (* lambda1 (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (+ (* -1/2 (* lambda1 (sin lambda2))) (* (pow phi2 2) (+ (* 1/24 (cos lambda2)) (* 1/24 (* lambda1 (sin lambda2))))))))))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (+ (cos lambda2) (+ (* lambda1 (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (+ (* -1/2 (* lambda1 (sin lambda2))) (* (pow phi2 2) (+ (* 1/24 (cos lambda2)) (+ (* 1/24 (* lambda1 (sin lambda2))) (* (pow phi2 2) (+ (* -1/720 (cos lambda2)) (* -1/720 (* lambda1 (sin lambda2)))))))))))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* -1/2 (* (pow phi2 2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* (pow phi2 2) (+ (* -1/2 (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* 1/24 (* (pow phi2 2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* (pow phi2 2) (+ (* -1/2 (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (* 1/24 (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (cos (- lambda1 lambda2)))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (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)) 1) #s(hole binary64 (+ 1 (+ (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 (+ 1 (* (cos lambda2) (cos phi2))) #s(hole binary64 (+ 1 (cos lambda2))))
#s(approx (+ 1 (* (cos lambda2) (cos phi2))) #s(hole binary64 (+ 1 (+ (cos lambda2) (* -1/2 (* (pow phi2 2) (cos lambda2)))))))
#s(approx (+ 1 (* (cos lambda2) (cos phi2))) #s(hole binary64 (+ 1 (+ (cos lambda2) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* 1/24 (* (pow phi2 2) (cos lambda2)))))))))
#s(approx (+ 1 (* (cos lambda2) (cos phi2))) #s(hole binary64 (+ 1 (+ (cos lambda2) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda2))) (* 1/24 (cos lambda2))))))))))
#s(approx (* (cos lambda2) (cos phi2)) #s(hole binary64 (cos lambda2)))
#s(approx (* (cos lambda2) (cos phi2)) #s(hole binary64 (+ (cos lambda2) (* -1/2 (* (pow phi2 2) (cos lambda2))))))
#s(approx (* (cos lambda2) (cos phi2)) #s(hole binary64 (+ (cos lambda2) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* 1/24 (* (pow phi2 2) (cos lambda2))))))))
#s(approx (* (cos lambda2) (cos phi2)) #s(hole binary64 (+ (cos lambda2) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda2))) (* 1/24 (cos lambda2)))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (cos phi1))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* -1/2 (* (pow phi2 2) (cos lambda1)))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* 1/24 (* (pow phi2 2) (cos lambda1)))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda1))) (* 1/24 (cos lambda1))))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (cos (- lambda1 lambda2)))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* phi2 (+ (* -1/2 (* phi2 (cos (- lambda1 lambda2)))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* phi2 (+ (* phi2 (+ (* -1/2 (cos (- lambda1 lambda2))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (cos (- lambda1 lambda2)))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (* phi2 (+ (* -1/2 (* phi2 (cos (- lambda1 lambda2)))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (* phi2 (+ (* phi2 (+ (* -1/2 (cos (- lambda1 lambda2))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (+ (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2)))))))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (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 (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (- 1 (cos (- lambda1 lambda2))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- 1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* (pow phi2 2) (- (* -1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (/ (* (cos (- lambda1 lambda2)) (- 1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- 1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (- 1 (cos (- lambda1 lambda2)))))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- 1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* (pow phi2 2) (- (+ (* -1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (* (pow phi2 2) (- (* 2/45 (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (/ (* (cos (- lambda1 lambda2)) (- (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- 1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (- 1 (cos (- lambda1 lambda2))))) (+ (* 1/720 (/ (* (cos (- lambda1 lambda2)) (- 1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (/ (* (cos (- lambda1 lambda2)) (- 1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- 1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (- 1 (cos (- lambda1 lambda2)))))))) (- 1 (cos (- lambda1 lambda2)))))))))) (+ (* -1/24 (/ (* (cos (- lambda1 lambda2)) (- 1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- 1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (- 1 (cos (- lambda1 lambda2)))))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- 1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- 1 (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- (+ 1 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- (+ 1 (* (pow phi2 2) (- (* -1/3 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- (+ 1 (* (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 (- lambda1 lambda2)) 2))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) #s(hole binary64 (pow (cos (- lambda1 lambda2)) 2)))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) #s(hole binary64 (+ (* -1 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) #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 (* (cos phi2) (cos (- lambda1 lambda2))) 2) #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 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- 1 (cos (- lambda1 lambda2)))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* 1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))) (cos (- lambda1 lambda2)))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* (pow phi2 2) (- (* -1/24 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* -1/2 (cos (- lambda1 lambda2)))))) (cos (- lambda1 lambda2)))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* (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 (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (/ (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* (pow phi2 2) (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))) (/ (* (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2)))) (+ (/ 1 (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* (pow phi2 2) (- (+ (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))) (* (pow phi2 2) (- (* 7/8 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))) (+ (/ (* (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 1/24 (cos (- lambda1 lambda2))))) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2)) (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))) (/ (* (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))))))) (/ (* (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2)))) (+ (/ 1 (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* (pow phi2 2) (- (+ (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))) (* (pow phi2 2) (- (+ (* 7/8 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))) (* (pow phi2 2) (- (* -61/240 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))) (+ (/ (* (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (* -2/45 (pow (cos (- lambda1 lambda2)) 2)) (* -1/720 (cos (- lambda1 lambda2))))) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2)) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))) (/ (* (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (- (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 1/24 (cos (- lambda1 lambda2))))) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) (/ (* (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2)))) (- (* 7/8 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))) (+ (/ (* (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 1/24 (cos (- lambda1 lambda2))))) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2)) (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))) (/ (* (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))))) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))))))) (+ (/ (* (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 1/24 (cos (- lambda1 lambda2))))) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2)) (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))) (/ (* (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))))))) (/ (* (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2)))) (+ (/ 1 (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (* (cos (- lambda1 lambda2)) (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3)))))) (/ (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* (pow phi2 2) (- (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1/24 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (* (cos (- lambda1 lambda2)) (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3)))))) (- (cos phi1) (cos (- lambda1 lambda2)))) (/ (* (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2))) (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 4))))))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (* (cos (- lambda1 lambda2)) (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3)))))) (/ (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* (pow phi2 2) (- (+ (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* (pow phi2 2) (- (* 1/720 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -2/45 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/720 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* 1/24 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* 1/6 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (/ (* (cos (- lambda1 lambda2)) (- (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1/24 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (* (cos (- lambda1 lambda2)) (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3)))))) (- (cos phi1) (cos (- lambda1 lambda2)))) (/ (* (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2))) (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 4)))))))) (- (cos phi1) (cos (- lambda1 lambda2)))) (+ (/ (* (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2))) (- (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (* (cos (- lambda1 lambda2)) (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2)) (/ (* (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 2)) (* 1/360 (* (cos (- lambda1 lambda2)) (- (cos phi1) (cos (- lambda1 lambda2)))))) (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 4))))))))))) (+ (* -1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1/24 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (* (cos (- lambda1 lambda2)) (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3)))))) (- (cos phi1) (cos (- lambda1 lambda2)))) (/ (* (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2))) (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 4))))))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (* (cos (- lambda1 lambda2)) (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3)))))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (/ (- 1 (+ (cos (- lambda1 lambda2)) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))
#s(approx (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (- (+ (* (pow phi2 2) (- (* -1 (/ (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3)))) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ (* (cos (- lambda1 lambda2)) (- 1 (+ (cos (- lambda1 lambda2)) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (pow (- 1 (cos (- lambda1 lambda2))) 3)))) (/ 1 (pow (- 1 (cos (- lambda1 lambda2))) 2))) (+ (/ (cos (- lambda1 lambda2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))
#s(approx (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* -1 (/ (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3)))) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* (pow phi2 2) (- (* -1 (/ (+ (* -1/2 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/24 (cos (- lambda1 lambda2))) (* 1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (+ (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3)))) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ (* (cos (- lambda1 lambda2)) (- 1 (+ (cos (- lambda1 lambda2)) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (pow (- 1 (cos (- lambda1 lambda2))) 3)))) (- 1 (cos (- lambda1 lambda2)))) (/ (* (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (+ (cos (- lambda1 lambda2)) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (pow (- 1 (cos (- lambda1 lambda2))) 4)))))) (/ (* (cos (- lambda1 lambda2)) (- 1 (+ (cos (- lambda1 lambda2)) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (pow (- 1 (cos (- lambda1 lambda2))) 3)))) (/ 1 (pow (- 1 (cos (- lambda1 lambda2))) 2))) (+ (/ (cos (- lambda1 lambda2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))
#s(approx (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* -1 (/ (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3)))) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* (pow phi2 2) (- (+ (* -1 (/ (+ (* -1/2 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/24 (cos (- lambda1 lambda2))) (* 1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* (pow phi2 2) (- (* -1 (/ (+ (* -2/45 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/720 (cos (- lambda1 lambda2))) (+ (* 1/720 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/24 (pow (cos (- lambda1 lambda2)) 3)) (* 1/6 (pow (cos (- lambda1 lambda2)) 3)))))) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (+ (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (+ (* -1/2 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/24 (cos (- lambda1 lambda2))) (* 1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (+ (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3)))) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ (* (cos (- lambda1 lambda2)) (- 1 (+ (cos (- lambda1 lambda2)) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (pow (- 1 (cos (- lambda1 lambda2))) 3)))) (- 1 (cos (- lambda1 lambda2)))) (/ (* (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (+ (cos (- lambda1 lambda2)) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (- 1 (cos (- lambda1 lambda2)))) (+ (/ (* (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2))) (- (* -1 (/ (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3)))) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ (* (cos (- lambda1 lambda2)) (- 1 (+ (cos (- lambda1 lambda2)) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (pow (- 1 (cos (- lambda1 lambda2))) 3)))) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (/ (* (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 2)) (* 1/360 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (+ (cos (- lambda1 lambda2)) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (pow (- 1 (cos (- lambda1 lambda2))) 4))))))) (+ (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3)))) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ (* (cos (- lambda1 lambda2)) (- 1 (+ (cos (- lambda1 lambda2)) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (pow (- 1 (cos (- lambda1 lambda2))) 3)))) (- 1 (cos (- lambda1 lambda2)))) (/ (* (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (+ (cos (- lambda1 lambda2)) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (pow (- 1 (cos (- lambda1 lambda2))) 4)))))) (/ (* (cos (- lambda1 lambda2)) (- 1 (+ (cos (- lambda1 lambda2)) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (pow (- 1 (cos (- lambda1 lambda2))) 3)))) (/ 1 (pow (- 1 (cos (- lambda1 lambda2))) 2))) (+ (/ (cos (- lambda1 lambda2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))
#s(approx (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) #s(hole binary64 (- 1 (+ (cos (- lambda1 lambda2)) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))
#s(approx (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) #s(hole binary64 (- (+ 1 (* -1 (* (pow phi2 2) (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))))) (+ (cos (- lambda1 lambda2)) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))
#s(approx (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) #s(hole binary64 (- (+ 1 (* (pow phi2 2) (- (* -1 (* (pow phi2 2) (+ (* -1/2 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/24 (cos (- lambda1 lambda2))) (* 1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))))) (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))))) (+ (cos (- lambda1 lambda2)) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))
#s(approx (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) #s(hole binary64 (- (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (- (* -1 (* (pow phi2 2) (+ (* -2/45 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/720 (cos (- lambda1 lambda2))) (+ (* 1/720 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/24 (pow (cos (- lambda1 lambda2)) 3)) (* 1/6 (pow (cos (- lambda1 lambda2)) 3)))))))) (+ (* -1/2 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/24 (cos (- lambda1 lambda2))) (* 1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))))) (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))))) (+ (cos (- lambda1 lambda2)) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (* (pow phi2 2) (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (* (pow phi2 2) (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/2 (cos (- lambda1 lambda2))) (+ (* 1/2 (pow (cos (- lambda1 lambda2)) 3)) (* (pow phi2 2) (+ (* -1/2 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/24 (cos (- lambda1 lambda2))) (* 1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))))))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (* (pow phi2 2) (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/2 (cos (- lambda1 lambda2))) (+ (* 1/2 (pow (cos (- lambda1 lambda2)) 3)) (* (pow phi2 2) (+ (* -1/2 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/24 (cos (- lambda1 lambda2))) (+ (* 1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (* (pow phi2 2) (+ (* -2/45 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/720 (cos (- lambda1 lambda2))) (+ (* 1/720 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/24 (pow (cos (- lambda1 lambda2)) 3)) (* 1/6 (pow (cos (- lambda1 lambda2)) 3)))))))))))))))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))
#s(approx (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))
#s(approx (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3)))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* 1/2 (pow (cos (- lambda1 lambda2)) 3)) (* (pow phi2 2) (+ (* -1/2 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (* 1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* 1/2 (pow (cos (- lambda1 lambda2)) 3)) (* (pow phi2 2) (+ (* -1/2 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (* (pow phi2 2) (+ (* -2/45 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* 1/720 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/24 (pow (cos (- lambda1 lambda2)) 3)) (* 1/6 (pow (cos (- lambda1 lambda2)) 3))))))))))))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 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 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))
#s(approx (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* 1/2 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 3))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -1/24 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 3))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3)))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* (pow phi2 2) (+ (* 1/2 (pow (cos (- lambda1 lambda2)) 3)) (* (pow phi2 2) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (* 1/720 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 3))))))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) #s(hole binary64 (pow (- 1 (cos (- lambda1 lambda2))) 2)))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) #s(hole binary64 (+ (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) #s(hole binary64 (+ (* (pow phi2 2) (+ (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) #s(hole binary64 (+ (* (pow phi2 2) (+ (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (+ (* 1/4 (pow (cos (- lambda1 lambda2)) 2)) (* (pow phi2 2) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 2)) (* 1/360 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2)))))))))))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* (pow phi2 2) (- (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda1 lambda2))))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* (pow phi2 2) (- (+ (* (pow phi2 2) (- (* -1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* -1/24 (/ (* (cos (- lambda1 lambda2)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda1 lambda2))))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/720 (/ (* (cos (- lambda1 lambda2)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda1 lambda2))))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (* 3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos phi1) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* 3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (* (pow phi2 2) (- (* -4 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (+ (/ (* (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))))) (* (+ (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))) (- (* 3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2))))))))) (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos phi1) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* 3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (* (pow phi2 2) (- (+ (* -4 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (* (pow phi2 2) (- (* 47/15 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (+ (/ (* (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))))) (+ (* 1/720 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (/ (* (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))))) (* (+ (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (- (* 3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2))))) (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))) (- (* -4 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (+ (/ (* (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))))) (* (+ (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))) (- (* 3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))))) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))))))) (+ (/ (* (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))))) (* (+ (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))) (- (* 3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2))))))))) (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos phi1) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2))))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* (pow phi2 2) (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4)))))) (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* -3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))))) (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))) (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* (pow phi2 2) (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4)))))) (+ (* (pow phi2 2) (- (+ (* -1 (* (pow phi1 2) (- (+ (* -4 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* -3 (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 5/3 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2))))))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))) (/ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (+ (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))) (- (* -3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))) (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (* (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 5/3 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 4 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))))))))) (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (+ (* -3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))))) (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))) (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* (pow phi2 2) (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4)))))) (+ (* (pow phi2 2) (- (+ (* -1 (* (pow phi1 2) (- (+ (* -4 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* -3 (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 5/3 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2))))))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))) (/ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (+ (* (pow phi2 2) (- (+ (* -1 (* (pow phi1 2) (- (+ (* -4 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* -3 (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (* (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 5/3 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -34/45 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -2/45 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/720 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 47/15 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* -1/6 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/720 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 2/45 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (+ (* (cos (- lambda1 lambda2)) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (- 1 (cos (- lambda1 lambda2))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (pow (cos (- lambda1 lambda2)) 2))))) (* 2 (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))))) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 2)) (* 1/360 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2)))))))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))) (+ (/ (* (+ (* 2 (* (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- (+ (* -4 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))) (/ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))))) (+ (/ (* (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (* (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (- (* -3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))) (+ (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))) (- (* 4 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))) (- (* -3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))) (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (* (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))) (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (+ (* 1/720 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* -47/15 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (* (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 5/3 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -34/45 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -2/45 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/720 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))))))))) (+ (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))) (- (* -3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))) (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (* (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 5/3 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 4 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))))))))) (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (+ (* -3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))))) (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))) (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* (pow phi2 2) (- (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4)))))) (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))))) (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* (pow phi2 2) (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4)))))) (* (pow phi2 2) (- (* -1 (* (pow phi1 2) (- (+ (* -4 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* -3 (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 5/3 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2))))))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))) (/ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 5/3 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2))))))))))))) (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))))) (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* (pow phi2 2) (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4)))))) (* (pow phi2 2) (- (+ (* -1 (* (pow phi1 2) (- (+ (* -4 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* -3 (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 5/3 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2))))))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))) (/ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (* (pow phi2 2) (- (* -1 (* (pow phi1 2) (- (+ (* -4 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* -3 (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (* (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 5/3 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -34/45 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -2/45 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/720 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 47/15 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* -1/6 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/720 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 2/45 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (+ (* (cos (- lambda1 lambda2)) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (- 1 (cos (- lambda1 lambda2))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (pow (cos (- lambda1 lambda2)) 2))))) (* 2 (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))))) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 2)) (* 1/360 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2)))))))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))) (+ (/ (* (+ (* 2 (* (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- (+ (* -4 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))) (/ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))))) (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (* (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 5/3 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -34/45 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -2/45 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/720 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))))))))) (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 5/3 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2))))))))))))) (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))))) (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))))))
#s(approx (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) #s(hole binary64 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))))
#s(approx (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) #s(hole binary64 (+ (* (pow phi1 2) (* (pow phi2 2) (- (+ (* -3 (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4)))))) (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))))
#s(approx (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) #s(hole binary64 (+ (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (* (pow phi2 2) (+ (* (pow phi1 2) (* (pow phi2 2) (- (+ (* -4 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* -3 (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 5/3 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2))))))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))) (/ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (* (pow phi1 2) (- (+ (* -3 (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))))))))
#s(approx (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) #s(hole binary64 (+ (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (* (pow phi2 2) (+ (* (pow phi1 2) (- (+ (* -3 (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (* (pow phi2 2) (+ (* (pow phi1 2) (* (pow phi2 2) (- (+ (* -4 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* -3 (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (* (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 5/3 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -34/45 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -2/45 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/720 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 47/15 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* -1/6 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/720 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 2/45 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (+ (* (cos (- lambda1 lambda2)) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (- 1 (cos (- lambda1 lambda2))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (pow (cos (- lambda1 lambda2)) 2))))) (* 2 (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))))) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 2)) (* 1/360 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2)))))))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))) (+ (/ (* (+ (* 2 (* (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- (+ (* -4 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))) (/ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))))) (* (pow phi1 2) (- (+ (* -4 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* -3 (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 5/3 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2))))))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))) (/ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))))))))))
#s(approx (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) #s(hole binary64 (+ (* 3 (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))
#s(approx (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) #s(hole binary64 (+ (* 3 (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* (pow phi2 2) (- (+ (* -3 (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))))
#s(approx (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) #s(hole binary64 (+ (* 3 (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* (pow phi2 2) (- (+ (* -3 (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* (pow phi2 2) (- (+ (* -4 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* -3 (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 5/3 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2))))))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))) (/ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))))
#s(approx (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) #s(hole binary64 (+ (* 3 (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* (pow phi2 2) (- (+ (* -3 (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* (pow phi2 2) (- (+ (* -4 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* -3 (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 5/3 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2))))))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* (pow phi2 2) (- (+ (* -4 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* -3 (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (* (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 5/3 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -34/45 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -2/45 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/720 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 47/15 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* -1/6 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/720 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 2/45 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (+ (* (cos (- lambda1 lambda2)) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (- 1 (cos (- lambda1 lambda2))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (pow (cos (- lambda1 lambda2)) 2))))) (* 2 (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))))) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 2)) (* 1/360 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2)))))))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))) (+ (/ (* (+ (* 2 (* (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- (+ (* -4 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))) (/ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (/ (* (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))) (/ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))))
#s(approx (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* -1 (* (pow phi2 2) (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))))) (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))))
#s(approx (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* (pow phi2 2) (- (* -1 (* (pow phi2 2) (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 5/3 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))))))))) (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))))) (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))))
#s(approx (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* (pow phi2 2) (- (* (pow phi2 2) (- (* -1 (* (pow phi2 2) (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (* (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 5/3 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -34/45 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -2/45 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/720 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))))))))) (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 5/3 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))))))))) (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))))) (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))))
#s(approx (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))
#s(approx (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))))))
#s(approx (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (* (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))))))))))
#s(approx (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (+ (* (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (+ (* 1/720 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))))))))))))))
#s(approx (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) #s(hole binary64 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))))
#s(approx (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) #s(hole binary64 (+ 1 (+ (* (pow phi2 2) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))))
#s(approx (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) #s(hole binary64 (+ 1 (+ (* (pow phi2 2) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (+ (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* (pow phi2 2) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))))) (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))))
#s(approx (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) #s(hole binary64 (+ 1 (+ (* (pow phi2 2) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (+ (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* (pow phi2 2) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (+ (* 5/3 (pow (cos (- lambda1 lambda2)) 4)) (* (pow phi2 2) (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (pow (cos (- lambda1 lambda2)) 2)))))))))) (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))))
#s(approx (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) #s(hole binary64 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))
#s(approx (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))))
#s(approx (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (+ (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* (pow phi2 2) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))))) (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))))
#s(approx (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (+ (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* (pow phi2 2) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (+ (* 5/3 (pow (cos (- lambda1 lambda2)) 4)) (* (pow phi2 2) (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (pow (cos (- lambda1 lambda2)) 2)))))))))) (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))))
#s(approx (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) #s(hole binary64 (pow (cos (- lambda1 lambda2)) 4)))
#s(approx (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) #s(hole binary64 (+ (* -2 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (cos (- lambda1 lambda2)) 4))))
#s(approx (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* 5/3 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 4))))) (pow (cos (- lambda1 lambda2)) 4))))
#s(approx (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* (pow phi2 2) (+ (* -34/45 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 4))) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))))) (pow (cos (- lambda1 lambda2)) 4))))
#s(approx (pow (cos phi2) 4) #s(hole binary64 1))
#s(approx (pow (cos phi2) 4) #s(hole binary64 (+ 1 (* -2 (pow phi2 2)))))
#s(approx (pow (cos phi2) 4) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* 5/3 (pow phi2 2)) 2)))))
#s(approx (pow (cos phi2) 4) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 5/3 (* -34/45 (pow phi2 2)))) 2)))))
#s(approx (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) #s(hole binary64 (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))
#s(approx (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) #s(hole binary64 (+ (* (pow phi2 2) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))
#s(approx (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) #s(hole binary64 (+ (* (pow phi2 2) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* (pow phi2 2) (- (+ (* -4 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))) (/ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))
#s(approx (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) #s(hole binary64 (+ (* (pow phi2 2) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* (pow phi2 2) (- (+ (* -4 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* (pow phi2 2) (- (+ (* -4 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 47/15 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* -1/6 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/720 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 2/45 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (+ (* (cos (- lambda1 lambda2)) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (- 1 (cos (- lambda1 lambda2))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (pow (cos (- lambda1 lambda2)) 2))))) (* 2 (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))))) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 2)) (* 1/360 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2)))))))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))) (+ (/ (* (+ (* 2 (* (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- (+ (* -4 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))) (/ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (/ (* (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))) (/ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))
#s(approx (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) #s(hole binary64 (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))))
#s(approx (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) #s(hole binary64 (+ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow phi2 2) (+ (* 3 (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))))) (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))))))))
#s(approx (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) #s(hole binary64 (+ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow phi2 2) (+ (* 3 (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))))) (+ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow phi2 2) (+ (* -4 (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))))) (+ (* 3 (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))) (* (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))))))))))))
#s(approx (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) #s(hole binary64 (+ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow phi2 2) (+ (* 3 (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))))) (+ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow phi2 2) (+ (* -4 (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))))) (+ (* 3 (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))) (+ (* (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow phi2 2) (+ (* -4 (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))) (+ (* 3 (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))))) (+ (* 47/15 (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))))) (* (+ (* -1/2 (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* -1/6 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/720 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 2/45 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))))))))))))))))
#s(approx (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) #s(hole binary64 (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))))
#s(approx (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) #s(hole binary64 (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (+ (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)) (* (pow phi2 2) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))))))
#s(approx (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) #s(hole binary64 (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (+ (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)) (* (pow phi2 2) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (+ (* (pow phi2 2) (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3)))))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))))))
#s(approx (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) #s(hole binary64 (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (+ (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)) (* (pow phi2 2) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (+ (* (pow phi2 2) (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (+ (* 1/2 (pow (cos (- lambda1 lambda2)) 3)) (* (pow phi2 2) (+ (* -1/2 (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* -1/6 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/720 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 2/45 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))))))))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))))))
#s(approx (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) #s(hole binary64 (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))))
#s(approx (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) #s(hole binary64 (+ (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)) (* (pow phi2 2) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))))
#s(approx (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) #s(hole binary64 (+ (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)) (* (pow phi2 2) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (+ (* (pow phi2 2) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))))
#s(approx (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) #s(hole binary64 (+ (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)) (* (pow phi2 2) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (+ (* (pow phi2 2) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (+ (* 1/2 (pow (cos (- lambda1 lambda2)) 3)) (* (pow phi2 2) (+ (* -1/6 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/720 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 2/45 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))))))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))))
#s(approx (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) #s(hole binary64 (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))
#s(approx (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) #s(hole binary64 (- (+ (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))) 2)))
#s(approx (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) #s(hole binary64 (- (+ (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* (pow phi2 2) (+ (* -1/3 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))) (pow (cos (- lambda1 lambda2)) 2)))) 2)))
#s(approx (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) #s(hole binary64 (- (+ (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* (pow phi2 2) (+ (* (pow phi2 2) (+ (* -1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 2/45 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))))) (pow (cos (- lambda1 lambda2)) 2)))) 2)))
#s(approx (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (* -1 (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* (pow phi2 2) (+ (* -1/3 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))) (pow (cos (- lambda1 lambda2)) 2))))))
#s(approx (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* (pow phi2 2) (+ (* (pow phi2 2) (+ (* -1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 2/45 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))))) (pow (cos (- lambda1 lambda2)) 2))))))
#s(approx (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (pow (cos (- lambda1 lambda2)) 2)))
#s(approx (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (+ (* -1 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) #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 (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) #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 (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) #s(hole binary64 (- 1 (pow (cos (- lambda1 lambda2)) 6))))
#s(approx (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) #s(hole binary64 (- (+ 1 (* 3 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 6)))) (pow (cos (- lambda1 lambda2)) 6))))
#s(approx (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) #s(hole binary64 (- (+ 1 (* (pow phi2 2) (- (* -4 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 6))) (* -3 (pow (cos (- lambda1 lambda2)) 6))))) (pow (cos (- lambda1 lambda2)) 6))))
#s(approx (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) #s(hole binary64 (- (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (- (* 47/15 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 6))) (* 4 (pow (cos (- lambda1 lambda2)) 6)))) (* -3 (pow (cos (- lambda1 lambda2)) 6))))) (pow (cos (- lambda1 lambda2)) 6))))
#s(approx (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) #s(hole binary64 (pow (cos (- lambda1 lambda2)) 6)))
#s(approx (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) #s(hole binary64 (+ (* -3 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 6))) (pow (cos (- lambda1 lambda2)) 6))))
#s(approx (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -3 (pow (cos (- lambda1 lambda2)) 6)) (* 4 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 6))))) (pow (cos (- lambda1 lambda2)) 6))))
#s(approx (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -3 (pow (cos (- lambda1 lambda2)) 6)) (* (pow phi2 2) (+ (* -47/15 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 6))) (* 4 (pow (cos (- lambda1 lambda2)) 6)))))) (pow (cos (- lambda1 lambda2)) 6))))
#s(approx (pow (cos phi2) 6) #s(hole binary64 1))
#s(approx (pow (cos phi2) 6) #s(hole binary64 (+ 1 (* -3 (pow phi2 2)))))
#s(approx (pow (cos phi2) 6) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* 4 (pow phi2 2)) 3)))))
#s(approx (pow (cos phi2) 6) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 4 (* -47/15 (pow phi2 2)))) 3)))))
#s(approx (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))
#s(approx (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (* (pow phi2 2) (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))
#s(approx (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (* (pow phi2 2) (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2))))) (* (pow phi2 2) (+ (* 2 (* (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))
#s(approx (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (* (pow phi2 2) (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2))))) (* (pow phi2 2) (+ (* 2 (* (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (+ (* (pow phi2 2) (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (+ (* (cos (- lambda1 lambda2)) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (- 1 (cos (- lambda1 lambda2))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (pow (cos (- lambda1 lambda2)) 2))))) (* 2 (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))))) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 2)) (* 1/360 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2))))))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))
#s(approx (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) #s(hole binary64 (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2)))
#s(approx (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) #s(hole binary64 (+ (* 2 (* (pow phi2 2) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))))) (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2))))
#s(approx (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) #s(hole binary64 (+ (* (pow phi2 2) (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (* (pow phi2 2) (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2))))) (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2))))
#s(approx (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) #s(hole binary64 (+ (* (pow phi2 2) (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (* (pow phi2 2) (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (+ (* (pow phi2 2) (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (pow (cos (- lambda1 lambda2)) 2))))) (* 2 (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)))))) (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2))))
#s(approx (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* (pow phi2 2) (- (* -3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))))
#s(approx (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* (pow phi2 2) (- (+ (* -3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (* (pow phi2 2) (- (* 4 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))) (- (* -3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))) (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (* (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))))
#s(approx (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* (pow phi2 2) (- (+ (* -3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (* (pow phi2 2) (- (+ (* 4 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (* (pow phi2 2) (- (* -47/15 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (/ (* (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (* (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (- (* -3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))) (+ (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))) (- (* 4 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))) (- (* -3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))) (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (* (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))) (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (+ (* 1/720 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))))) (+ (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))) (- (* -3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))) (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (* (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))))
#s(approx (* (cos phi2) (cos lambda2)) #s(hole binary64 (cos lambda2)))
#s(approx (* (cos phi2) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* -1/2 (* (pow phi2 2) (cos lambda2))))))
#s(approx (* (cos phi2) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* 1/24 (* (pow phi2 2) (cos lambda2))))))))
#s(approx (* (cos phi2) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda2))) (* 1/24 (cos lambda2)))))))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (/ (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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) (- (* -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 (- 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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) 2)) (pow (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))) 3))) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (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) (- (* 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)) (/ (* (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)))))))) (+ (/ (* (pow (cos phi1) 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 (- 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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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)))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) 2)) (pow (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))) 3))) (/ (* (pow (cos phi1) 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))) (- (* -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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (* (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) (- (* 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)))) 3))) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (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)))))) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (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 (- 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))))) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2))))) (+ (/ (* (pow (cos phi1) 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)) (/ (* (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)))))))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) 2)) (pow (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))) 3))) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (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) (- (* 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)) (/ (* (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)))))))) (+ (/ (* (pow (cos phi1) 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 (- 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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (pow (cos phi1) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* -1 (/ (* (pow phi2 2) (* (pow (cos phi1) 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))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* (pow phi2 2) (- (* -1 (* (pow phi2 2) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) 2)) (pow (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))) 3))) (/ (* (pow (cos phi1) 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))))) (/ (* (pow (cos phi1) 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))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* (pow phi2 2) (- (* (pow phi2 2) (- (* -1 (* (pow phi2 2) (+ (* -1 (/ (* (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) 2)) (pow (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))) 3))) (/ (* (pow (cos phi1) 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))) (- (* -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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (* (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) (- (* 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)))) 3))) (/ (* (pow (cos phi1) 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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) 2)) (pow (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))) 3))) (/ (* (pow (cos phi1) 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))))) (/ (* (pow (cos phi1) 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))))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* (pow phi2 2) (- (* -1/2 (/ (cos (- lambda1 lambda2)) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))))) (/ 1 (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* (pow phi2 2) (- (+ (* -1/2 (/ (cos (- lambda1 lambda2)) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (* (pow phi2 2) (- (* 1/24 (/ (cos (- lambda1 lambda2)) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (/ (* (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2)))) (- (* -1/2 (/ (cos (- lambda1 lambda2)) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))))) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))))))) (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))))) (/ 1 (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* (pow phi2 2) (- (+ (* -1/2 (/ (cos (- lambda1 lambda2)) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (* (pow phi2 2) (- (+ (* 1/24 (/ (cos (- lambda1 lambda2)) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (* (pow phi2 2) (- (* -1/720 (/ (cos (- lambda1 lambda2)) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (+ (* -2/45 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (+ (/ (* (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2)))) (- (* 1/24 (/ (cos (- lambda1 lambda2)) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (/ (* (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2)))) (- (* -1/2 (/ (cos (- lambda1 lambda2)) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))))) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))))) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) (/ (* (- (* -1/2 (/ (cos (- lambda1 lambda2)) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2)))) (- (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 1/24 (cos (- lambda1 lambda2))))) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))))))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (/ (* (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2)))) (- (* -1/2 (/ (cos (- lambda1 lambda2)) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))))) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))))))) (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))))) (/ 1 (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* (pow phi2 2) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (pow (cos (- lambda1 lambda2)) 2))) (cos (- lambda1 lambda2)))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* (pow phi2 2) (- (+ (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* (pow phi2 2) (- (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 1/24 (cos (- lambda1 lambda2)))))) (* -1/2 (cos (- lambda1 lambda2))))) (pow (cos (- lambda1 lambda2)) 2))) (cos (- lambda1 lambda2)))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* (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 (- lambda1 lambda2)))))) (* 1/24 (cos (- lambda1 lambda2)))))) (* -1/2 (cos (- lambda1 lambda2))))) (pow (cos (- lambda1 lambda2)) 2))) (cos (- lambda1 lambda2)))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (+ (* -1 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (+ (* (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 (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (+ (* (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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 (- 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 (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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)))))) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (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 (- 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)))))) (/ (* (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 (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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)))))) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (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)))))) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (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 (- 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))))) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2))))) (/ (* (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 (- 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 (- 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)))))) (/ (* (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 (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2))))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) #s(hole binary64 (pow (cos (- lambda1 lambda2)) 3)))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) #s(hole binary64 (+ (* -3/2 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 3))) (pow (cos (- lambda1 lambda2)) 3))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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 (- lambda1 lambda2)) 3))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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 (- lambda1 lambda2)) 3))))
#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 phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))))
#s(approx (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* (pow phi2 2) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (pow (cos (- lambda1 lambda2)) 2))) (cos (- lambda1 lambda2)))))
#s(approx (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* (pow phi2 2) (- (+ (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* (pow phi2 2) (- (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 1/24 (cos (- lambda1 lambda2)))))) (* -1/2 (cos (- lambda1 lambda2))))) (pow (cos (- lambda1 lambda2)) 2))) (cos (- lambda1 lambda2)))))
#s(approx (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* (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 (- lambda1 lambda2)))))) (* 1/24 (cos (- lambda1 lambda2)))))) (* -1/2 (cos (- lambda1 lambda2))))) (pow (cos (- lambda1 lambda2)) 2))) (cos (- lambda1 lambda2)))))
#s(approx (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ 1 (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ 1 (+ (* -1 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ 1 (+ (* (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 (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ 1 (+ (* (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 (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow phi2 2) (* (pow (cos phi1) 2) (cos (- lambda1 lambda2)))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (- (* -1 (* (pow phi2 2) (+ (* -1/4 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3))) (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2)))))) (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (- (* (pow phi2 2) (- (* -1 (* (pow phi2 2) (+ (* -1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -1/4 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3))) (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/720 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/48 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3))))))) (+ (* -1/4 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3))) (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2)))))) (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- 1 (cos (- lambda1 lambda2))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* -1/2 (/ (* (pow phi2 2) (cos (- lambda1 lambda2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* (pow phi2 2) (- (* -1 (* (pow phi2 2) (+ (* -1/4 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 3))) (* -1/24 (/ (cos (- lambda1 lambda2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ 1 (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* (pow phi2 2) (- (* (pow phi2 2) (- (* -1 (* (pow phi2 2) (+ (* -1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -1/4 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 3))) (* -1/24 (/ (cos (- lambda1 lambda2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (- 1 (cos (- lambda1 lambda2))))) (+ (* 1/720 (/ (cos (- lambda1 lambda2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* 1/48 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 3))))))) (+ (* -1/4 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 3))) (* -1/24 (/ (cos (- lambda1 lambda2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ 1 (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (- (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* (pow phi2 2) (- (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* -1/24 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (- (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* (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)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/720 (/ (pow (cos (- lambda1 lambda2)) 3) (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 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2)))))))) (- (cos phi1) (cos (- lambda1 lambda2)))))))))) (+ (* -1/24 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #s(hole binary64 (pow (cos (- lambda1 lambda2)) 2)))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #s(hole binary64 (+ (* -1 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) #s(hole binary64 (+ (pow (cos phi1) 3) (pow (cos (- lambda1 lambda2)) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ (pow (cos phi1) 3) (pow (cos (- lambda1 lambda2)) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (* 1/2 (* (pow (cos phi1) 2) (cos (- lambda1 lambda2)))) (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* 1/2 (* (pow (cos phi1) 2) (cos (- lambda1 lambda2)))) (* (pow phi2 2) (- (* -1/24 (* (pow (cos phi1) 2) (cos (- lambda1 lambda2)))) (+ (* -1/2 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (* 1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))))) (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* 1/2 (* (pow (cos phi1) 2) (cos (- lambda1 lambda2)))) (* (pow phi2 2) (- (+ (* -1/24 (* (pow (cos phi1) 2) (cos (- lambda1 lambda2)))) (* (pow phi2 2) (- (* 1/720 (* (pow (cos phi1) 2) (cos (- lambda1 lambda2)))) (+ (* -2/45 (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/720 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/24 (pow (cos (- lambda1 lambda2)) 3)) (* 1/6 (pow (cos (- lambda1 lambda2)) 3)))))))) (+ (* -1/2 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (* 1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))))) (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* 1/2 (* (pow phi2 2) (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))))) (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -1/24 (* (pow phi2 2) (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))))) (* 1/2 (* (pow (cos phi1) 2) (cos (- lambda1 lambda2)))))) (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (+ (* 1/2 (* (pow (cos phi1) 2) (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/24 (* (pow (cos phi1) 2) (cos (- lambda1 lambda2)))) (* 1/720 (* (pow phi2 2) (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))))))))) (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/2 (pow (cos (- lambda1 lambda2)) 3)) (* (pow phi2 2) (+ (* -1/2 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (* 1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))))))))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/2 (pow (cos (- lambda1 lambda2)) 3)) (* (pow phi2 2) (+ (* -1/2 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 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/720 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/24 (pow (cos (- lambda1 lambda2)) 3)) (* 1/6 (pow (cos (- lambda1 lambda2)) 3))))))))))))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2)))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (- (cos phi1) (cos (- lambda1 lambda2))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (+ (* (cos (- lambda1 lambda2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (+ (* (cos (- lambda1 lambda2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/4 (pow (cos (- lambda1 lambda2)) 2)) (* (pow phi2 2) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 2)) (* 1/360 (* (cos (- lambda1 lambda2)) (- (cos phi1) (cos (- lambda1 lambda2)))))))))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))
#s(approx (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2) #s(hole binary64 (pow (- (cos phi1) (cos lambda1)) 2)))
#s(approx (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2) #s(hole binary64 (+ (* (pow phi2 2) (* (cos lambda1) (- (cos phi1) (cos lambda1)))) (pow (- (cos phi1) (cos lambda1)) 2))))
#s(approx (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2) #s(hole binary64 (+ (* (pow phi2 2) (+ (* (cos lambda1) (- (cos phi1) (cos lambda1))) (* (pow phi2 2) (+ (* -1/12 (* (cos lambda1) (- (cos phi1) (cos lambda1)))) (* 1/4 (pow (cos lambda1) 2)))))) (pow (- (cos phi1) (cos lambda1)) 2))))
#s(approx (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2) #s(hole binary64 (+ (* (pow phi2 2) (+ (* (cos lambda1) (- (cos phi1) (cos lambda1))) (* (pow phi2 2) (+ (* -1/12 (* (cos lambda1) (- (cos phi1) (cos lambda1)))) (+ (* 1/4 (pow (cos lambda1) 2)) (* (pow phi2 2) (+ (* -1/24 (pow (cos lambda1) 2)) (* 1/360 (* (cos lambda1) (- (cos phi1) (cos lambda1))))))))))) (pow (- (cos phi1) (cos lambda1)) 2))))
#s(approx (- (cos phi1) (* (cos lambda1) (cos phi2))) #s(hole binary64 (- (cos phi1) (cos lambda1))))
#s(approx (- (cos phi1) (* (cos lambda1) (cos phi2))) #s(hole binary64 (- (+ (cos phi1) (* 1/2 (* (pow phi2 2) (cos lambda1)))) (cos lambda1))))
#s(approx (- (cos phi1) (* (cos lambda1) (cos phi2))) #s(hole binary64 (- (+ (cos phi1) (* (pow phi2 2) (- (* -1/24 (* (pow phi2 2) (cos lambda1))) (* -1/2 (cos lambda1))))) (cos lambda1))))
#s(approx (- (cos phi1) (* (cos lambda1) (cos phi2))) #s(hole binary64 (- (+ (cos phi1) (* (pow phi2 2) (- (* (pow phi2 2) (- (* 1/720 (* (pow phi2 2) (cos lambda1))) (* 1/24 (cos lambda1)))) (* -1/2 (cos lambda1))))) (cos lambda1))))
#s(approx (* (cos lambda1) (cos phi2)) #s(hole binary64 (cos lambda1)))
#s(approx (* (cos lambda1) (cos phi2)) #s(hole binary64 (+ (cos lambda1) (* -1/2 (* (pow phi2 2) (cos lambda1))))))
#s(approx (* (cos lambda1) (cos phi2)) #s(hole binary64 (+ (cos lambda1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* 1/24 (* (pow phi2 2) (cos lambda1))))))))
#s(approx (* (cos lambda1) (cos phi2)) #s(hole binary64 (+ (cos lambda1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda1))) (* 1/24 (cos lambda1)))))))))
#s(approx (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #s(hole binary64 (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #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 (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #s(hole binary64 (pow (cos (- lambda1 lambda2)) 2)))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #s(hole binary64 (+ (* -1 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #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 (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #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 (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (* 2 (log (cos (- lambda1 lambda2))))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (+ (* -1 (pow phi2 2)) (* 2 (log (cos (- lambda1 lambda2)))))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (+ (* 2 (log (cos (- lambda1 lambda2)))) (* (pow phi2 2) (- (* -1/6 (pow phi2 2)) 1)))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (+ (* 2 (log (cos (- lambda1 lambda2)))) (* (pow phi2 2) (- (* (pow phi2 2) (- (* -2/45 (pow phi2 2)) 1/6)) 1)))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (log (cos (- lambda1 lambda2)))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (+ (log (cos (- lambda1 lambda2))) (* -1/2 (pow phi2 2)))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (+ (log (cos (- lambda1 lambda2))) (* (pow phi2 2) (- (* -1/12 (pow phi2 2)) 1/2)))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (+ (log (cos (- lambda1 lambda2))) (* (pow phi2 2) (- (* (pow phi2 2) (- (* -1/45 (pow phi2 2)) 1/12)) 1/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 (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ 1 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
#s(approx (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ 1 (+ (* (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 (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ 1 (+ (* (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) #s(hole binary64 (cos phi2)))
#s(approx (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))) #s(hole binary64 (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi2)) #s(hole binary64 (* (cos (* 1/2 (PI))) (sin phi2))))
#s(approx (sin phi2) #s(hole binary64 (sin phi2)))
#s(approx (sin (+ phi2 (* 1/2 (PI)))) #s(hole binary64 (sin (+ phi2 (* 1/2 (PI))))))
#s(approx (+ phi2 (* 1/2 (PI))) #s(hole binary64 phi2))
#s(approx (+ phi2 (* 1/2 (PI))) #s(hole binary64 (* phi2 (+ 1 (* 1/2 (/ (PI) phi2))))))
#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 (+ 1 (* -1/2 (* phi2 phi2))) #s(hole binary64 (* -1/2 (pow phi2 2))))
#s(approx (+ 1 (* -1/2 (* phi2 phi2))) #s(hole binary64 (* (pow phi2 2) (- (/ 1 (pow phi2 2)) 1/2))))
#s(approx (sin (+ phi2 (/ (PI) 2))) #s(hole binary64 (sin (+ phi2 (* 1/2 (PI))))))
#s(approx (+ phi2 (/ (PI) 2)) #s(hole binary64 phi2))
#s(approx (+ phi2 (/ (PI) 2)) #s(hole binary64 (* phi2 (+ 1 (* 1/2 (/ (PI) phi2))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (/ (sin (- lambda1 lambda2)) (pow phi2 2))))))
#s(approx (+ (* (* phi2 phi2) -1/2) 1) #s(hole binary64 (* -1/2 (pow phi2 2))))
#s(approx (+ (* (* phi2 phi2) -1/2) 1) #s(hole binary64 (* (pow phi2 2) (- (/ 1 (pow phi2 2)) 1/2))))
#s(approx (* (* phi2 phi2) (- (pow phi2 -2) 1/2)) #s(hole binary64 (* -1/2 (pow phi2 2))))
#s(approx (* (* phi2 phi2) (- (pow phi2 -2) 1/2)) #s(hole binary64 (* (pow phi2 2) (- (/ 1 (pow phi2 2)) 1/2))))
#s(approx (- (pow phi2 -2) 1/2) #s(hole binary64 -1/2))
#s(approx (- (pow phi2 -2) 1/2) #s(hole binary64 (- (/ 1 (pow phi2 2)) 1/2)))
#s(approx (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) #s(hole binary64 (* 1/24 (pow phi2 4))))
#s(approx (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) #s(hole binary64 (* (pow phi2 4) (- 1/24 (* 1/2 (/ 1 (pow phi2 2)))))))
#s(approx (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) #s(hole binary64 (* (pow phi2 4) (- (+ 1/24 (/ 1 (pow phi2 4))) (* 1/2 (/ 1 (pow phi2 2)))))))
#s(approx (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2)) #s(hole binary64 (* 1/24 (pow phi2 4))))
#s(approx (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2)) #s(hole binary64 (* (pow phi2 4) (- 1/24 (* 1/2 (/ 1 (pow phi2 2)))))))
#s(approx (- (* 1/24 (* phi2 phi2)) 1/2) #s(hole binary64 (* 1/24 (pow phi2 2))))
#s(approx (- (* 1/24 (* phi2 phi2)) 1/2) #s(hole binary64 (* (pow phi2 2) (- 1/24 (* 1/2 (/ 1 (pow phi2 2)))))))
#s(approx (pow (cos phi2) 2) #s(hole binary64 (pow (cos phi2) 2)))
#s(approx (pow (cos phi2) 4) #s(hole binary64 (pow (cos phi2) 4)))
#s(approx (pow (cos phi2) 6) #s(hole binary64 (pow (cos phi2) 6)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2)))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) #s(hole binary64 (+ 1 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2)))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2))))))
#s(approx (sin (+ phi2 (* 1/2 (PI)))) #s(hole binary64 (sin (- (* 1/2 (PI)) (* -1 phi2)))))
#s(approx (+ phi2 (* 1/2 (PI))) #s(hole binary64 (* -1 (* phi2 (- (* -1/2 (/ (PI) phi2)) 1)))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2))))))
#s(approx (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (* (cos lambda1) (sin (- (* 1/2 (PI)) (* -1 phi2))))))
#s(approx (sin (+ phi2 (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (* -1 phi2)))))
#s(approx (+ phi2 (/ (PI) 2)) #s(hole binary64 (* -1 (* phi2 (- (* -1/2 (/ (PI) phi2)) 1)))))
#s(approx (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (sin (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (sin (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (* (sin (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2))))))
#s(approx (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2))))))

Calls

12 calls:

Time	Variable		Point	Expression
626.0ms	lambda1	@	0	((+ 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1) (+ 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)))) (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 1 (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (cos phi1) phi1 (+ 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (cos phi2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+ (cos phi1) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (cos (neg lambda2)) (neg lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))) (* (cos (* 1/2 (PI))) (sin phi2)) (cos (* 1/2 (PI))) (* 1/2 (PI)) 1/2 (PI) (sin phi2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))) (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) (* (cos (* 1/2 (PI))) (sin phi1)) (sin phi1) (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (sin (neg lambda2)) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ (cos phi1) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) (* lambda1 (cos (neg lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (* lambda2 (- (/ lambda1 lambda2) 1)) (- (/ lambda1 lambda2) 1) (/ lambda1 lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (sin (+ phi2 (* 1/2 (PI)))) (+ phi2 (* 1/2 (PI))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (* -1/2 (pow phi1 2)) -1/2 (pow phi1 2) 2 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ (cos phi1) (cos (- lambda1 lambda2))) (+ 1 (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (* phi1 phi1) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ (cos phi1) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (* -1 (* lambda1 (sin (neg lambda2)))) -1 (* lambda1 (sin (neg lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ (cos phi1) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))) (cos lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (+ 1 (* -1/2 (* phi2 phi2))) (* -1/2 (* phi2 phi2)) (* phi2 phi2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (sin (+ phi2 (/ (PI) 2))) (+ phi2 (/ (PI) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (* (* phi2 phi2) -1/2) (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ (cos phi1) (cos phi2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (+ (- lambda1 lambda2) (/ (PI) 2)) (/ (PI) 2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (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 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi2) (+ (* (* phi2 phi2) -1/2) 1) (* (* phi2 phi2) (- (pow phi2 -2) 1/2)) (- (pow phi2 -2) 1/2) (pow phi2 -2) -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)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (+ (* (* phi2 phi2) -1/2) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ 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))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ 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))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ 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)))) (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2)) (- (* 1/24 (* phi2 phi2)) 1/2) (* 1/24 (* phi2 phi2)) 1/24 (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (cos phi1) (+ 1 (* -1/2 (pow phi1 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))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ (cos lambda2) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (cos lambda2) (neg (sin lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ (cos phi1) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))) (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))) (* -1/2 (* lambda1 (cos (neg lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ (cos phi1) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))) (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2))))) (* 1/6 (* lambda1 (sin (neg lambda2)))) 1/6 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) (+ (cos lambda2) (* lambda1 (sin lambda2))) (* lambda1 (sin lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) (sin (+ lambda2 (/ (PI) 2))) (+ lambda2 (/ (PI) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)) (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1) (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) (+ (* -1/2 lambda1) (* 1/6 lambda2)) (* 1/6 lambda2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (- (* lambda1 (cos lambda2)) (sin lambda2)) (* lambda1 (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))) (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) (/ (sin lambda2) (pow lambda1 2)) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)) (/ (cos lambda2) lambda1) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) (* (* (cos lambda2) lambda1) -1/2) (* (cos lambda2) lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ 1 (* (cos lambda2) (cos phi2))) (* (cos lambda2) (cos phi2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (* lambda1 (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) (* lambda1 (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) (* -1/2 (* lambda1 (neg (sin lambda2)))) (* lambda1 (neg (sin lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (cos lambda1) (+ 1 (* -1/2 (* lambda1 lambda1))) (* -1/2 (* lambda1 lambda1)) (* lambda1 lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (cos lambda1) (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2)) (- (* 1/24 (* lambda1 lambda1)) 1/2) (* 1/24 (* lambda1 lambda1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (cos lambda1) (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) (+ 1/24 (* -1/720 (* lambda1 lambda1))) (* -1/720 (* lambda1 lambda1)) -1/720 (+ 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))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (* (- (/ lambda1 lambda2) 1) lambda2) (- (/ lambda1 lambda2) 1) (* lambda1 (- (pow lambda2 -1) (pow lambda1 -1))) (- (pow lambda2 -1) (pow lambda1 -1)) (/ 1 lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) (- (pow (/ lambda1 lambda2) 3) 1) (pow (/ lambda1 lambda2) 3) 3 (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) (+ 1 (* (/ lambda1 lambda2) 1)) (* lambda1 (+ (/ 1 lambda1) (/ 1 lambda2))) (+ (/ 1 lambda1) (/ 1 lambda2)) (/ 1 lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ (cos phi1) (cos phi2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+ 1 (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+ 1 (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (+ 1 (* -1 (/ lambda2 lambda1))) (* -1 (/ lambda2 lambda1)) (/ lambda2 lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+ 1 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (- (+ lambda1 (* 1/2 (PI))) lambda2) (+ lambda1 (* 1/2 (PI))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (+ (- lambda1 lambda2) (/ (PI) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (+ (- lambda1 lambda2) (/ (PI) 2)) (- (* 1/2 (PI)) lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (/ (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* 1/2 (cos (* 2 phi1))) (cos (* 2 phi1)) (* 2 phi1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) (pow (cos phi2) 4) 4 (pow (cos (- lambda1 lambda2)) 4) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (pow (cos phi2) 6) 6 (pow (cos (- lambda1 lambda2)) 6) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (* (cos phi2) (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (* (cos phi2) (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (* (cos (- lambda1 lambda2)) (cos phi2)) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (- (+ 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))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)) (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2)))) (* lambda2 (+ lambda1 (* -1/2 lambda2))) (+ lambda1 (* -1/2 lambda2)) (* -1/2 lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) (+ (sin lambda2) (/ (cos lambda2) lambda1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (- (/ 1 (pow lambda1 2)) 1/2) (/ 1 (pow 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 phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (* -1 (/ (cos lambda2) lambda1)) (* -1/2 (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (exp (* (log (cos phi1)) 3)) (* (log (cos phi1)) 3) (log (cos phi1)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (* (cos (- lambda1 lambda2)) (cos phi2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (pow (cos phi1) 3) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2) (- (cos phi1) (* (cos lambda1) (cos phi2))) (* (cos lambda1) (cos phi2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) (log (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (- (pow lambda1 3) (pow lambda2 3)) (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) (pow lambda2 3) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (+ (* lambda2 lambda2) (* lambda1 lambda2)) (* lambda1 lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (- (pow lambda1 3) (pow lambda2 3)) (pow lambda1 3) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+ 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 (* (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)))) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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))))))) (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 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (* -1 (/ (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))))) lambda1) (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))
327.0ms	lambda2	@	0	((+ 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1) (+ 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)))) (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 1 (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (cos phi1) phi1 (+ 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (cos phi2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+ (cos phi1) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (cos (neg lambda2)) (neg lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))) (* (cos (* 1/2 (PI))) (sin phi2)) (cos (* 1/2 (PI))) (* 1/2 (PI)) 1/2 (PI) (sin phi2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))) (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) (* (cos (* 1/2 (PI))) (sin phi1)) (sin phi1) (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (sin (neg lambda2)) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ (cos phi1) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) (* lambda1 (cos (neg lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (* lambda2 (- (/ lambda1 lambda2) 1)) (- (/ lambda1 lambda2) 1) (/ lambda1 lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (sin (+ phi2 (* 1/2 (PI)))) (+ phi2 (* 1/2 (PI))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (* -1/2 (pow phi1 2)) -1/2 (pow phi1 2) 2 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ (cos phi1) (cos (- lambda1 lambda2))) (+ 1 (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (* phi1 phi1) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ (cos phi1) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (* -1 (* lambda1 (sin (neg lambda2)))) -1 (* lambda1 (sin (neg lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ (cos phi1) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))) (cos lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (+ 1 (* -1/2 (* phi2 phi2))) (* -1/2 (* phi2 phi2)) (* phi2 phi2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (sin (+ phi2 (/ (PI) 2))) (+ phi2 (/ (PI) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (* (* phi2 phi2) -1/2) (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ (cos phi1) (cos phi2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (+ (- lambda1 lambda2) (/ (PI) 2)) (/ (PI) 2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (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 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi2) (+ (* (* phi2 phi2) -1/2) 1) (* (* phi2 phi2) (- (pow phi2 -2) 1/2)) (- (pow phi2 -2) 1/2) (pow phi2 -2) -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)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (+ (* (* phi2 phi2) -1/2) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ 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))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ 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))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ 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)))) (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2)) (- (* 1/24 (* phi2 phi2)) 1/2) (* 1/24 (* phi2 phi2)) 1/24 (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (cos phi1) (+ 1 (* -1/2 (pow phi1 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))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ (cos lambda2) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (cos lambda2) (neg (sin lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ (cos phi1) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))) (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))) (* -1/2 (* lambda1 (cos (neg lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ (cos phi1) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))) (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2))))) (* 1/6 (* lambda1 (sin (neg lambda2)))) 1/6 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) (+ (cos lambda2) (* lambda1 (sin lambda2))) (* lambda1 (sin lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) (sin (+ lambda2 (/ (PI) 2))) (+ lambda2 (/ (PI) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)) (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1) (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) (+ (* -1/2 lambda1) (* 1/6 lambda2)) (* 1/6 lambda2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (- (* lambda1 (cos lambda2)) (sin lambda2)) (* lambda1 (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))) (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) (/ (sin lambda2) (pow lambda1 2)) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)) (/ (cos lambda2) lambda1) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) (* (* (cos lambda2) lambda1) -1/2) (* (cos lambda2) lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ 1 (* (cos lambda2) (cos phi2))) (* (cos lambda2) (cos phi2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (* lambda1 (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) (* lambda1 (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) (* -1/2 (* lambda1 (neg (sin lambda2)))) (* lambda1 (neg (sin lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (cos lambda1) (+ 1 (* -1/2 (* lambda1 lambda1))) (* -1/2 (* lambda1 lambda1)) (* lambda1 lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (cos lambda1) (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2)) (- (* 1/24 (* lambda1 lambda1)) 1/2) (* 1/24 (* lambda1 lambda1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (cos lambda1) (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) (+ 1/24 (* -1/720 (* lambda1 lambda1))) (* -1/720 (* lambda1 lambda1)) -1/720 (+ 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))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (* (- (/ lambda1 lambda2) 1) lambda2) (- (/ lambda1 lambda2) 1) (* lambda1 (- (pow lambda2 -1) (pow lambda1 -1))) (- (pow lambda2 -1) (pow lambda1 -1)) (/ 1 lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) (- (pow (/ lambda1 lambda2) 3) 1) (pow (/ lambda1 lambda2) 3) 3 (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) (+ 1 (* (/ lambda1 lambda2) 1)) (* lambda1 (+ (/ 1 lambda1) (/ 1 lambda2))) (+ (/ 1 lambda1) (/ 1 lambda2)) (/ 1 lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ (cos phi1) (cos phi2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+ 1 (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+ 1 (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (+ 1 (* -1 (/ lambda2 lambda1))) (* -1 (/ lambda2 lambda1)) (/ lambda2 lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+ 1 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (- (+ lambda1 (* 1/2 (PI))) lambda2) (+ lambda1 (* 1/2 (PI))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (+ (- lambda1 lambda2) (/ (PI) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (+ (- lambda1 lambda2) (/ (PI) 2)) (- (* 1/2 (PI)) lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (/ (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* 1/2 (cos (* 2 phi1))) (cos (* 2 phi1)) (* 2 phi1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) (pow (cos phi2) 4) 4 (pow (cos (- lambda1 lambda2)) 4) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (pow (cos phi2) 6) 6 (pow (cos (- lambda1 lambda2)) 6) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (* (cos phi2) (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (* (cos phi2) (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (* (cos (- lambda1 lambda2)) (cos phi2)) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (- (+ 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))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)) (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2)))) (* lambda2 (+ lambda1 (* -1/2 lambda2))) (+ lambda1 (* -1/2 lambda2)) (* -1/2 lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) (+ (sin lambda2) (/ (cos lambda2) lambda1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (- (/ 1 (pow lambda1 2)) 1/2) (/ 1 (pow 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 phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (* -1 (/ (cos lambda2) lambda1)) (* -1/2 (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (exp (* (log (cos phi1)) 3)) (* (log (cos phi1)) 3) (log (cos phi1)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (* (cos (- lambda1 lambda2)) (cos phi2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (pow (cos phi1) 3) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2) (- (cos phi1) (* (cos lambda1) (cos phi2))) (* (cos lambda1) (cos phi2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) (log (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (- (pow lambda1 3) (pow lambda2 3)) (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) (pow lambda2 3) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (+ (* lambda2 lambda2) (* lambda1 lambda2)) (* lambda1 lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (- (pow lambda1 3) (pow lambda2 3)) (pow lambda1 3) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+ 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 (* (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)))) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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))))))) (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 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (* -1 (/ (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))))) lambda1) (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))
267.0ms	phi2	@	0	((+ 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1) (+ 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)))) (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 1 (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (cos phi1) phi1 (+ 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (cos phi2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+ (cos phi1) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (cos (neg lambda2)) (neg lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))) (* (cos (* 1/2 (PI))) (sin phi2)) (cos (* 1/2 (PI))) (* 1/2 (PI)) 1/2 (PI) (sin phi2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))) (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) (* (cos (* 1/2 (PI))) (sin phi1)) (sin phi1) (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (sin (neg lambda2)) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ (cos phi1) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) (* lambda1 (cos (neg lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (* lambda2 (- (/ lambda1 lambda2) 1)) (- (/ lambda1 lambda2) 1) (/ lambda1 lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (sin (+ phi2 (* 1/2 (PI)))) (+ phi2 (* 1/2 (PI))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (* -1/2 (pow phi1 2)) -1/2 (pow phi1 2) 2 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ (cos phi1) (cos (- lambda1 lambda2))) (+ 1 (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (* phi1 phi1) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ (cos phi1) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (* -1 (* lambda1 (sin (neg lambda2)))) -1 (* lambda1 (sin (neg lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ (cos phi1) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))) (cos lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (+ 1 (* -1/2 (* phi2 phi2))) (* -1/2 (* phi2 phi2)) (* phi2 phi2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (sin (+ phi2 (/ (PI) 2))) (+ phi2 (/ (PI) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (* (* phi2 phi2) -1/2) (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ (cos phi1) (cos phi2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (+ (- lambda1 lambda2) (/ (PI) 2)) (/ (PI) 2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (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 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi2) (+ (* (* phi2 phi2) -1/2) 1) (* (* phi2 phi2) (- (pow phi2 -2) 1/2)) (- (pow phi2 -2) 1/2) (pow phi2 -2) -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)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (+ (* (* phi2 phi2) -1/2) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ 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))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ 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))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ 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)))) (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2)) (- (* 1/24 (* phi2 phi2)) 1/2) (* 1/24 (* phi2 phi2)) 1/24 (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (cos phi1) (+ 1 (* -1/2 (pow phi1 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))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ (cos lambda2) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (cos lambda2) (neg (sin lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ (cos phi1) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))) (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))) (* -1/2 (* lambda1 (cos (neg lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ (cos phi1) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))) (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2))))) (* 1/6 (* lambda1 (sin (neg lambda2)))) 1/6 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) (+ (cos lambda2) (* lambda1 (sin lambda2))) (* lambda1 (sin lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) (sin (+ lambda2 (/ (PI) 2))) (+ lambda2 (/ (PI) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)) (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1) (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) (+ (* -1/2 lambda1) (* 1/6 lambda2)) (* 1/6 lambda2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (- (* lambda1 (cos lambda2)) (sin lambda2)) (* lambda1 (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))) (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) (/ (sin lambda2) (pow lambda1 2)) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)) (/ (cos lambda2) lambda1) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) (* (* (cos lambda2) lambda1) -1/2) (* (cos lambda2) lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ 1 (* (cos lambda2) (cos phi2))) (* (cos lambda2) (cos phi2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (* lambda1 (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) (* lambda1 (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) (* -1/2 (* lambda1 (neg (sin lambda2)))) (* lambda1 (neg (sin lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (cos lambda1) (+ 1 (* -1/2 (* lambda1 lambda1))) (* -1/2 (* lambda1 lambda1)) (* lambda1 lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (cos lambda1) (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2)) (- (* 1/24 (* lambda1 lambda1)) 1/2) (* 1/24 (* lambda1 lambda1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (cos lambda1) (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) (+ 1/24 (* -1/720 (* lambda1 lambda1))) (* -1/720 (* lambda1 lambda1)) -1/720 (+ 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))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (* (- (/ lambda1 lambda2) 1) lambda2) (- (/ lambda1 lambda2) 1) (* lambda1 (- (pow lambda2 -1) (pow lambda1 -1))) (- (pow lambda2 -1) (pow lambda1 -1)) (/ 1 lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) (- (pow (/ lambda1 lambda2) 3) 1) (pow (/ lambda1 lambda2) 3) 3 (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) (+ 1 (* (/ lambda1 lambda2) 1)) (* lambda1 (+ (/ 1 lambda1) (/ 1 lambda2))) (+ (/ 1 lambda1) (/ 1 lambda2)) (/ 1 lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ (cos phi1) (cos phi2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+ 1 (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+ 1 (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (+ 1 (* -1 (/ lambda2 lambda1))) (* -1 (/ lambda2 lambda1)) (/ lambda2 lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+ 1 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (- (+ lambda1 (* 1/2 (PI))) lambda2) (+ lambda1 (* 1/2 (PI))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (+ (- lambda1 lambda2) (/ (PI) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (+ (- lambda1 lambda2) (/ (PI) 2)) (- (* 1/2 (PI)) lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (/ (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* 1/2 (cos (* 2 phi1))) (cos (* 2 phi1)) (* 2 phi1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) (pow (cos phi2) 4) 4 (pow (cos (- lambda1 lambda2)) 4) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (pow (cos phi2) 6) 6 (pow (cos (- lambda1 lambda2)) 6) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (* (cos phi2) (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (* (cos phi2) (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (* (cos (- lambda1 lambda2)) (cos phi2)) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (- (+ 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))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)) (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2)))) (* lambda2 (+ lambda1 (* -1/2 lambda2))) (+ lambda1 (* -1/2 lambda2)) (* -1/2 lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) (+ (sin lambda2) (/ (cos lambda2) lambda1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (- (/ 1 (pow lambda1 2)) 1/2) (/ 1 (pow 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 phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (* -1 (/ (cos lambda2) lambda1)) (* -1/2 (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (exp (* (log (cos phi1)) 3)) (* (log (cos phi1)) 3) (log (cos phi1)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (* (cos (- lambda1 lambda2)) (cos phi2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (pow (cos phi1) 3) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2) (- (cos phi1) (* (cos lambda1) (cos phi2))) (* (cos lambda1) (cos phi2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) (log (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (- (pow lambda1 3) (pow lambda2 3)) (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) (pow lambda2 3) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (+ (* lambda2 lambda2) (* lambda1 lambda2)) (* lambda1 lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (- (pow lambda1 3) (pow lambda2 3)) (pow lambda1 3) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+ 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 (* (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)))) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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))))))) (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 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (* -1 (/ (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))))) lambda1) (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))
102.0ms	lambda1	@	-inf	((+ 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1) (+ 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)))) (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 1 (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (cos phi1) phi1 (+ 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (cos phi2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+ (cos phi1) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (cos (neg lambda2)) (neg lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))) (* (cos (* 1/2 (PI))) (sin phi2)) (cos (* 1/2 (PI))) (* 1/2 (PI)) 1/2 (PI) (sin phi2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))) (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) (* (cos (* 1/2 (PI))) (sin phi1)) (sin phi1) (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (sin (neg lambda2)) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ (cos phi1) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) (* lambda1 (cos (neg lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (* lambda2 (- (/ lambda1 lambda2) 1)) (- (/ lambda1 lambda2) 1) (/ lambda1 lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (sin (+ phi2 (* 1/2 (PI)))) (+ phi2 (* 1/2 (PI))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (* -1/2 (pow phi1 2)) -1/2 (pow phi1 2) 2 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ (cos phi1) (cos (- lambda1 lambda2))) (+ 1 (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (* phi1 phi1) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ (cos phi1) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (* -1 (* lambda1 (sin (neg lambda2)))) -1 (* lambda1 (sin (neg lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ (cos phi1) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))) (cos lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (+ 1 (* -1/2 (* phi2 phi2))) (* -1/2 (* phi2 phi2)) (* phi2 phi2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (sin (+ phi2 (/ (PI) 2))) (+ phi2 (/ (PI) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (* (* phi2 phi2) -1/2) (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ (cos phi1) (cos phi2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (+ (- lambda1 lambda2) (/ (PI) 2)) (/ (PI) 2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (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 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi2) (+ (* (* phi2 phi2) -1/2) 1) (* (* phi2 phi2) (- (pow phi2 -2) 1/2)) (- (pow phi2 -2) 1/2) (pow phi2 -2) -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)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (+ (* (* phi2 phi2) -1/2) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ 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))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ 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))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ 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)))) (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2)) (- (* 1/24 (* phi2 phi2)) 1/2) (* 1/24 (* phi2 phi2)) 1/24 (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (cos phi1) (+ 1 (* -1/2 (pow phi1 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))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ (cos lambda2) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (cos lambda2) (neg (sin lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ (cos phi1) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))) (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))) (* -1/2 (* lambda1 (cos (neg lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ (cos phi1) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))) (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2))))) (* 1/6 (* lambda1 (sin (neg lambda2)))) 1/6 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) (+ (cos lambda2) (* lambda1 (sin lambda2))) (* lambda1 (sin lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) (sin (+ lambda2 (/ (PI) 2))) (+ lambda2 (/ (PI) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)) (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1) (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) (+ (* -1/2 lambda1) (* 1/6 lambda2)) (* 1/6 lambda2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (- (* lambda1 (cos lambda2)) (sin lambda2)) (* lambda1 (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))) (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) (/ (sin lambda2) (pow lambda1 2)) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)) (/ (cos lambda2) lambda1) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) (* (* (cos lambda2) lambda1) -1/2) (* (cos lambda2) lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ 1 (* (cos lambda2) (cos phi2))) (* (cos lambda2) (cos phi2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (* lambda1 (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) (* lambda1 (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) (* -1/2 (* lambda1 (neg (sin lambda2)))) (* lambda1 (neg (sin lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (cos lambda1) (+ 1 (* -1/2 (* lambda1 lambda1))) (* -1/2 (* lambda1 lambda1)) (* lambda1 lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (cos lambda1) (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2)) (- (* 1/24 (* lambda1 lambda1)) 1/2) (* 1/24 (* lambda1 lambda1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (cos lambda1) (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) (+ 1/24 (* -1/720 (* lambda1 lambda1))) (* -1/720 (* lambda1 lambda1)) -1/720 (+ 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))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (* (- (/ lambda1 lambda2) 1) lambda2) (- (/ lambda1 lambda2) 1) (* lambda1 (- (pow lambda2 -1) (pow lambda1 -1))) (- (pow lambda2 -1) (pow lambda1 -1)) (/ 1 lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) (- (pow (/ lambda1 lambda2) 3) 1) (pow (/ lambda1 lambda2) 3) 3 (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) (+ 1 (* (/ lambda1 lambda2) 1)) (* lambda1 (+ (/ 1 lambda1) (/ 1 lambda2))) (+ (/ 1 lambda1) (/ 1 lambda2)) (/ 1 lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ (cos phi1) (cos phi2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+ 1 (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+ 1 (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (+ 1 (* -1 (/ lambda2 lambda1))) (* -1 (/ lambda2 lambda1)) (/ lambda2 lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+ 1 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (- (+ lambda1 (* 1/2 (PI))) lambda2) (+ lambda1 (* 1/2 (PI))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (+ (- lambda1 lambda2) (/ (PI) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (+ (- lambda1 lambda2) (/ (PI) 2)) (- (* 1/2 (PI)) lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (/ (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* 1/2 (cos (* 2 phi1))) (cos (* 2 phi1)) (* 2 phi1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) (pow (cos phi2) 4) 4 (pow (cos (- lambda1 lambda2)) 4) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (pow (cos phi2) 6) 6 (pow (cos (- lambda1 lambda2)) 6) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (* (cos phi2) (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (* (cos phi2) (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (* (cos (- lambda1 lambda2)) (cos phi2)) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (- (+ 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))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)) (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2)))) (* lambda2 (+ lambda1 (* -1/2 lambda2))) (+ lambda1 (* -1/2 lambda2)) (* -1/2 lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) (+ (sin lambda2) (/ (cos lambda2) lambda1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (- (/ 1 (pow lambda1 2)) 1/2) (/ 1 (pow 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 phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (* -1 (/ (cos lambda2) lambda1)) (* -1/2 (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (exp (* (log (cos phi1)) 3)) (* (log (cos phi1)) 3) (log (cos phi1)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (* (cos (- lambda1 lambda2)) (cos phi2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (pow (cos phi1) 3) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2) (- (cos phi1) (* (cos lambda1) (cos phi2))) (* (cos lambda1) (cos phi2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) (log (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (- (pow lambda1 3) (pow lambda2 3)) (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) (pow lambda2 3) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (+ (* lambda2 lambda2) (* lambda1 lambda2)) (* lambda1 lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (- (pow lambda1 3) (pow lambda2 3)) (pow lambda1 3) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+ 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 (* (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)))) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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))))))) (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 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (* -1 (/ (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))))) lambda1) (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))
100.0ms	lambda2	@	-inf	((+ 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1) (+ 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)))) (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 1 (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (cos phi1) phi1 (+ 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (cos phi2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- 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))) lambda1) 1) lambda1) (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+ (cos phi1) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (cos (neg lambda2)) (neg lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))) (* (cos (* 1/2 (PI))) (sin phi2)) (cos (* 1/2 (PI))) (* 1/2 (PI)) 1/2 (PI) (sin phi2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))) (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) (* (cos (* 1/2 (PI))) (sin phi1)) (sin phi1) (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (sin (neg lambda2)) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ (cos phi1) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) (* lambda1 (cos (neg lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (* lambda2 (- (/ lambda1 lambda2) 1)) (- (/ lambda1 lambda2) 1) (/ lambda1 lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (sin (+ phi2 (* 1/2 (PI)))) (+ phi2 (* 1/2 (PI))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (* -1/2 (pow phi1 2)) -1/2 (pow phi1 2) 2 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ (cos phi1) (cos (- lambda1 lambda2))) (+ 1 (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (* phi1 phi1) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ (cos phi1) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (* -1 (* lambda1 (sin (neg lambda2)))) -1 (* lambda1 (sin (neg lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ (cos phi1) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))) (cos lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (+ 1 (* -1/2 (* phi2 phi2))) (* -1/2 (* phi2 phi2)) (* phi2 phi2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (sin (+ phi2 (/ (PI) 2))) (+ phi2 (/ (PI) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (* (* phi2 phi2) -1/2) (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ (cos phi1) (cos phi2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (+ (- lambda1 lambda2) (/ (PI) 2)) (/ (PI) 2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (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 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi2) (+ (* (* phi2 phi2) -1/2) 1) (* (* phi2 phi2) (- (pow phi2 -2) 1/2)) (- (pow phi2 -2) 1/2) (pow phi2 -2) -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)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (+ (* (* phi2 phi2) -1/2) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ 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))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ 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))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ 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)))) (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2)) (- (* 1/24 (* phi2 phi2)) 1/2) (* 1/24 (* phi2 phi2)) 1/24 (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (cos phi1) (+ 1 (* -1/2 (pow phi1 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))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ (cos lambda2) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (cos lambda2) (neg (sin lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ (cos phi1) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))) (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))) (* -1/2 (* lambda1 (cos (neg lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+ (cos phi1) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))) (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2))))) (* 1/6 (* lambda1 (sin (neg lambda2)))) 1/6 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) (+ (cos lambda2) (* lambda1 (sin lambda2))) (* lambda1 (sin lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) (sin (+ lambda2 (/ (PI) 2))) (+ lambda2 (/ (PI) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)) (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1) (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) (+ (* -1/2 lambda1) (* 1/6 lambda2)) (* 1/6 lambda2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (- (* lambda1 (cos lambda2)) (sin lambda2)) (* lambda1 (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))) (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) (/ (sin lambda2) (pow lambda1 2)) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)) (/ (cos lambda2) lambda1) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) (* (* (cos lambda2) lambda1) -1/2) (* (cos lambda2) lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ 1 (* (cos lambda2) (cos phi2))) (* (cos lambda2) (cos phi2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (* lambda1 (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) (* lambda1 (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) (* -1/2 (* lambda1 (neg (sin lambda2)))) (* lambda1 (neg (sin lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (cos lambda1) (+ 1 (* -1/2 (* lambda1 lambda1))) (* -1/2 (* lambda1 lambda1)) (* lambda1 lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (cos lambda1) (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2)) (- (* 1/24 (* lambda1 lambda1)) 1/2) (* 1/24 (* lambda1 lambda1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (cos lambda1) (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) (+ 1/24 (* -1/720 (* lambda1 lambda1))) (* -1/720 (* lambda1 lambda1)) -1/720 (+ 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))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (* (- (/ lambda1 lambda2) 1) lambda2) (- (/ lambda1 lambda2) 1) (* lambda1 (- (pow lambda2 -1) (pow lambda1 -1))) (- (pow lambda2 -1) (pow lambda1 -1)) (/ 1 lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) (- (pow (/ lambda1 lambda2) 3) 1) (pow (/ lambda1 lambda2) 3) 3 (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) (+ 1 (* (/ lambda1 lambda2) 1)) (* lambda1 (+ (/ 1 lambda1) (/ 1 lambda2))) (+ (/ 1 lambda1) (/ 1 lambda2)) (/ 1 lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ (cos phi1) (cos phi2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+ 1 (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+ 1 (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (+ 1 (* -1 (/ lambda2 lambda1))) (* -1 (/ lambda2 lambda1)) (/ lambda2 lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+ 1 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (- (+ lambda1 (* 1/2 (PI))) lambda2) (+ lambda1 (* 1/2 (PI))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (+ (- lambda1 lambda2) (/ (PI) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (+ (- lambda1 lambda2) (/ (PI) 2)) (- (* 1/2 (PI)) lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (/ (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* 1/2 (cos (* 2 phi1))) (cos (* 2 phi1)) (* 2 phi1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) (pow (cos phi2) 4) 4 (pow (cos (- lambda1 lambda2)) 4) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (pow (cos phi2) 6) 6 (pow (cos (- lambda1 lambda2)) 6) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (* (cos phi2) (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (* (cos phi2) (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (* (cos (- lambda1 lambda2)) (cos phi2)) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (- (+ 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))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)) (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2)))) (* lambda2 (+ lambda1 (* -1/2 lambda2))) (+ lambda1 (* -1/2 lambda2)) (* -1/2 lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) (+ (sin lambda2) (/ (cos lambda2) lambda1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (- (/ 1 (pow lambda1 2)) 1/2) (/ 1 (pow 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 phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (* -1 (/ (cos lambda2) lambda1)) (* -1/2 (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (exp (* (log (cos phi1)) 3)) (* (log (cos phi1)) 3) (log (cos phi1)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (* (cos (- lambda1 lambda2)) (cos phi2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (pow (cos phi1) 3) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2) (- (cos phi1) (* (cos lambda1) (cos phi2))) (* (cos lambda1) (cos phi2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) (log (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (- (pow lambda1 3) (pow lambda2 3)) (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) (pow lambda2 3) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (+ (* lambda2 lambda2) (* lambda1 lambda2)) (* lambda1 lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (- (pow lambda1 3) (pow lambda2 3)) (pow lambda1 3) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+ 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 (* (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)))) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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))))))) (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 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (* -1 (/ (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))))) lambda1) (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))

rewrite2.5s (8%)

Memory

135.6MiB live, 5 802.9MiB allocated; 566ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	14446	470936
0	15712	470936
0	15712	456358

Stop Event

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

Counts

4 291 → 4 329

Calls

Call 1

Inputs
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 #s(approx (+ (/ (atan2 ( (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/.f64 (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) lambda1)) lambda1))
(.f64 #s(approx (+ (/ (atan2 ( (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/.f64 (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) lambda1)) lambda1)
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/.f64 (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) lambda1))
(/.f64 (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
lambda1
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.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
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.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))))
#s(literal 1 binary64)
(*.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)))))) (.f64 (+.f64 (/.f64 (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1))
(.f64 (+.f64 (/.f64 (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1)
(+.f64 (/.f64 (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64))
(/.f64 (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
(fma.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 #s(approx (- lambda1 lambda2) lambda1))
#s(approx (- lambda1 lambda2) lambda1)
(cos.f64 phi1)
phi1
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (+.f64 (/.f64 (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(literal 1 binary64)) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1))
(.f64 (+.f64 (/.f64 (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(literal 1 binary64)) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1)
(+.f64 (/.f64 (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(literal 1 binary64)) (cos.f64 phi1))) lambda1) #s(literal 1 binary64))
(/.f64 (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(literal 1 binary64)) (cos.f64 phi1))) lambda1)
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(literal 1 binary64)) (cos.f64 phi1)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(literal 1 binary64)) (cos.f64 phi1))
#s(approx (cos phi2) #s(literal 1 binary64))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (fma.f64 (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1))
(.f64 (+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (fma.f64 (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1)
(+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (fma.f64 (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64))
(/.f64 (atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (fma.f64 (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (fma.f64 (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2))
(sin.f64 #s(approx (- lambda1 lambda2) lambda1))
(fma.f64 (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))) lambda1) #s(literal 1 binary64)) lambda1))
(.f64 (+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))) lambda1) #s(literal 1 binary64)) lambda1)
(+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ ( (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))) lambda1) #s(literal 1 binary64))
(/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ ( (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))) lambda1)
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ ( (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 #s(approx (- lambda1 lambda2) lambda1))))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))
(+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 #s(approx (- lambda1 lambda2) lambda1))))
(*.f64 (cos.f64 phi2) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) lambda1) #s(literal 1 binary64)) lambda1))
(.f64 (+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) lambda1) #s(literal 1 binary64)) lambda1)
(+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ ( (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) lambda1) #s(literal 1 binary64))
(/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ ( (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) lambda1)
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ ( (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))
(+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))
(cos.f64 (neg.f64 lambda2))
(neg.f64 lambda2)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
(+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
(.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))
(+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
#s(literal 1/2 binary64)
(PI.f64)
(sin.f64 phi2)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
(+.f64 (cos.f64 phi1) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))
(sin.f64 phi1)
#s(approx (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 (sin.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2)))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2)))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2)))
(sin.f64 (neg.f64 lambda2))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (.f64 lambda1 (cos.f64 (neg.f64 lambda2)))))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (.f64 lambda1 (cos.f64 (neg.f64 lambda2)))))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))))
#s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))))
(+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))
(*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 #s(approx (- lambda1 lambda2) lambda1)))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)))))
(+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1))))
(.f64 (cos.f64 phi2) (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (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)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
(.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))
(*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))
#s(literal -1/2 binary64)
(pow.f64 phi1 #s(literal 2 binary64))
#s(literal 2 binary64)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) #s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) #s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) #s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))
(+.f64 #s(literal 1 binary64) #s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))
(*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 #s(approx (- lambda1 lambda2) lambda1))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 phi1 phi1)
(*.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))
(+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))
(+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))
(.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2))))
#s(literal -1 binary64)
(*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) lambda1))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) lambda1))))
(+.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))
(+.f64 (cos.f64 phi1) #s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
(.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(cos.f64 lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #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 (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #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 (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(+.f64 (cos.f64 phi1) (.f64 #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 (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))
(.f64 #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 (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))
#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))))
(+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2)))
(.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2))
(*.f64 phi2 phi2)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (sin.f64 #s(approx (+ phi2 (/ (PI) 2)) phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (sin.f64 #s(approx (+ phi2 (/ (PI) 2)) phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (cos.f64 phi1) (*.f64 (sin.f64 #s(approx (+ phi2 (/ (PI) 2)) phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (sin.f64 #s(approx (+ phi2 (/ (PI) 2)) phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(sin.f64 #s(approx (+ phi2 (/ (PI) 2)) phi2))
#s(approx (+ phi2 (/ (PI) 2)) phi2)
(+.f64 lambda1 (atan2.f64 #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)))) (+.f64 (cos.f64 phi1) (.f64 #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 (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))))
(atan2.f64 #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)))) (+.f64 (cos.f64 phi1) (.f64 #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 (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 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))))
(fma.f64 (.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
(.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64))
(+.f64 lambda1 (atan2.f64 #s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (+.f64 (cos.f64 phi1) #s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 #s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (+.f64 (cos.f64 phi1) #s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
(.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (cos.f64 phi1) #s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (cos lambda2) lambda1) (neg (sin lambda2))) lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (cos lambda2) lambda1) (neg (sin lambda2))) lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 #s(approx (cos phi2) #s(literal 1 binary64)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (cos lambda2) lambda1) (neg (sin lambda2))) lambda1)))
#s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) lambda1))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(atan2.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(*.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))
(+.f64 (cos.f64 phi1) (cos.f64 phi2))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2) #s(literal 1 binary64)))))
(atan2.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2) #s(literal 1 binary64))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2) #s(literal 1 binary64)))
(fma.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2) #s(literal 1 binary64))
(sin.f64 (+.f64 (-.f64 lambda1 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (-.f64 lambda1 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) ( (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) ( (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))
(-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
(atan2.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(+.f64 (cos.f64 phi1) #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 (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)))
(cos.f64 lambda2)
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(sin.f64 lambda1)
(sin.f64 lambda2)
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) #s(approx (+ ( (* phi2 phi2) -1/2) 1) (.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 #s(approx (cos phi2) #s(approx (+ ( (* phi2 phi2) -1/2) 1) (.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))
#s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64)))))
#s(approx (+ (* (* phi2 phi2) -1/2) 1) (.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64))))
(.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64)))
(-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64))
(pow.f64 phi2 #s(literal -2 binary64))
#s(literal -2 binary64)
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) #s(approx (+ ( (* phi2 phi2) -1/2) 1) (.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64))))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 #s(approx (cos phi2) #s(approx (+ ( (* phi2 phi2) -1/2) 1) (.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64))))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 #s(approx (cos phi2) #s(approx (+ ( (* phi2 phi2) -1/2) 1) (.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64))))) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))
(fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))))
(atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))
(+.f64 lambda1 (atan2.f64 (.f64 #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)))) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 #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)))) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 #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)))) (sin.f64 #s(approx (- lambda1 lambda2) lambda1)))
(+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 lambda1 (atan2.f64 (.f64 #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)))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))))
(atan2.f64 (.f64 #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)))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(.f64 #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)))) (sin.f64 (-.f64 lambda1 lambda2)))
(+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))
(.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))
(+.f64 lambda1 (atan2.f64 (.f64 #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))))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(approx ( (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 #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))))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(approx ( (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 #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))))) (sin.f64 (-.f64 lambda1 lambda2)))
#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)))))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64))))
(.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)))
(-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64))
(.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2))
#s(literal 1/24 binary64)
(+.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(approx ( (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (cos lambda2) lambda1) (neg (sin lambda2))) lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (cos lambda2) lambda1) (neg (sin lambda2))) lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (cos lambda2) lambda1) (neg (sin lambda2))) lambda1)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (cos lambda2) lambda1) (neg (sin lambda2))) lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 #s(approx (- lambda1 lambda2) lambda1))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (cos lambda2) lambda1) (neg (sin lambda2))) lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 #s(approx (- lambda1 lambda2) lambda1))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2)))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda2) (cos.f64 phi1))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2)))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda2) (cos.f64 phi1)))))
(*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda2) (cos.f64 phi1))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(+.f64 (cos.f64 lambda2) (cos.f64 phi1))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2)))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2)))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 #s(approx (cos lambda2) #s(literal 1 binary64)) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 #s(approx (cos lambda2) #s(literal 1 binary64)) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 #s(approx (cos lambda2) #s(literal 1 binary64)) lambda1 (neg.f64 (sin.f64 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 #s(approx (cos lambda2) #s(literal 1 binary64)) lambda1 (neg.f64 (sin.f64 lambda2))))
(fma.f64 #s(approx (cos lambda2) #s(literal 1 binary64)) lambda1 (neg.f64 (sin.f64 lambda2)))
#s(approx (cos lambda2) #s(literal 1 binary64))
(neg.f64 (sin.f64 lambda2))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2))))))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2)))))))))
(*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2))))))))
(+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2))))))
(+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2)))))
(.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2))))
(-.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2)))
(.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 (neg.f64 lambda2))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 lambda1 (-.f64 (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 (neg.f64 lambda2))))))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 lambda1 (-.f64 (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 (neg.f64 lambda2)))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 lambda1 (-.f64 (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 (neg.f64 lambda2))))))))
(+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 lambda1 (-.f64 (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 (neg.f64 lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 lambda1 (-.f64 (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 (neg.f64 lambda2))))))
(+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 lambda1 (-.f64 (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 (neg.f64 lambda2)))))
(.f64 lambda1 (-.f64 (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 (neg.f64 lambda2))))
(-.f64 (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 (neg.f64 lambda2)))
(.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))
(.f64 #s(literal 1/6 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2))))
#s(literal 1/6 binary64)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(+.f64 (cos.f64 phi1) #s(approx (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
#s(approx (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) #s(approx ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) #s(approx ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))))
(+.f64 (cos.f64 phi1) #s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
(+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))
(*.f64 lambda1 (sin.f64 lambda2))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (sin.f64 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (sin.f64 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (sin.f64 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) lambda1 (neg.f64 (sin.f64 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (sin.f64 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) lambda1 (neg.f64 (sin.f64 lambda2))))
(fma.f64 (sin.f64 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) lambda1 (neg.f64 (sin.f64 lambda2)))
(sin.f64 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (+.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 #s(literal 1/6 binary64) lambda2))) #s(literal 1 binary64))))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (+.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 #s(literal 1/6 binary64) lambda2))) #s(literal 1 binary64))))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))
(.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (+.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) lambda1 (*.f64 #s(literal 1/6 binary64) lambda2))) #s(literal 1 binary64)))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (+.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) lambda1 (*.f64 #s(literal 1/6 binary64) lambda2))) #s(literal 1 binary64))))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (+.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) lambda1 (*.f64 #s(literal 1/6 binary64) lambda2))) #s(literal 1 binary64)))))
(+.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) lambda1 (*.f64 #s(literal 1/6 binary64) lambda2))) #s(literal 1 binary64))))
(.f64 lambda2 (-.f64 (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) lambda1 (*.f64 #s(literal 1/6 binary64) lambda2))) #s(literal 1 binary64)))
(-.f64 (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 #s(literal 1/6 binary64) lambda2))) #s(literal 1 binary64))
(.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 #s(literal 1/6 binary64) lambda2)))
(fma.f64 #s(literal -1/2 binary64) lambda1 (*.f64 #s(literal 1/6 binary64) lambda2))
(*.f64 #s(literal 1/6 binary64) lambda2)
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (-.f64 (.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (-.f64 (.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))
(.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2)))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2)))
(-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2))
(*.f64 lambda1 (cos.f64 lambda2))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 lambda2) (pow.f64 lambda1 #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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)))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 lambda2) (pow.f64 lambda1 #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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))))))
(.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 lambda2) (pow.f64 lambda1 #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 lambda2) (pow.f64 lambda1 #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1))))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 lambda2) (pow.f64 lambda1 #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)))))
(*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 lambda2) (pow.f64 lambda1 #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1))))
(pow.f64 lambda1 #s(literal 2 binary64))
(fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 lambda2) (pow.f64 lambda1 #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)))
(/.f64 (sin.f64 lambda2) (pow.f64 lambda1 #s(literal 2 binary64)))
(fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1))
(/.f64 (cos.f64 lambda2) lambda1)
(+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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)))))
(.f64 (cos.f64 phi2) #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 (.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64)) (neg.f64 (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)))
(fma.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64)) (neg.f64 (sin.f64 lambda2))) lambda1 (cos.f64 lambda2))
(-.f64 (.f64 (.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64)) (neg.f64 (sin.f64 lambda2)))
(.f64 (.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64))
(*.f64 (cos.f64 lambda2) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))))
(.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (neg.f64 (sin.f64 lambda2))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (neg.f64 (sin.f64 lambda2)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))
(+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))
(*.f64 (cos.f64 lambda2) (cos.f64 phi2))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))) (cos.f64 phi2) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))) (cos.f64 phi2) #s(literal 1 binary64))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))) (cos.f64 phi2) #s(literal 1 binary64)))
(fma.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))) (cos.f64 phi2) #s(literal 1 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) #s(approx (* lambda1 (cos 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)))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) #s(approx (* lambda1 (cos 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))))
(.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) #s(approx (* lambda1 (cos lambda2)) lambda1))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) #s(approx (* lambda1 (cos lambda2)) lambda1)))
(+.f64 (neg.f64 (sin.f64 lambda2)) #s(approx (* lambda1 (cos lambda2)) lambda1))
#s(approx (* lambda1 (cos lambda2)) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 #s(approx (+ (cos lambda2) ( -1/2 (* lambda1 (neg (sin lambda2))))) (.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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)))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 #s(approx (+ (cos lambda2) ( -1/2 (* lambda1 (neg (sin lambda2))))) (.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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))))))
(.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 #s(approx (+ (cos lambda2) ( -1/2 (* lambda1 (neg (sin lambda2))))) (*.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1))))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 #s(approx (+ (cos lambda2) ( -1/2 (* lambda1 (neg (sin lambda2))))) (*.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)))))))
(+.f64 (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 #s(approx (+ (cos lambda2) ( -1/2 (* lambda1 (neg (sin lambda2))))) (*.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1))))))
(.f64 lambda1 #s(approx (+ (cos lambda2) ( -1/2 (* lambda1 (neg (sin lambda2))))) (*.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)))))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) (*.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1))))
(*.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 (cos.f64 lambda2))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 (cos.f64 lambda2))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2) #s(literal 1 binary64))))
(.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (*.f64 lambda1 (cos.f64 lambda2)))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (*.f64 lambda1 (cos.f64 lambda2))))
(+.f64 (neg.f64 (sin.f64 lambda2)) (*.f64 lambda1 (cos.f64 lambda2)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2) #s(literal 1 binary64)))
(fma.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2) #s(literal 1 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 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))))))))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 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))))))))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 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))))))))
(+.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)))))))
(.f64 lambda1 (+.f64 (cos.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (neg.f64 (sin.f64 lambda2))))))
(+.f64 (cos.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (neg.f64 (sin.f64 lambda2)))))
(.f64 #s(literal -1/2 binary64) (.f64 lambda1 (neg.f64 (sin.f64 lambda2))))
(*.f64 lambda1 (neg.f64 (sin.f64 lambda2)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 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))))))))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) #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)))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 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))))))))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) #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))))))
(+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) #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)))))
(.f64 #s(approx (cos phi2) #s(literal 1 binary64)) #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))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1)))) (cos.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1)))) (cos.f64 phi2) (cos.f64 phi1))))
(*.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) lambda1)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1)))) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1)))) (cos.f64 phi2) (cos.f64 phi1))
#s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1))))
(+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1)))
(.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1))
(*.f64 lambda1 lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #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))))) (cos.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #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))))) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #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))))) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 #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))))) (cos.f64 phi2) (cos.f64 phi1))
#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)))))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 lambda1 lambda1) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 lambda1 lambda1)) #s(literal 1/2 binary64))))
(.f64 (.f64 lambda1 lambda1) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 lambda1 lambda1)) #s(literal 1/2 binary64)))
(-.f64 (.f64 #s(literal 1/24 binary64) (.f64 lambda1 lambda1)) #s(literal 1/2 binary64))
(.f64 #s(literal 1/24 binary64) (.f64 lambda1 lambda1))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #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))))) (cos.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #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))))) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #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))))) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 #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))))) (cos.f64 phi2) (cos.f64 phi1))
#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)))))
(+.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))))
(.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)))
(-.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))
(.f64 (.f64 lambda1 lambda1) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (.f64 lambda1 lambda1))))
(+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (.f64 lambda1 lambda1)))
(.f64 #s(literal -1/720 binary64) (.f64 lambda1 lambda1))
#s(literal -1/720 binary64)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 #s(approx (- (/ lambda1 lambda2) 1) (.f64 lambda1 #s(approx (- (pow lambda2 -1) (pow lambda1 -1)) (/.f64 #s(literal 1 binary64) lambda2)))) lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 #s(approx (- (/ lambda1 lambda2) 1) (.f64 lambda1 #s(approx (- (pow lambda2 -1) (pow lambda1 -1)) (/.f64 #s(literal 1 binary64) lambda2)))) lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 #s(approx (- (/ lambda1 lambda2) 1) (*.f64 lambda1 #s(approx (- (pow lambda2 -1) (pow lambda1 -1)) (/.f64 #s(literal 1 binary64) lambda2)))) lambda2))))
(sin.f64 #s(approx (- lambda1 lambda2) (.f64 #s(approx (- (/ lambda1 lambda2) 1) (.f64 lambda1 #s(approx (- (pow lambda2 -1) (pow lambda1 -1)) (/.f64 #s(literal 1 binary64) lambda2)))) lambda2)))
#s(approx (- lambda1 lambda2) (.f64 #s(approx (- (/ lambda1 lambda2) 1) (.f64 lambda1 #s(approx (- (pow lambda2 -1) (pow lambda1 -1)) (/.f64 #s(literal 1 binary64) lambda2)))) lambda2))
(.f64 #s(approx (- (/ lambda1 lambda2) 1) (.f64 lambda1 #s(approx (- (pow lambda2 -1) (pow lambda1 -1)) (/.f64 #s(literal 1 binary64) lambda2)))) lambda2)
#s(approx (- (/ lambda1 lambda2) 1) (*.f64 lambda1 #s(approx (- (pow lambda2 -1) (pow lambda1 -1)) (/.f64 #s(literal 1 binary64) lambda2))))
(*.f64 lambda1 #s(approx (- (pow lambda2 -1) (pow lambda1 -1)) (/.f64 #s(literal 1 binary64) lambda2)))
#s(approx (- (pow lambda2 -1) (pow lambda1 -1)) (/.f64 #s(literal 1 binary64) lambda2))
(/.f64 #s(literal 1 binary64) lambda2)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 (/.f64 (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2) #s(approx (+ 1 (* (/ lambda1 lambda2) 1)) (.f64 lambda1 (+.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda2)))))) lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 (/.f64 (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2) #s(approx (+ 1 (* (/ lambda1 lambda2) 1)) (.f64 lambda1 (+.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda2)))))) lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 (/.f64 (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2) #s(approx (+ 1 (* (/ lambda1 lambda2) 1)) (*.f64 lambda1 (+.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda2)))))) lambda2))))
(sin.f64 #s(approx (- lambda1 lambda2) (.f64 (/.f64 (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2) #s(approx (+ 1 ( (/ lambda1 lambda2) 1)) (*.f64 lambda1 (+.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda2)))))) lambda2)))
#s(approx (- lambda1 lambda2) (.f64 (/.f64 (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2) #s(approx (+ 1 ( (/ lambda1 lambda2) 1)) (*.f64 lambda1 (+.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda2)))))) lambda2))
(.f64 (/.f64 (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2) #s(approx (+ 1 ( (/ lambda1 lambda2) 1)) (*.f64 lambda1 (+.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda2)))))) lambda2)
(/.f64 (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2) #s(approx (+ 1 (* (/ lambda1 lambda2) 1)) (*.f64 lambda1 (+.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda2))))))
(-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64))
(pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64))
#s(literal 3 binary64)
(fma.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2) #s(approx (+ 1 (* (/ lambda1 lambda2) 1)) (*.f64 lambda1 (+.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda2)))))
#s(approx (+ 1 (* (/ lambda1 lambda2) 1)) (*.f64 lambda1 (+.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda2))))
(*.f64 lambda1 (+.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda2)))
(+.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda2))
(/.f64 #s(literal 1 binary64) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(.f64 (cos.f64 phi2) (sin.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)))
(sin.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) #s(approx (cos phi2) #s(literal 1 binary64)))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) #s(approx (cos phi2) #s(literal 1 binary64))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) #s(approx (cos phi2) #s(literal 1 binary64)))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) #s(approx (cos phi2) #s(literal 1 binary64))))
(+.f64 (cos.f64 phi1) #s(approx (cos phi2) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 #s(approx (- lambda1 lambda2) lambda1))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 #s(approx (- lambda1 lambda2) lambda1))))
(+.f64 #s(literal 1 binary64) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 #s(approx (- lambda1 lambda2) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 lambda2 lambda1)))))))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 #s(approx (- lambda1 lambda2) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 lambda2 lambda1))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 #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)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 #s(approx (- lambda1 lambda2) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 lambda2 lambda1))))))))
(+.f64 #s(literal 1 binary64) (cos.f64 #s(approx (- lambda1 lambda2) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 lambda2 lambda1)))))))
(cos.f64 #s(approx (- lambda1 lambda2) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 lambda2 lambda1))))))
#s(approx (- lambda1 lambda2) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 lambda2 lambda1)))))
(.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 lambda2 lambda1))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 lambda2 lambda1)))
(*.f64 #s(literal -1 binary64) (/.f64 lambda2 lambda1))
(/.f64 lambda2 lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (+.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (+.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (+.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (+.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2))))
(+.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (+.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)))
(sin.f64 (-.f64 (+.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2))
(-.f64 (+.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)
(+.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 #s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 #s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 #s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))
(fma.f64 (sin.f64 #s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) lambda1)) (cos.f64 phi2) #s(literal 1 binary64))
(sin.f64 #s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) lambda1))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 #s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2))) (cos.f64 phi2) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 #s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2))) (cos.f64 phi2) #s(literal 1 binary64))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 #s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2))) (cos.f64 phi2) #s(literal 1 binary64)))
(fma.f64 (sin.f64 #s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2))) (cos.f64 phi2) #s(literal 1 binary64))
(sin.f64 #s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2))
(-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
(+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (+ ( (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (+ ( (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
(+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) ( (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 #s(approx (- lambda1 lambda2) lambda1))))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) ( (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 #s(approx (- lambda1 lambda2) lambda1)))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 #s(approx (- lambda1 lambda2) lambda1))))))
(/.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 #s(approx (- lambda1 lambda2) lambda1)))))
(-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 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 #s(approx (- lambda1 lambda2) lambda1))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (/ (+ (pow ( (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) #s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (/ (+ (pow ( (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) #s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) #s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))
(pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))
(-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (/ (- ( (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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 2 binary64))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (/ (- ( (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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 2 binary64)))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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 2 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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 2 binary64)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(pow.f64 (cos.f64 phi2) #s(literal 2 binary64))
(.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 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))))
(pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (/ (- (+ 1/2 ( 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (/ (- (+ 1/2 ( 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))
(.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))
(cos.f64 (*.f64 #s(literal 2 binary64) phi1))
(*.f64 #s(literal 2 binary64) phi1)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow ( (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow ( (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))
(fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))
(fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))
(*.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))
(pow.f64 (cos.f64 phi2) #s(literal 4 binary64))
#s(literal 4 binary64)
(pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))
(/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))))
(fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))
(.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))
(.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
(*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))
(*.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))
(pow.f64 (cos.f64 phi2) #s(literal 6 binary64))
#s(literal 6 binary64)
(pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))
(.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))
(pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64))
(/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(approx (* (cos phi2) (cos lambda2)) (cos.f64 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(approx (* (cos phi2) (cos lambda2)) (cos.f64 lambda2)))))
(+.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(approx (* (cos phi2) (cos lambda2)) (cos.f64 lambda2))))
#s(approx (cos phi1) #s(literal 1 binary64))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(approx (* (cos phi2) (cos lambda2)) (cos.f64 lambda2)))
#s(approx (* (cos phi2) (cos lambda2)) (cos.f64 lambda2))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(approx (* (cos phi2) (cos lambda2)) (cos.f64 phi2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(approx (* (cos phi2) (cos lambda2)) (cos.f64 phi2)))))
(+.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(approx (* (cos phi2) (cos lambda2)) (cos.f64 phi2))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(approx (* (cos phi2) (cos lambda2)) (cos.f64 phi2)))
#s(approx (* (cos phi2) (cos lambda2)) (cos.f64 phi2))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(approx (/ (pow (cos phi1) 3) (+ ( (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (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 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) #s(approx (+ ( (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(approx (/ (pow (cos phi1) 3) (+ ( (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (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 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) #s(approx (+ ( (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(+.f64 #s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (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 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) #s(approx (+ ( (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (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)))
(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 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 2 binary64)))
(/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) #s(approx (+ ( (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (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 #s(approx (cos phi2) #s(literal 1 binary64)) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
#s(approx (cos lambda1) #s(literal 1 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 (sin.f64 lambda2))))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 (sin.f64 lambda2)))))))
(+.f64 (cos.f64 phi1) (.f64 #s(approx (+ ( (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 (sin.f64 lambda2))))))
(.f64 #s(approx (+ ( (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 (sin.f64 lambda2)))))
#s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) #s(literal 1 binary64))
#s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 (sin.f64 lambda2))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 (sin.f64 lambda2)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (+.f64 #s(literal 1 binary64) (.f64 lambda2 (+.f64 lambda1 (.f64 #s(literal -1/2 binary64) lambda2))))))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (+.f64 #s(literal 1 binary64) (.f64 lambda2 (+.f64 lambda1 (.f64 #s(literal -1/2 binary64) lambda2)))))))))
(+.f64 (cos.f64 phi1) (.f64 #s(approx (+ ( (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (+.f64 #s(literal 1 binary64) (.f64 lambda2 (+.f64 lambda1 (.f64 #s(literal -1/2 binary64) lambda2))))))))
(.f64 #s(approx (+ ( (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (+.f64 #s(literal 1 binary64) (.f64 lambda2 (+.f64 lambda1 (.f64 #s(literal -1/2 binary64) lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (+.f64 #s(literal 1 binary64) (.f64 lambda2 (+.f64 lambda1 (.f64 #s(literal -1/2 binary64) lambda2))))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (+.f64 #s(literal 1 binary64) (.f64 lambda2 (+.f64 lambda1 (.f64 #s(literal -1/2 binary64) lambda2)))))
(+.f64 #s(literal 1 binary64) (.f64 lambda2 (+.f64 lambda1 (.f64 #s(literal -1/2 binary64) lambda2))))
(.f64 lambda2 (+.f64 lambda1 (.f64 #s(literal -1/2 binary64) lambda2)))
(+.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))
(*.f64 #s(literal -1/2 binary64) lambda2)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 #s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) (/.f64 (cos.f64 lambda2) lambda1)))))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 #s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) (/.f64 (cos.f64 lambda2) lambda1))))))))
(+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ ( (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 #s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) (/.f64 (cos.f64 lambda2) lambda1)))))))
(.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ ( (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 #s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) (/.f64 (cos.f64 lambda2) lambda1))))))
#s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 #s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) (/.f64 (cos.f64 lambda2) lambda1)))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 #s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) (/.f64 (cos.f64 lambda2) lambda1))))
(*.f64 lambda1 #s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) (/.f64 (cos.f64 lambda2) lambda1)))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) (/.f64 (cos.f64 lambda2) lambda1))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (.f64 lambda1 lambda1) #s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (.f64 lambda1 lambda1) #s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))))))
(+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ ( (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (.f64 lambda1 lambda1) #s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
(.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ ( (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (.f64 lambda1 lambda1) #s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))))
#s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (.f64 lambda1 lambda1) #s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (.f64 lambda1 lambda1) #s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
(.f64 (.f64 lambda1 lambda1) #s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #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) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1 binary64) (/.f64 #s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1 binary64) (/.f64 #s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))))))))
(+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ ( (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1 binary64) (/.f64 #s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))))
(.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ ( (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1 binary64) (/.f64 #s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1 binary64) (/.f64 #s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1 binary64) (/.f64 #s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))))
(.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1 binary64) (/.f64 #s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))
(fma.f64 #s(literal -1 binary64) (/.f64 #s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))
(/.f64 #s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1)
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1)))
(*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))
(*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (/ (pow (cos phi1) 2) (- (cos phi1) ( (cos (- lambda1 lambda2)) (cos phi2)))) (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 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) #s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (/ (pow (cos phi1) 2) (- (cos phi1) ( (cos (- lambda1 lambda2)) (cos phi2)))) (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 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) #s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 #s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (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 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 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 (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (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 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) #s(approx (- (cos phi1) ( (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.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 phi1) ( (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) #s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))
(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 phi1) ( (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) #s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) #s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (pow.f64 (cos.f64 phi1) #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 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (exp.f64 (.f64 (log.f64 (cos.f64 phi1)) #s(literal 3 binary64)))) (+.f64 (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)) (.f64 (.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (exp.f64 (.f64 (log.f64 (cos.f64 phi1)) #s(literal 3 binary64)))) (+.f64 (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)) (.f64 (.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (exp.f64 (.f64 (log.f64 (cos.f64 phi1)) #s(literal 3 binary64)))) (+.f64 (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)) (.f64 (*.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
(+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (exp.f64 (.f64 (log.f64 (cos.f64 phi1)) #s(literal 3 binary64))))
(exp.f64 (*.f64 (log.f64 (cos.f64 phi1)) #s(literal 3 binary64)))
(*.f64 (log.f64 (cos.f64 phi1)) #s(literal 3 binary64))
(log.f64 (cos.f64 phi1))
(+.f64 (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)) (.f64 (*.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(.f64 (.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (cos.f64 phi1))
(*.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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)))))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 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 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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))))))))
(/.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 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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)))))))
(+.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)))
(pow.f64 (cos.f64 phi1) #s(literal 3 binary64))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)))) #s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)))) #s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))
(/.f64 (-.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 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)))) #s(approx ( (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))
(-.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 (cos.f64 phi1) (.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 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.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)))
(.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))
(pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))
(*.f64 (cos.f64 lambda1) (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)) (exp.f64 (.f64 (log.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (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)) (exp.f64 (.f64 (log.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (exp.f64 (.f64 (log.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2))))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (exp.f64 (.f64 (log.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64))))
(exp.f64 (.f64 (log.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64)))
(.f64 (log.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64))
(log.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.f64 #s(approx (- (pow lambda1 3) (pow lambda2 3)) (.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64)))) (fma.f64 lambda1 lambda1 (fma.f64 lambda2 lambda2 (.f64 lambda1 lambda2)))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.f64 #s(approx (- (pow lambda1 3) (pow lambda2 3)) (.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64)))) (fma.f64 lambda1 lambda1 (fma.f64 lambda2 lambda2 (.f64 lambda1 lambda2)))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 (cos.f64 phi2) (sin.f64 (/.f64 #s(approx (- (pow lambda1 3) (pow lambda2 3)) (.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64)))) (fma.f64 lambda1 lambda1 (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda2))))))
(sin.f64 (/.f64 #s(approx (- (pow lambda1 3) (pow lambda2 3)) (.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64)))) (fma.f64 lambda1 lambda1 (fma.f64 lambda2 lambda2 (.f64 lambda1 lambda2)))))
(/.f64 #s(approx (- (pow lambda1 3) (pow lambda2 3)) (.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64)))) (fma.f64 lambda1 lambda1 (fma.f64 lambda2 lambda2 (.f64 lambda1 lambda2))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) (*.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64))))
(*.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64)))
(pow.f64 lambda2 #s(literal 3 binary64))
(fma.f64 lambda1 lambda1 (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda2)))
(fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda2))
(*.f64 lambda1 lambda2)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.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)))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.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)))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))
(.f64 (cos.f64 phi2) (sin.f64 (/.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))))))
(sin.f64 (/.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 (-.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 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))
(pow.f64 lambda1 #s(literal 3 binary64))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))
(fma.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2) #s(literal 1 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.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))))))))
(atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.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)))))))
(.f64 (cos.f64 phi2) (-.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 (cos.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))))))
(+.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 (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) #s(approx ( (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (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) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 #s(approx (+ phi2 (/ (PI) 2)) phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (+ phi2 (/ (PI) 2)) phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (sin.f64 #s(approx (+ phi2 (/ (PI) 2)) phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
(/.f64 (+.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)) (pow.f64 lambda1 #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(literal 1 binary64)) (cos.f64 phi1))) lambda1))))
(+.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)) (pow.f64 lambda1 #s(literal 3 binary64)))
(pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 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)))
(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 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(literal 1 binary64)) (cos.f64 phi1))) 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 2 binary64))
(-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(literal 1 binary64)) (cos.f64 phi1))) lambda1))
(.f64 (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(literal 1 binary64)) (cos.f64 phi1))) lambda1)
(/.f64 (-.f64 (.f64 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 2 binary64))) #s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) lambda1))))))
(-.f64 (.f64 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 2 binary64)))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) lambda1)))))
(.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) lambda1))))
(+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) lambda1)))
(.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) lambda1))
(/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) lambda1)
(/.f64 (-.f64 (.f64 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 2 binary64))) (-.f64 lambda1 (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(literal 1 binary64)) (cos.f64 phi1)))))
(-.f64 lambda1 (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(literal 1 binary64)) (cos.f64 phi1))))
#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))) lambda1) 1) 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))) lambda1) 1) 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))) lambda1) 1) #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))) lambda1) 1) #s(hole binary64 (/ (+ 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)))))) lambda1) #s(hole binary64 (/ (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)))))) lambda1) #s(hole binary64 (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)))
#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 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos phi2) (cos (neg lambda2))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* 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 (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) #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))) #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 (+ (* (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 (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) lambda1) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) lambda1) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) #s(hole binary64 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))) lambda1)))
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) #s(hole binary64 (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))) lambda1)))
#s(approx (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) #s(hole binary64 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))) lambda1)))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (* -1 lambda2))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (* -1 lambda2))))) (* (cos phi2) (cos (* -1 lambda2)))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (* -1 lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (* -1 lambda2))))))) (* (cos phi2) (cos (* -1 lambda2)))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (* -1 lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (* -1 lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (* -1 lambda2))))))))) (* (cos phi2) (cos (* -1 lambda2)))))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (cos (* -1 lambda2))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (cos (* -1 lambda2)) (* -1 (* lambda1 (sin (* -1 lambda2)))))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (cos (* -1 lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (* -1 lambda2)))) (sin (* -1 lambda2)))))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (cos (* -1 lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (* -1 lambda2))) (* 1/6 (* lambda1 (sin (* -1 lambda2)))))) (sin (* -1 lambda2)))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* -1 lambda2)))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos phi1) (cos (neg lambda2)))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos phi1) (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos phi1) (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos phi1) (+ (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) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ (cos phi1) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ (cos phi1) (+ (* -1 (* lambda1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* 1/6 (* lambda1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))))) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (* -1 (* lambda1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* 1/6 (* lambda1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))))) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi1) (+ (* (cos phi2) (cos (neg lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (+ (* (cos phi2) (cos (neg lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin 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))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin 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))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (* (cos phi2) (cos (neg lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (+ (* (cos phi2) (cos (neg lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* (cos phi2) (cos (neg lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) #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))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (* lambda1 (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/6 (* lambda1 (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* -1 (* 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))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/2 (* 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))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* 1/6 (* 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))))))))
#s(approx (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) #s(hole binary64 (sin (neg lambda2))))
#s(approx (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))))
#s(approx (* lambda1 (cos (neg lambda2))) #s(hole binary64 (* lambda1 (cos (neg lambda2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (* -1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (* -1 lambda2))))) (* (cos phi2) (cos (* -1 lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (* -1 lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (* -1 lambda2))))))) (* (cos phi2) (cos (* -1 lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (* -1 lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (* -1 lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (* -1 lambda2))))))))) (* (cos phi2) (cos (* -1 lambda2)))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (cos (* -1 lambda2)))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi2) (sin (* -1 lambda2))))) (* (cos phi2) (cos (* -1 lambda2))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (* -1 lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (* -1 lambda2))))))) (* (cos phi2) (cos (* -1 lambda2))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (* -1 lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (* -1 lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (* -1 lambda2))))))))) (* (cos phi2) (cos (* -1 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 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* -1 (* lambda1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* 1/6 (* lambda1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) #s(hole binary64 (+ 1 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) #s(hole binary64 (+ 1 (+ (* -1 (* lambda1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) #s(hole binary64 (+ 1 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) #s(hole binary64 (+ 1 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* 1/6 (* lambda1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (+ (* -1 (* lambda1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* 1/6 (* lambda1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (+ (* 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 (+ 1 (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (cos (neg lambda2)))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1/2 (pow phi1 2)) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1/2 (pow phi1 2)) (+ (* 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 (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) #s(hole binary64 (cos (neg lambda2))))
#s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) #s(hole binary64 (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))))
#s(approx (* -1 (* lambda1 (sin (neg lambda2)))) #s(hole binary64 (* -1 (* lambda1 (sin (neg lambda2))))))
#s(approx (* lambda1 (sin (neg lambda2))) #s(hole binary64 (* lambda1 (sin (neg lambda2)))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* 1/6 (* lambda1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (sin (+ phi2 (* 1/2 (PI))))))
#s(approx (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (* -1/2 (* (pow lambda1 2) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (* (pow lambda1 2) (+ (* -1/2 (sin (+ phi2 (* 1/2 (PI))))) (* 1/24 (* (pow lambda1 2) (sin (+ phi2 (* 1/2 (PI)))))))))))
#s(approx (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (+ (sin (+ phi2 (* 1/2 (PI)))) (* (pow lambda1 2) (+ (* -1/2 (sin (+ phi2 (* 1/2 (PI))))) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (sin (+ phi2 (* 1/2 (PI)))))) (* 1/24 (sin (+ phi2 (* 1/2 (PI))))))))))))
#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 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (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)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* 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)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/2 (* 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)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* 1/6 (* 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)))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (neg lambda2)) (* -1/2 (* (pow phi2 2) (sin (neg lambda2)))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (neg lambda2)) (+ (* -1/2 (* (pow phi2 2) (sin (neg lambda2)))) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* (pow phi2 2) (cos (neg lambda2))))))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (neg lambda2)) (+ (* -1/2 (* (pow phi2 2) (sin (neg lambda2)))) (* lambda1 (+ (cos (neg lambda2)) (+ (* -1/2 (* (pow phi2 2) (cos (neg lambda2)))) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* 1/4 (* (pow phi2 2) (sin (neg lambda2)))))))))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (neg lambda2)) (+ (* -1/2 (* (pow phi2 2) (sin (neg lambda2)))) (* lambda1 (+ (cos (neg lambda2)) (+ (* -1/2 (* (pow phi2 2) (cos (neg lambda2)))) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (+ (* 1/4 (* (pow phi2 2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/6 (cos (neg lambda2))) (* 1/12 (* (pow phi2 2) (cos (neg lambda2))))))))))))))))
#s(approx (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (sin (+ phi2 (* 1/2 (PI)))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (sin (+ phi2 (* 1/2 (PI)))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (sin (+ phi2 (* 1/2 (PI)))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/6 (* lambda1 (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))) (* (cos (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (- (* lambda1 (cos lambda2)) (sin lambda2))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (sin (- (* 1/2 (PI)) lambda2))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda1 (* (cos phi2) (cos (- (* 1/2 (PI)) lambda2)))) (* (cos phi2) (sin (- (* 1/2 (PI)) lambda2)))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (- (* 1/2 (PI)) lambda2))))) (* (cos phi2) (cos (- (* 1/2 (PI)) lambda2))))) (* (cos phi2) (sin (- (* 1/2 (PI)) lambda2)))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (- (* 1/2 (PI)) lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (- (* 1/2 (PI)) lambda2))))))) (* (cos phi2) (cos (- (* 1/2 (PI)) lambda2))))) (* (cos phi2) (sin (- (* 1/2 (PI)) lambda2)))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) lambda2))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) lambda2)) (* lambda1 (cos (- (* 1/2 (PI)) lambda2))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) lambda2)) (* lambda1 (+ (cos (- (* 1/2 (PI)) lambda2)) (* -1/2 (* lambda1 (sin (- (* 1/2 (PI)) lambda2)))))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) lambda2)) (* lambda1 (+ (cos (- (* 1/2 (PI)) lambda2)) (* lambda1 (+ (* -1/2 (sin (- (* 1/2 (PI)) lambda2))) (* -1/6 (* lambda1 (cos (- (* 1/2 (PI)) lambda2)))))))))))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) #s(hole binary64 (- (* 1/2 (PI)) lambda2)))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) #s(hole binary64 (- (+ lambda1 (* 1/2 (PI))) lambda2)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (/ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (/ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (/ (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda1 (- (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* lambda1 (- (+ (* 1/2 (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (+ (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* lambda1 (- (+ (* 1/2 (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* lambda1 (- (+ (* -1/6 (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (+ (* 1/2 (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (* -1/2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (+ (* -1/6 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (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)))))))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (+ (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (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 (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2)) (- (cos phi1) (cos (neg lambda2))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda1 (- (* 2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (sin (neg lambda2)) (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos (neg lambda2))))) (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2)))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* 2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (* lambda1 (- (* -1 (/ (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (cos (neg lambda2))))) (+ (* 1/2 (/ (* (cos (neg lambda2)) (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2))) (/ (* (sin (neg lambda2)) (- (* 2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (sin (neg lambda2)) (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (- (cos phi1) (cos (neg lambda2)))))))) (/ (* (sin (neg lambda2)) (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos (neg lambda2))))) (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2)))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* 2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (* lambda1 (- (+ (* -1 (/ (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (cos (neg lambda2))))) (* lambda1 (- (* -1 (/ (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (cos (neg lambda2))))) (+ (* -1/6 (/ (* (sin (neg lambda2)) (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2))) (+ (* 1/2 (/ (* (cos (neg lambda2)) (- (* 2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (sin (neg lambda2)) (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (sin (neg lambda2)) (- (* -1 (/ (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (cos (neg lambda2))))) (+ (* 1/2 (/ (* (cos (neg lambda2)) (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2))) (/ (* (sin (neg lambda2)) (- (* 2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (sin (neg lambda2)) (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (- (cos phi1) (cos (neg lambda2))))))) (- (cos phi1) (cos (neg lambda2))))))))) (+ (* 1/2 (/ (* (cos (neg lambda2)) (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2))) (/ (* (sin (neg lambda2)) (- (* 2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (sin (neg lambda2)) (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (- (cos phi1) (cos (neg lambda2)))))))) (/ (* (sin (neg lambda2)) (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos (neg lambda2))))) (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2)))))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (pow (cos phi1) 2) (pow (cos (neg lambda2)) 2))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ (* 2 (* lambda1 (* (cos (neg lambda2)) (sin (neg lambda2))))) (pow (cos phi1) 2)) (pow (cos (neg lambda2)) 2))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* -2 (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (cos phi1) 2)) (pow (cos (neg lambda2)) 2))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* -2 (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (cos phi1) 2)) (pow (cos (neg lambda2)) 2))))
#s(approx (pow (cos (- lambda1 lambda2)) 2) #s(hole binary64 (pow (cos (neg lambda2)) 2)))
#s(approx (pow (cos (- lambda1 lambda2)) 2) #s(hole binary64 (+ (* -2 (* lambda1 (* (cos (neg lambda2)) (sin (neg lambda2))))) (pow (cos (neg lambda2)) 2))))
#s(approx (pow (cos (- lambda1 lambda2)) 2) #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 (pow (cos (- lambda1 lambda2)) 2) #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 phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (cos phi1) (cos (neg lambda2)))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ (cos phi1) (* lambda1 (sin (neg lambda2)))) (cos (neg lambda2)))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ (cos phi1) (* lambda1 (+ (sin (neg lambda2)) (* 1/2 (* lambda1 (cos (neg lambda2))))))) (cos (neg lambda2)))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ (cos phi1) (* lambda1 (+ (sin (neg lambda2)) (* lambda1 (- (* -1/6 (* lambda1 (sin (neg lambda2)))) (* -1/2 (cos (neg lambda2)))))))) (cos (neg lambda2)))))
#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 (sin lambda1) #s(hole binary64 lambda1))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* -1/6 (pow lambda1 2))))))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* (pow lambda1 2) (- (* 1/120 (pow lambda1 2)) 1/6))))))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/120 (* -1/5040 (pow lambda1 2)))) 1/6))))))
#s(approx (+ lambda1 (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 (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) #s(hole binary64 (cos (neg lambda2))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) #s(hole binary64 (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1 (sin (neg lambda2))) (* -1/2 (* lambda1 (cos (neg lambda2)))))))))
#s(approx (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))) #s(hole binary64 (* -1 (* lambda1 (sin (neg lambda2))))))
#s(approx (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))) #s(hole binary64 (* lambda1 (+ (* -1 (sin (neg lambda2))) (* -1/2 (* lambda1 (cos (neg lambda2))))))))
#s(approx (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))) #s(hole binary64 (* -1 (sin (neg lambda2)))))
#s(approx (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))) #s(hole binary64 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
#s(approx (* -1/2 (* lambda1 (cos (neg lambda2)))) #s(hole binary64 (* -1/2 (* lambda1 (cos (neg lambda2))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) #s(hole binary64 (cos (neg lambda2))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) #s(hole binary64 (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1 (sin (neg lambda2))) (* -1/2 (* lambda1 (cos (neg lambda2)))))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1 (sin (neg lambda2))) (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))))))))
#s(approx (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) #s(hole binary64 (* -1 (* lambda1 (sin (neg lambda2))))))
#s(approx (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) #s(hole binary64 (* lambda1 (+ (* -1 (sin (neg lambda2))) (* -1/2 (* lambda1 (cos (neg lambda2))))))))
#s(approx (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) #s(hole binary64 (* lambda1 (+ (* -1 (sin (neg lambda2))) (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2))))))))))
#s(approx (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))) #s(hole binary64 (* -1 (sin (neg lambda2)))))
#s(approx (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))) #s(hole binary64 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
#s(approx (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))) #s(hole binary64 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
#s(approx (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) #s(hole binary64 (* -1/2 (* lambda1 (cos (neg lambda2))))))
#s(approx (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) #s(hole binary64 (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2))))))))
#s(approx (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2))))) #s(hole binary64 (* -1/2 (cos (neg lambda2)))))
#s(approx (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2))))) #s(hole binary64 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))))
#s(approx (* 1/6 (* lambda1 (sin (neg lambda2)))) #s(hole binary64 (* 1/6 (* lambda1 (sin (neg lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (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 (+ (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 (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (* (cos lambda2) (cos phi2))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2)))))
#s(approx (+ (cos lambda2) (* lambda1 (sin lambda2))) #s(hole binary64 (cos lambda2)))
#s(approx (+ (cos lambda2) (* lambda1 (sin lambda2))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (* lambda1 (sin lambda2)) #s(hole binary64 (* lambda1 (sin lambda2))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (- (* lambda1 (sin (+ lambda2 (* 1/2 (PI))))) (sin lambda2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (sin (* -1 lambda2)))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda1 (* (cos phi2) (cos (* -1 lambda2)))) (* (cos phi2) (sin (* -1 lambda2))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (* -1 lambda2))))) (* (cos phi2) (cos (* -1 lambda2))))) (* (cos phi2) (sin (* -1 lambda2))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (* -1 lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (* -1 lambda2))))))) (* (cos phi2) (cos (* -1 lambda2))))) (* (cos phi2) (sin (* -1 lambda2))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (sin (* -1 lambda2))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (sin (* -1 lambda2)) (* lambda1 (cos (* -1 lambda2))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (sin (* -1 lambda2)) (* lambda1 (+ (cos (* -1 lambda2)) (* -1/2 (* lambda1 (sin (* -1 lambda2)))))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (sin (* -1 lambda2)) (* lambda1 (+ (cos (* -1 lambda2)) (* lambda1 (+ (* -1/2 (sin (* -1 lambda2))) (* -1/6 (* lambda1 (cos (* -1 lambda2)))))))))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) #s(hole binary64 (- (* lambda1 (cos lambda2)) (sin lambda2))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) #s(hole binary64 (* lambda2 (- (* 1/6 (pow lambda2 2)) 1))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) #s(hole binary64 (+ (* lambda1 (+ 1 (* -1/2 (pow lambda2 2)))) (* lambda2 (- (* 1/6 (pow lambda2 2)) 1)))))
#s(approx (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)) #s(hole binary64 (* lambda2 (- (* 1/6 (pow lambda2 2)) 1))))
#s(approx (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)) #s(hole binary64 (+ (* -1/2 (* lambda1 (pow lambda2 2))) (* lambda2 (- (* 1/6 (pow lambda2 2)) 1)))))
#s(approx (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1) #s(hole binary64 (- (* 1/6 (pow lambda2 2)) 1)))
#s(approx (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1) #s(hole binary64 (- (+ (* -1/2 (* lambda1 lambda2)) (* 1/6 (pow lambda2 2))) 1)))
#s(approx (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) #s(hole binary64 (* 1/6 (pow lambda2 2))))
#s(approx (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) #s(hole binary64 (+ (* -1/2 (* lambda1 lambda2)) (* 1/6 (pow lambda2 2)))))
#s(approx (+ (* -1/2 lambda1) (* 1/6 lambda2)) #s(hole binary64 (* 1/6 lambda2)))
#s(approx (+ (* -1/2 lambda1) (* 1/6 lambda2)) #s(hole binary64 (+ (* -1/2 lambda1) (* 1/6 lambda2))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (cos (neg lambda2))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* 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)) 1) #s(hole binary64 (+ 1 (+ (* 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 (cos lambda2)) (sin lambda2)) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (- (* lambda1 (cos lambda2)) (sin lambda2)) #s(hole binary64 (- (* lambda1 (cos lambda2)) (sin lambda2))))
#s(approx (* lambda1 (cos lambda2)) #s(hole binary64 (* lambda1 (cos lambda2))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) #s(hole binary64 (- (* lambda1 (cos lambda2)) (sin lambda2))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) #s(hole binary64 (- (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))) (sin lambda2))))
#s(approx (* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))) #s(hole binary64 (+ (* -1 (sin lambda2)) (* lambda1 (cos lambda2)))))
#s(approx (* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))) #s(hole binary64 (+ (* -1 (sin lambda2)) (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))))))
#s(approx (pow lambda1 2) #s(hole binary64 (pow lambda1 2)))
#s(approx (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) #s(hole binary64 (* -1 (/ (sin lambda2) (pow lambda1 2)))))
#s(approx (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) #s(hole binary64 (/ (+ (* -1 (sin lambda2)) (* lambda1 (cos lambda2))) (pow lambda1 2))))
#s(approx (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) #s(hole binary64 (/ (+ (* -1 (sin lambda2)) (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2)))))) (pow lambda1 2))))
#s(approx (/ (sin lambda2) (pow lambda1 2)) #s(hole binary64 (/ (sin lambda2) (pow lambda1 2))))
#s(approx (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)) #s(hole binary64 (/ (cos lambda2) lambda1)))
#s(approx (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)) #s(hole binary64 (/ (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2)))) lambda1)))
#s(approx (/ (cos lambda2) lambda1) #s(hole binary64 (/ (cos lambda2) lambda1)))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (cos lambda2)))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (sin lambda2)))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
#s(approx (* (* (cos lambda2) lambda1) -1/2) #s(hole binary64 (* -1/2 (* lambda1 (cos lambda2)))))
#s(approx (* (cos lambda2) lambda1) #s(hole binary64 (* lambda1 (cos lambda2))))
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) #s(hole binary64 (* lambda1 (cos lambda2))))
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) #s(hole binary64 (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2)))))))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) #s(hole binary64 (cos lambda2)))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) #s(hole binary64 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))))
#s(approx (* lambda1 (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) #s(hole binary64 (cos lambda2)))
#s(approx (* lambda1 (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) #s(hole binary64 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (* -1/2 (* lambda1 (neg (sin lambda2)))) #s(hole binary64 (* 1/2 (* lambda1 (sin lambda2)))))
#s(approx (* lambda1 (neg (sin lambda2))) #s(hole binary64 (* -1 (* lambda1 (sin lambda2)))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (cos phi2))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* -1/2 (* (pow lambda1 2) (cos phi2)))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda1 2) (cos phi2)))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (cos phi2))) (* 1/24 (cos phi2))))))))))
#s(approx (+ 1 (* -1/2 (* lambda1 lambda1))) #s(hole binary64 1))
#s(approx (+ 1 (* -1/2 (* lambda1 lambda1))) #s(hole binary64 (+ 1 (* -1/2 (pow lambda1 2)))))
#s(approx (* -1/2 (* lambda1 lambda1)) #s(hole binary64 (* -1/2 (pow lambda1 2))))
#s(approx (* lambda1 lambda1) #s(hole binary64 (pow lambda1 2)))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) #s(hole binary64 1))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) #s(hole binary64 (+ 1 (* -1/2 (pow lambda1 2)))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) #s(hole binary64 (+ 1 (* (pow lambda1 2) (- (* 1/24 (pow lambda1 2)) 1/2)))))
#s(approx (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2)) #s(hole binary64 (* -1/2 (pow lambda1 2))))
#s(approx (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2)) #s(hole binary64 (* (pow lambda1 2) (- (* 1/24 (pow lambda1 2)) 1/2))))
#s(approx (- (* 1/24 (* lambda1 lambda1)) 1/2) #s(hole binary64 -1/2))
#s(approx (- (* 1/24 (* lambda1 lambda1)) 1/2) #s(hole binary64 (- (* 1/24 (pow lambda1 2)) 1/2)))
#s(approx (* 1/24 (* lambda1 lambda1)) #s(hole binary64 (* 1/24 (pow lambda1 2))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) #s(hole binary64 1))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) #s(hole binary64 (+ 1 (* -1/2 (pow lambda1 2)))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) #s(hole binary64 (+ 1 (* (pow lambda1 2) (- (* 1/24 (pow lambda1 2)) 1/2)))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) #s(hole binary64 (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/24 (* -1/720 (pow lambda1 2)))) 1/2)))))
#s(approx (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) #s(hole binary64 (* -1/2 (pow lambda1 2))))
#s(approx (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) #s(hole binary64 (* (pow lambda1 2) (- (* 1/24 (pow lambda1 2)) 1/2))))
#s(approx (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) #s(hole binary64 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/24 (* -1/720 (pow lambda1 2)))) 1/2))))
#s(approx (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) #s(hole binary64 -1/2))
#s(approx (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) #s(hole binary64 (- (* 1/24 (pow lambda1 2)) 1/2)))
#s(approx (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) #s(hole binary64 (- (* (pow lambda1 2) (+ 1/24 (* -1/720 (pow lambda1 2)))) 1/2)))
#s(approx (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) #s(hole binary64 (* 1/24 (pow lambda1 2))))
#s(approx (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) #s(hole binary64 (* (pow lambda1 2) (+ 1/24 (* -1/720 (pow lambda1 2))))))
#s(approx (+ 1/24 (* -1/720 (* lambda1 lambda1))) #s(hole binary64 1/24))
#s(approx (+ 1/24 (* -1/720 (* lambda1 lambda1))) #s(hole binary64 (+ 1/24 (* -1/720 (pow lambda1 2)))))
#s(approx (* -1/720 (* lambda1 lambda1)) #s(hole binary64 (* -1/720 (pow lambda1 2))))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) #s(hole binary64 (* -1 lambda2)))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (* lambda1 (- (pow lambda2 -1) (pow lambda1 -1))) #s(hole binary64 -1))
#s(approx (* lambda1 (- (pow lambda2 -1) (pow lambda1 -1))) #s(hole binary64 (- (/ lambda1 lambda2) 1)))
#s(approx (- (pow lambda2 -1) (pow lambda1 -1)) #s(hole binary64 (/ -1 lambda1)))
#s(approx (- (pow lambda2 -1) (pow lambda1 -1)) #s(hole binary64 (/ (- (/ lambda1 lambda2) 1) lambda1)))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* -1 lambda2)))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 -1))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (- (/ lambda1 lambda2) 1)))
#s(approx (- (pow (/ lambda1 lambda2) 3) 1) #s(hole binary64 -1))
#s(approx (- (pow (/ lambda1 lambda2) 3) 1) #s(hole binary64 (- (/ (pow lambda1 3) (pow lambda2 3)) 1)))
#s(approx (pow (/ lambda1 lambda2) 3) #s(hole binary64 (/ (pow lambda1 3) (pow lambda2 3))))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) #s(hole binary64 1))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) #s(hole binary64 (+ 1 (/ lambda1 lambda2))))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) #s(hole binary64 (+ 1 (* lambda1 (+ (/ 1 lambda2) (/ lambda1 (pow lambda2 2)))))))
#s(approx (+ 1 (* (/ lambda1 lambda2) 1)) #s(hole binary64 1))
#s(approx (+ 1 (* (/ lambda1 lambda2) 1)) #s(hole binary64 (+ 1 (/ lambda1 lambda2))))
#s(approx (* lambda1 (+ (/ 1 lambda1) (/ 1 lambda2))) #s(hole binary64 1))
#s(approx (* lambda1 (+ (/ 1 lambda1) (/ 1 lambda2))) #s(hole binary64 (+ 1 (/ lambda1 lambda2))))
#s(approx (+ (/ 1 lambda1) (/ 1 lambda2)) #s(hole binary64 (/ 1 lambda1)))
#s(approx (+ (/ 1 lambda1) (/ 1 lambda2)) #s(hole binary64 (/ (+ 1 (/ lambda1 lambda2)) lambda1)))
#s(approx (/ 1 lambda1) #s(hole binary64 (/ 1 lambda1)))
#s(approx (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) #s(hole binary64 (* -1 lambda2)))
#s(approx (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (+ 1 (* -1 (/ lambda2 lambda1))) #s(hole binary64 (* -1 (/ lambda2 lambda1))))
#s(approx (+ 1 (* -1 (/ lambda2 lambda1))) #s(hole binary64 (/ (+ lambda1 (* -1 lambda2)) lambda1)))
#s(approx (* -1 (/ lambda2 lambda1)) #s(hole binary64 (* -1 (/ lambda2 lambda1))))
#s(approx (/ lambda2 lambda1) #s(hole binary64 (/ lambda2 lambda1)))
#s(approx (+ 1 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) #s(hole binary64 (+ 1 (sin (- (* 1/2 (PI)) lambda2)))))
#s(approx (+ 1 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) #s(hole binary64 (+ 1 (+ (sin (- (* 1/2 (PI)) lambda2)) (* lambda1 (cos (- (* 1/2 (PI)) lambda2)))))))
#s(approx (+ 1 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) #s(hole binary64 (+ 1 (+ (sin (- (* 1/2 (PI)) lambda2)) (* lambda1 (+ (cos (- (* 1/2 (PI)) lambda2)) (* -1/2 (* lambda1 (sin (- (* 1/2 (PI)) lambda2))))))))))
#s(approx (+ 1 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) #s(hole binary64 (+ 1 (+ (sin (- (* 1/2 (PI)) lambda2)) (* lambda1 (+ (cos (- (* 1/2 (PI)) lambda2)) (* lambda1 (+ (* -1/2 (sin (- (* 1/2 (PI)) lambda2))) (* -1/6 (* lambda1 (cos (- (* 1/2 (PI)) lambda2))))))))))))
#s(approx (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) #s(hole binary64 (sin (- (* 1/2 (PI)) lambda2))))
#s(approx (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) lambda2)) (* lambda1 (cos (- (* 1/2 (PI)) lambda2))))))
#s(approx (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) lambda2)) (* lambda1 (+ (cos (- (* 1/2 (PI)) lambda2)) (* -1/2 (* lambda1 (sin (- (* 1/2 (PI)) lambda2)))))))))
#s(approx (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) lambda2)) (* lambda1 (+ (cos (- (* 1/2 (PI)) lambda2)) (* lambda1 (+ (* -1/2 (sin (- (* 1/2 (PI)) lambda2))) (* -1/6 (* lambda1 (cos (- (* 1/2 (PI)) lambda2)))))))))))
#s(approx (- (+ lambda1 (* 1/2 (PI))) lambda2) #s(hole binary64 (- (* 1/2 (PI)) lambda2)))
#s(approx (- (+ lambda1 (* 1/2 (PI))) lambda2) #s(hole binary64 (- (+ lambda1 (* 1/2 (PI))) lambda2)))
#s(approx (+ lambda1 (* 1/2 (PI))) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ lambda1 (* 1/2 (PI))) #s(hole binary64 (+ lambda1 (* 1/2 (PI)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* -1 (* lambda1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* 1/6 (* lambda1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))))) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (+ (* -1 (* lambda1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (+ (* lambda1 (+ (* -1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* 1/6 (* lambda1 (* (sin (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))))) (* (cos (neg lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* (cos phi2) (cos (neg lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (+ (* (cos phi2) (cos (neg lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (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))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (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))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi1) (+ (cos (neg lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi1) (+ (cos (neg lambda2)) (+ (* -1 (* lambda1 (sin (neg lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi1) (+ (cos (neg lambda2)) (+ (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi1) (+ (cos (neg lambda2)) (+ (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos (neg lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))))
#s(approx (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos (neg lambda2)) (+ (* -1 (* lambda1 (sin (neg lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos (neg lambda2)) (+ (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos (neg lambda2)) (+ (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (/ (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (- (+ (* lambda1 (- (* 2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ 1 (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* 2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* lambda1 (- (* -1 (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* 2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ 1 (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* 2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* lambda1 (- (+ (* -1 (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- 1 (* (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))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (+ (* -1/6 (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda2)) (- (* 2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (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))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* 2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* 2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ 1 (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- (+ 1 (* 2 (* lambda1 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- (+ 1 (* 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 phi2) 2) (pow (cos (neg lambda2)) 2)))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- (+ 1 (* 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 phi2) 2) (pow (cos (neg lambda2)) 2)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) #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 (* (cos phi2) (cos (- lambda1 lambda2))) 2) #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 (* (cos phi2) (cos (- lambda1 lambda2))) 2) #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 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- 1 (* (cos phi2) (cos (neg lambda2))))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* lambda1 (- (* 1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* 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 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (/ (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #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)))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #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)))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (+ (/ (* (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* -1/2 (* (cos phi2) (cos (neg lambda2)))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)) (/ (* (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (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)))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (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)))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #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))))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (+ (/ (* (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* 1/6 (* (cos phi2) (sin (neg lambda2)))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)) (+ (/ (* (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (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)))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (+ (/ (* (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* -1/2 (* (cos phi2) (cos (neg lambda2)))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)) (/ (* (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (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)))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (- (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* -1/2 (* (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)))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (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)))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))))) (+ (/ (* (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* -1/2 (* (cos phi2) (cos (neg lambda2)))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)) (/ (* (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (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)))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (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)))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))) (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (/ (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (+ 1 (pow (cos (neg lambda2)) 3)) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))))
#s(approx (/ (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (- (+ (* -2 (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))) (* -1 (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2)))))) (/ (* (+ 1 (pow (cos (neg lambda2)) 3)) (+ (sin (neg lambda2)) (* -2 (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))) 2)))) (+ (/ 1 (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2)))) (/ (pow (cos (neg lambda2)) 3) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))))))
#s(approx (/ (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (- (+ (* -2 (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))) (+ (* -1 (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))) (* lambda1 (- (+ (* -1/2 (/ (pow (cos (neg lambda2)) 3) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))) (+ (* 2 (/ (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))) (/ (* (cos (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2)))))) (+ (/ (* (+ 1 (pow (cos (neg lambda2)) 3)) (- (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (* -1/2 (cos (neg lambda2))))) (pow (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))) 2)) (/ (* (+ (sin (neg lambda2)) (* -2 (* (cos (neg lambda2)) (sin (neg lambda2))))) (- (+ (* -2 (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))) (* -1 (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2)))))) (/ (* (+ 1 (pow (cos (neg lambda2)) 3)) (+ (sin (neg lambda2)) (* -2 (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))) 2)))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))))))) (/ (* (+ 1 (pow (cos (neg lambda2)) 3)) (+ (sin (neg lambda2)) (* -2 (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))) 2)))) (+ (/ 1 (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2)))) (/ (pow (cos (neg lambda2)) 3) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))))))
#s(approx (/ (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (- (+ (* -2 (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))) (+ (* -1 (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))) (* lambda1 (- (+ (* -1/2 (/ (pow (cos (neg lambda2)) 3) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))) (+ (* 2 (/ (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))) (+ (* lambda1 (- (+ (* -1 (/ (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))) (+ (* 1/6 (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))) (+ (/ (* (cos (neg lambda2)) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2)))) (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))))) (+ (/ (* (+ 1 (pow (cos (neg lambda2)) 3)) (+ (* -1/6 (sin (neg lambda2))) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))) 2)) (+ (/ (* (+ (sin (neg lambda2)) (* -2 (* (cos (neg lambda2)) (sin (neg lambda2))))) (- (+ (* -1/2 (/ (pow (cos (neg lambda2)) 3) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))) (+ (* 2 (/ (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))) (/ (* (cos (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2)))))) (+ (/ (* (+ 1 (pow (cos (neg lambda2)) 3)) (- (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (* -1/2 (cos (neg lambda2))))) (pow (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))) 2)) (/ (* (+ (sin (neg lambda2)) (* -2 (* (cos (neg lambda2)) (sin (neg lambda2))))) (- (+ (* -2 (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))) (* -1 (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2)))))) (/ (* (+ 1 (pow (cos (neg lambda2)) 3)) (+ (sin (neg lambda2)) (* -2 (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))) 2)))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2)))) (/ (* (- (+ (* -2 (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))) (* -1 (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2)))))) (/ (* (+ 1 (pow (cos (neg lambda2)) 3)) (+ (sin (neg lambda2)) (* -2 (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))) 2))) (- (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (* -1/2 (cos (neg lambda2))))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2)))))))) (/ (* (cos (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))))) (+ (/ (* (+ 1 (pow (cos (neg lambda2)) 3)) (- (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (* -1/2 (cos (neg lambda2))))) (pow (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))) 2)) (/ (* (+ (sin (neg lambda2)) (* -2 (* (cos (neg lambda2)) (sin (neg lambda2))))) (- (+ (* -2 (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))) (* -1 (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2)))))) (/ (* (+ 1 (pow (cos (neg lambda2)) 3)) (+ (sin (neg lambda2)) (* -2 (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))) 2)))) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))))))) (/ (* (+ 1 (pow (cos (neg lambda2)) 3)) (+ (sin (neg lambda2)) (* -2 (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))) 2)))) (+ (/ 1 (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2)))) (/ (pow (cos (neg lambda2)) 3) (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2))))))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 3)) #s(hole binary64 (+ 1 (pow (cos (neg lambda2)) 3))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 3)) #s(hole binary64 (+ 1 (+ (* 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 (+ 1 (pow (cos (- lambda1 lambda2)) 3)) #s(hole binary64 (+ 1 (+ (* 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 (+ 1 (pow (cos (- lambda1 lambda2)) 3)) #s(hole binary64 (+ 1 (+ (* 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 (cos (- lambda1 lambda2)) 3) #s(hole binary64 (pow (cos (neg lambda2)) 3)))
#s(approx (pow (cos (- lambda1 lambda2)) 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)) 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)) 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 (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ 1 (pow (cos (neg lambda2)) 2)) (cos (neg lambda2)))))
#s(approx (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ 1 (+ (* lambda1 (+ (sin (neg lambda2)) (* -2 (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (cos (neg lambda2)) 2))) (cos (neg lambda2)))))
#s(approx (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ 1 (+ (* lambda1 (+ (sin (neg lambda2)) (+ (* -2 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* lambda1 (- (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (* -1/2 (cos (neg lambda2)))))))) (pow (cos (neg lambda2)) 2))) (cos (neg lambda2)))))
#s(approx (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ 1 (+ (* lambda1 (+ (sin (neg lambda2)) (+ (* -2 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* lambda1 (- (+ (* -1 (pow (cos (neg lambda2)) 2)) (+ (* lambda1 (+ (* -1/6 (sin (neg lambda2))) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (sin (neg lambda2)) 2))) (* -1/2 (cos (neg lambda2)))))))) (pow (cos (neg lambda2)) 2))) (cos (neg lambda2)))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (+ 1 (pow (cos (neg lambda2)) 2))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (+ 1 (+ (* -2 (* lambda1 (* (cos (neg lambda2)) (sin (neg lambda2))))) (pow (cos (neg lambda2)) 2)))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (+ 1 (+ (* 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 (+ 1 (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (+ 1 (+ (* 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 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (/ (- (* (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))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda1 (- (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (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))))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* lambda1 (- (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (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))))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (/ (* (+ (* (cos phi2) (* (cos (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (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)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 4)) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (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))))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* lambda1 (- (+ (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (* lambda1 (- (* -1/6 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (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))))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (/ (* (+ (* (cos phi2) (* (cos (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (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)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 4)) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (/ (* (+ (* -1/3 (* (cos phi2) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (- (* (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)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 4)) (+ (/ (* (+ (* (cos phi2) (* (cos (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (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))))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/6 (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))))) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (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))))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (/ (* (+ (* (cos phi2) (* (cos (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (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)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 4)) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (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))))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))) (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 (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (/ (- 1 (+ (* (cos phi2) (cos (neg lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))
#s(approx (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (- (+ (* lambda1 (- (* -1 (/ (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (+ (* (cos phi2) (cos (neg lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 3))))) (/ 1 (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (cos phi2) (cos (neg lambda2))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (- (+ (* lambda1 (- (+ (* -1 (/ (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (* lambda1 (- (* -1 (/ (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (+ (* (cos phi2) (cos (neg lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 3)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- 1 (+ (* (cos phi2) (cos (neg lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4)))))) (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (+ (* (cos phi2) (cos (neg lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 3))))) (/ 1 (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (cos phi2) (cos (neg lambda2))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (- (+ (* lambda1 (- (+ (* -1 (/ (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (* lambda1 (- (+ (* -1 (/ (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (* lambda1 (- (* -1 (/ (+ (* 1/6 (* (cos phi2) (sin (neg lambda2)))) (* (pow (cos phi2) 2) (+ (* -1 (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/6 (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (+ (* (cos phi2) (cos (neg lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 3)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- 1 (+ (* (cos phi2) (cos (neg lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (+ (/ (* (+ (* -1/3 (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (- 1 (+ (* (cos phi2) (cos (neg lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4)) (/ (* (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (* -1 (/ (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (+ (* (cos phi2) (cos (neg lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 3))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (+ (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (+ (* (cos phi2) (cos (neg lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 3)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- 1 (+ (* (cos phi2) (cos (neg lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4)))))) (* 2 (/ (* (cos phi2) (* (sin (neg lambda2)) (- 1 (+ (* (cos phi2) (cos (neg lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 3))))) (/ 1 (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (cos phi2) (cos (neg lambda2))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) #s(hole binary64 (- 1 (+ (* (cos phi2) (cos (neg lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))
#s(approx (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) #s(hole binary64 (- (+ 1 (* -1 (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))))) (+ (* (cos phi2) (cos (neg lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))
#s(approx (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) #s(hole binary64 (- (+ 1 (* lambda1 (- (* -1 (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))) (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))))) (+ (* (cos phi2) (cos (neg lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))
#s(approx (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) #s(hole binary64 (- (+ 1 (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (+ (* 1/6 (* (cos phi2) (sin (neg lambda2)))) (* (pow (cos phi2) 2) (+ (* -1 (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/6 (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))))) (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))) (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))))) (+ (* (cos phi2) (cos (neg lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* (cos phi2) (cos (neg lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (+ (* (cos phi2) (cos (neg lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))))) (+ (* (cos phi2) (cos (neg lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (+ (* lambda1 (+ (* 1/6 (* (cos phi2) (sin (neg lambda2)))) (* (pow (cos phi2) 2) (+ (* -1 (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/6 (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))))) (+ (* (cos phi2) (cos (neg lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))
#s(approx (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* -1 (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/6 (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* lambda1 (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* lambda1 (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* lambda1 (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* lambda1 (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* lambda1 (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/6 (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (pow (cos (neg lambda2)) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) #s(hole binary64 (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) #s(hole binary64 (+ (* 2 (* lambda1 (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) #s(hole binary64 (+ (* lambda1 (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* lambda1 (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) #s(hole binary64 (+ (* lambda1 (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* lambda1 (+ (* lambda1 (+ (* -1/3 (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (* lambda1 (- (* 2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))) (* 1/2 (/ 1 (- (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 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (* 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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))) (* 1/2 (/ 1 (- (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 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (* 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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))) (* 1/2 (/ 1 (- (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 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (neg lambda2)) 2)) (- (cos phi1) (cos (neg lambda2))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (cos (neg lambda2))))) (+ (* lambda1 (- (* 2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (sin (neg lambda2)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (* 1/2 (/ 1 (- (cos phi1) (cos (neg lambda2))))))) (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2)))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (cos (neg lambda2))))) (+ (* lambda1 (- (+ (* 2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (* lambda1 (- (* -1 (/ (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (cos (neg lambda2))))) (+ (* 1/2 (/ (* (cos (neg lambda2)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2))) (/ (* (sin (neg lambda2)) (- (* 2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (sin (neg lambda2)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (- (cos phi1) (cos (neg lambda2)))))))) (/ (* (sin (neg lambda2)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (* 1/2 (/ 1 (- (cos phi1) (cos (neg lambda2))))))) (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2)))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (cos (neg lambda2))))) (+ (* lambda1 (- (+ (* 2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (* lambda1 (- (+ (* -1 (/ (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (cos (neg lambda2))))) (* lambda1 (- (* -1 (/ (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (cos (neg lambda2))))) (+ (* -1/6 (/ (* (sin (neg lambda2)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2))) (+ (* 1/2 (/ (* (cos (neg lambda2)) (- (* 2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (sin (neg lambda2)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (sin (neg lambda2)) (- (* -1 (/ (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (cos (neg lambda2))))) (+ (* 1/2 (/ (* (cos (neg lambda2)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2))) (/ (* (sin (neg lambda2)) (- (* 2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (sin (neg lambda2)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (- (cos phi1) (cos (neg lambda2))))))) (- (cos phi1) (cos (neg lambda2))))))))) (+ (* 1/2 (/ (* (cos (neg lambda2)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2))) (/ (* (sin (neg lambda2)) (- (* 2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (sin (neg lambda2)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (- (cos phi1) (cos (neg lambda2)))))))) (/ (* (sin (neg lambda2)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (neg lambda2)) 2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (* 1/2 (/ 1 (- (cos phi1) (cos (neg lambda2))))))) (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2)))))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (neg lambda2)) 2))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* 2 (* lambda1 (* (cos (neg lambda2)) (sin (neg lambda2))))))) (pow (cos (neg lambda2)) 2))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* -2 (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (pow (cos (neg lambda2)) 2))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* -2 (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (pow (cos (neg lambda2)) 2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* lambda1 (- (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ (pow (cos phi1) 6) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* lambda1 (- (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4)))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (- (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ (pow (cos phi1) 6) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* lambda1 (- (+ (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* lambda1 (- (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -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))))))) (* 2 (* (pow (cos (neg lambda2)) 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 phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4)))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4)))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (- (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (- (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4)))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (- (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4)))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (- (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (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 phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ (pow (cos phi1) 6) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (* lambda1 (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4)))))) (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 6) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (/ (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (* lambda1 (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4)))))) (+ (* lambda1 (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 4 (* (cos phi2) (* (sin (neg lambda2)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))) (/ (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (+ (/ (* (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (- (* 2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 6) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 6) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (+ (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))))) (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 6) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (/ (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (* lambda1 (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4)))))) (+ (* lambda1 (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 4 (* (cos phi2) (* (sin (neg lambda2)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))) (/ (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (+ (* lambda1 (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/6 (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -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))))))) (* 2 (* (pow (cos (neg lambda2)) 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 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (* (pow (cos phi2) 3) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))))))) (+ (* -1/6 (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))))))))) (* 2 (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* -1/3 (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))) (+ (/ (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 4 (* (cos phi2) (* (sin (neg lambda2)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))) (/ (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (+ (* 4 (* (cos phi2) (* (sin (neg lambda2)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))))) (+ (/ (* (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (- (* 2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 6) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (+ (/ (* (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (- (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (+ (/ (* (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (- (* 2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 6) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 6) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 6) (+ (* -1/6 (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/6 (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (+ (/ (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 6) (+ (* 2 (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -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))))))) (* 2 (* (pow (cos (neg lambda2)) 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)))))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))))))) (+ (/ (* (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (- (* 2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 6) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 6) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (+ (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))))) (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 6) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (/ (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (* lambda1 (- (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4)))))) (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (* lambda1 (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4)))))) (* lambda1 (- (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 4 (* (cos phi2) (* (sin (neg lambda2)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))) (/ (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))))) (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (* lambda1 (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4)))))) (* lambda1 (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 4 (* (cos phi2) (* (sin (neg lambda2)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))) (/ (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (* lambda1 (- (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/6 (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -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))))))) (* 2 (* (pow (cos (neg lambda2)) 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 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (* (pow (cos phi2) 3) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))))))) (+ (* -1/6 (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))))))))) (* 2 (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* -1/3 (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))) (+ (/ (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 4 (* (cos phi2) (* (sin (neg lambda2)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))) (/ (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (+ (* 4 (* (cos phi2) (* (sin (neg lambda2)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))))) (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/6 (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))))))) (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))))) (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))
#s(approx (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) #s(hole binary64 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))))
#s(approx (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) #s(hole binary64 (+ (* lambda1 (* (pow phi1 2) (- (+ (* -3 (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4)))))) (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))))
#s(approx (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 4 (* (cos phi2) (* (sin (neg lambda2)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))) (/ (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (* (pow phi1 2) (- (+ (* -3 (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))))) (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))))
#s(approx (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/6 (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -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))))))) (* 2 (* (pow (cos (neg lambda2)) 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 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (* (pow (cos phi2) 3) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))))))) (+ (* -1/6 (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))))))))) (* 2 (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* -1/3 (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))) (+ (/ (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 4 (* (cos phi2) (* (sin (neg lambda2)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))) (/ (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (+ (* 4 (* (cos phi2) (* (sin (neg lambda2)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))))) (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 4 (* (cos phi2) (* (sin (neg lambda2)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))) (/ (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))))) (* (pow phi1 2) (- (+ (* -3 (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))))) (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))))
#s(approx (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) #s(hole binary64 (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))
#s(approx (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) #s(hole binary64 (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* lambda1 (- (+ (* -3 (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))))
#s(approx (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) #s(hole binary64 (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* lambda1 (- (+ (* -3 (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* lambda1 (- (+ (* -3 (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 4 (* (cos phi2) (* (sin (neg lambda2)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))) (/ (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))))
#s(approx (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) #s(hole binary64 (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* lambda1 (- (+ (* -3 (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* lambda1 (- (+ (* -3 (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* lambda1 (- (+ (* -3 (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/6 (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))))))))) (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -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))))))) (* 2 (* (pow (cos (neg lambda2)) 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 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (* (pow (cos phi2) 3) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))))))) (+ (* -1/6 (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))))))))) (* 2 (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* -1/3 (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))) (+ (/ (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 4 (* (cos phi2) (* (sin (neg lambda2)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))) (/ (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (+ (* 4 (* (cos phi2) (* (sin (neg lambda2)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 4 (* (cos phi2) (* (sin (neg lambda2)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))) (/ (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))))
#s(approx (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* -1 (* lambda1 (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))))) (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/6 (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* 1/2 (/ (* (cos phi2) (* (cos (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))))))) (+ (* -1 (/ (* (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))))) (+ (* -4 (/ (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (cos phi2) (sin (neg lambda2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* lambda1 (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))) (+ (* lambda1 (+ (* -1/6 (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) #s(hole binary64 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))
#s(approx (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) #s(hole binary64 (+ 1 (+ (* lambda1 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))))
#s(approx (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) #s(hole binary64 (+ 1 (+ (* lambda1 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (+ (* -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) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))))) (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))))
#s(approx (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) #s(hole binary64 (+ 1 (+ (* lambda1 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (+ (* -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) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 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) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))))))) (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))))
#s(approx (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) #s(hole binary64 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))
#s(approx (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) #s(hole binary64 (+ (* lambda1 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))
#s(approx (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) #s(hole binary64 (+ (* lambda1 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (+ (* -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) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))))) (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))
#s(approx (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) #s(hole binary64 (+ (* lambda1 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (+ (* -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) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 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) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))))))) (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))
#s(approx (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) #s(hole binary64 (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))
#s(approx (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) #s(hole binary64 (+ (* -4 (* lambda1 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))))) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))
#s(approx (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) #s(hole binary64 (+ (* lambda1 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* lambda1 (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))
#s(approx (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) #s(hole binary64 (+ (* lambda1 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))))) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))
#s(approx (pow (cos (- lambda1 lambda2)) 4) #s(hole binary64 (pow (cos (neg lambda2)) 4)))
#s(approx (pow (cos (- lambda1 lambda2)) 4) #s(hole binary64 (+ (* -4 (* lambda1 (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (pow (cos (neg lambda2)) 4))))
#s(approx (pow (cos (- lambda1 lambda2)) 4) #s(hole binary64 (+ (* lambda1 (+ (* -4 (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* lambda1 (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (pow (cos (neg lambda2)) 4))))
#s(approx (pow (cos (- lambda1 lambda2)) 4) #s(hole binary64 (+ (* lambda1 (+ (* -4 (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2)))) (* lambda1 (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (+ (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))) (* lambda1 (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))))))))))) (pow (cos (neg lambda2)) 4))))
#s(approx (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) #s(hole binary64 (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))
#s(approx (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) #s(hole binary64 (+ (* lambda1 (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))
#s(approx (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) #s(hole binary64 (+ (* lambda1 (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* lambda1 (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 4 (* (cos phi2) (* (sin (neg lambda2)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))) (/ (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))
#s(approx (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) #s(hole binary64 (+ (* lambda1 (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* lambda1 (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* lambda1 (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -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))))))) (* 2 (* (pow (cos (neg lambda2)) 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 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (* (pow (cos phi2) 3) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))))))) (+ (* -1/6 (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))))))))) (* 2 (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* -1/3 (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))) (+ (/ (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 4 (* (cos phi2) (* (sin (neg lambda2)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))) (/ (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (* (+ (* 4 (* (cos phi2) (* (sin (neg lambda2)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 4 (* (cos phi2) (* (sin (neg lambda2)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))) (/ (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ (* -2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (/ (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (* (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 4) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 4))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))
#s(approx (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) #s(hole binary64 (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))))
#s(approx (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) #s(hole binary64 (+ (* lambda1 (+ (* -2 (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))))) (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))))))
#s(approx (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) #s(hole binary64 (+ (* lambda1 (+ (* -2 (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))))) (+ (* lambda1 (+ (* -2 (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))))))) (+ (* -1 (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))))) (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))))) (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))))))
#s(approx (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) #s(hole binary64 (+ (* lambda1 (+ (* -2 (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))))) (+ (* lambda1 (+ (* -2 (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))))))) (+ (* -1 (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))))) (+ (* lambda1 (+ (* -2 (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2))))))))))) (+ (* -1 (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (+ (* 2 (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -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))))))) (* 2 (* (pow (cos (neg lambda2)) 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)))))))))))) (+ (* -1 (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))))) (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (* (pow (cos phi2) 3) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))))))) (+ (* -1/6 (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))))))) (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))))))) (* (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))))))
#s(approx (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) #s(hole binary64 (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))
#s(approx (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) #s(hole binary64 (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (+ (* lambda1 (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))))
#s(approx (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) #s(hole binary64 (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (+ (* lambda1 (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (+ (* lambda1 (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))))
#s(approx (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) #s(hole binary64 (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))) (+ (* lambda1 (+ (* -1/2 (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (+ (* lambda1 (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (+ (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (* lambda1 (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (* (pow (cos phi2) 3) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))))))) (+ (* -1/6 (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))))
#s(approx (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) #s(hole binary64 (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))
#s(approx (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) #s(hole binary64 (+ (* lambda1 (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))
#s(approx (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) #s(hole binary64 (+ (* lambda1 (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (+ (* lambda1 (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))
#s(approx (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) #s(hole binary64 (+ (* lambda1 (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (+ (* lambda1 (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (+ (* 2 (* (pow (cos phi2) 3) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (* lambda1 (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (* (pow (cos phi2) 3) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (+ (* -1/6 (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))) (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))))))) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))) (* (- 1 (* (cos phi2) (cos (neg lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))))
#s(approx (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) #s(hole binary64 (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) 2)))
#s(approx (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) #s(hole binary64 (- (+ (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* 2 (* lambda1 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) 2)))
#s(approx (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) #s(hole binary64 (- (+ (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* 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)))))))) 2)))
#s(approx (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) #s(hole binary64 (- (+ (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* lambda1 (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* lambda1 (+ (* -1 (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (* -1 (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))))))) 2)))
#s(approx (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))))
#s(approx (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* 2 (* lambda1 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))))
#s(approx (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* 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))))))))))
#s(approx (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ (* -1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* lambda1 (+ (* 2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* lambda1 (+ (* -1 (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (* -1 (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))))))))))
#s(approx (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))
#s(approx (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) #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 (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) #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 (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) #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 (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) #s(hole binary64 (- 1 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))))
#s(approx (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) #s(hole binary64 (- (+ 1 (* -2 (* lambda1 (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))))) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))))
#s(approx (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) #s(hole binary64 (- (+ 1 (* lambda1 (- (* -1 (* lambda1 (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))))) (* 2 (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))))))) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))))
#s(approx (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) #s(hole binary64 (- (+ 1 (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (* (pow (cos phi2) 6) (+ (* 2 (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -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))))))) (* 2 (* (pow (cos (neg lambda2)) 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) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))))) (* 2 (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))))))) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))))
#s(approx (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) #s(hole binary64 (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6))))
#s(approx (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) #s(hole binary64 (+ (* 2 (* lambda1 (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))))) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))))
#s(approx (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) #s(hole binary64 (+ (* lambda1 (+ (* 2 (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (* lambda1 (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))))) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))))
#s(approx (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) #s(hole binary64 (+ (* lambda1 (+ (* 2 (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 6) (+ (* 2 (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -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))))))) (* 2 (* (pow (cos (neg lambda2)) 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) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))))))) (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)))))
#s(approx (pow (cos (- lambda1 lambda2)) 6) #s(hole binary64 (pow (cos (neg lambda2)) 6)))
#s(approx (pow (cos (- lambda1 lambda2)) 6) #s(hole binary64 (+ (* 2 (* lambda1 (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (pow (cos (neg lambda2)) 6))))
#s(approx (pow (cos (- lambda1 lambda2)) 6) #s(hole binary64 (+ (* lambda1 (+ (* 2 (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* lambda1 (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))))) (pow (cos (neg lambda2)) 6))))
#s(approx (pow (cos (- lambda1 lambda2)) 6) #s(hole binary64 (+ (* lambda1 (+ (* 2 (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* lambda1 (+ (* 2 (* (pow (cos (neg lambda2)) 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))))))) (+ (* lambda1 (+ (* 2 (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -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))))))) (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2)))))) (pow (cos (neg lambda2)) 6))))
#s(approx (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))
#s(approx (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (* lambda1 (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))
#s(approx (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (* lambda1 (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (* lambda1 (+ (* 4 (* (cos phi2) (* (sin (neg lambda2)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))
#s(approx (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (* lambda1 (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (* lambda1 (+ (* 4 (* (cos phi2) (* (sin (neg lambda2)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (+ (* lambda1 (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))))))))) (* 2 (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2))))))))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* -1/3 (* (cos phi2) (* (sin (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (+ (* (cos phi2) (* (cos (neg lambda2)) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))))))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))
#s(approx (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) #s(hole binary64 (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2)))
#s(approx (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) #s(hole binary64 (+ (* 2 (* lambda1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2))))
#s(approx (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) #s(hole binary64 (+ (* lambda1 (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* lambda1 (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2))))) (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2))))
#s(approx (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) #s(hole binary64 (+ (* lambda1 (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* lambda1 (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (+ (* lambda1 (+ (* 2 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (+ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))))))))) (* 2 (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))))) (pow (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) 2)))))) (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2))))
#s(approx (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (/ (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda1 (- (* 2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 6) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda1 (- (+ (* 2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* lambda1 (- (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (+ (/ (* (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (- (* 2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 6) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 6) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 6) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda1 (- (+ (* 2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (* lambda1 (- (+ (* lambda1 (- (/ (* (pow (cos phi2) 6) (+ (* 2 (* (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -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))))))) (* 2 (* (pow (cos (neg lambda2)) 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)))))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (+ (/ (* (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (- (* 2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 6) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (+ (/ (* (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (- (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (+ (/ (* (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (- (* 2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 6) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 6) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 6) (+ (* -1/6 (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))) (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos (neg lambda2)) 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 (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) 2))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (+ (/ (* (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (- (* 2 (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 3) (+ (* -2 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (* -1 (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2))))))) (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 6) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 6) (+ (* 1/2 (* (cos phi2) (* (cos (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4))))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda2)) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* 4 (* (pow (cos (neg lambda2)) 2) (pow (sin (neg lambda2)) 2)))))) (- 1 (* (cos phi2) (cos (neg lambda2))))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (/ (* (pow (cos phi2) 6) (* (pow (cos (neg lambda2)) 6) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))))) (* (+ (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda2)) 3) (sin (neg lambda2))))) (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ (* (pow (cos phi2) 6) (pow (cos (neg lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (neg lambda2)) 4)))) (- 1 (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (/ (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))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (/ (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))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (/ (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (/ (* (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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 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) (- (* -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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) 2)) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) 3))) (+ (/ (* (- (* -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) (- (* -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 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)) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 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))))))) (/ (* (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 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) (- (* -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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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)))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) 2)) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (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) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (* (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (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)))))))) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) 3))) (+ (/ (* (- (* -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)))))) (+ (/ (* (- (* -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) (- (* -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) (* (pow (cos (neg lambda2)) 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))))) (- (+ (* (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) (- (* -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 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)) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 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))))))))) (/ (* (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))))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) 2)) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) 3))) (+ (/ (* (- (* -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) (- (* -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 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)) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 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))))))) (/ (* (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 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) (- (* -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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* -1 (/ (* lambda1 (* (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 phi1) 3) (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) 2)) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (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))))) (/ (* (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 phi1) 3) (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (/ (* (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) 2)) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (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) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (* (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (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)))))))) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) 2)) (pow (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (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))))) (/ (* (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 phi1) 3) (- (+ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* lambda1 (- (* -1 (/ (* (cos phi2) (sin (neg lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))) (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* lambda1 (- (+ (* -1 (/ (* (cos phi2) (sin (neg lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))) (* lambda1 (- (* -1/2 (/ (* (cos phi2) (cos (neg lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2))))) (- (* -1 (/ (* (cos phi2) (sin (neg lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))) (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* lambda1 (- (+ (* -1 (/ (* (cos phi2) (sin (neg lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))) (* lambda1 (- (+ (* -1/2 (/ (* (cos phi2) (cos (neg lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))) (* lambda1 (- (* 1/6 (/ (* (cos phi2) (sin (neg lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2))))) (- (* -1/2 (/ (* (cos phi2) (cos (neg lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))) (+ (/ (* (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2))))) (- (* -1 (/ (* (cos phi2) (sin (neg lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))) (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (+ (/ (* (- (* -1 (/ (* (cos phi2) (sin (neg lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))) (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)))) (- (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (* -1/2 (* (cos phi2) (cos (neg lambda2)))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))))))) (+ (/ (* (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2))))) (- (* -1 (/ (* (cos phi2) (sin (neg lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))) (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2)))) 2))))) (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* lambda1 (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* 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 phi2) (cos (neg lambda2))))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* 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 phi2) (sin (neg lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* -1/2 (* (cos phi2) (cos (neg lambda2))))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (+ (* -2 (* lambda1 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (+ (* 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 (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (+ (* 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 (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (* (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))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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) (- (* -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)))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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)))))) (+ (/ (* (- (* -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) (- (* -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) (* (pow (cos (neg lambda2)) 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))))) (/ (* (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) (- (* -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)))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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)))))) (+ (/ (* (- (* -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)))))) (+ (/ (* (- (* -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) (- (* -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) (* (pow (cos (neg lambda2)) 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))))) (- (+ (* (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) (- (* -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) (* (pow (cos (neg lambda2)) 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)))))) (/ (* (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))))))) (+ (/ (* (- (* -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) (- (* -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) (* (pow (cos (neg lambda2)) 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))))) (/ (* (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) (- (* -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)))))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) #s(hole binary64 (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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)))))
#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 phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (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))) (* -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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (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))))) (* 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 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* lambda1 (- (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* 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 phi2) (cos (neg lambda2))))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* 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 phi2) (sin (neg lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* -1/2 (* (cos phi2) (cos (neg lambda2))))))) (* -1 (* (cos phi2) (sin (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))))
#s(approx (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ 1 (+ (* -2 (* lambda1 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))))
#s(approx (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ 1 (+ (* 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 (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ 1 (+ (* 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 (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (cos lambda2)))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2)))) #s(hole binary64 (+ 1 (* -1/2 (pow lambda2 2)))))
#s(approx (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow lambda2 2)) (* lambda1 lambda2)))))
#s(approx (* lambda2 (+ lambda1 (* -1/2 lambda2))) #s(hole binary64 (* -1/2 (pow lambda2 2))))
#s(approx (* lambda2 (+ lambda1 (* -1/2 lambda2))) #s(hole binary64 (+ (* -1/2 (pow lambda2 2)) (* lambda1 lambda2))))
#s(approx (+ lambda1 (* -1/2 lambda2)) #s(hole binary64 (* -1/2 lambda2)))
#s(approx (+ lambda1 (* -1/2 lambda2)) #s(hole binary64 (+ lambda1 (* -1/2 lambda2))))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) #s(hole binary64 (cos lambda2)))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) #s(hole binary64 (/ (cos lambda2) lambda1)))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) #s(hole binary64 (/ (+ (cos lambda2) (* lambda1 (sin lambda2))) lambda1)))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) #s(hole binary64 (cos lambda2)))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) #s(hole binary64 (/ (cos lambda2) (pow lambda1 2))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) #s(hole binary64 (/ (+ (cos lambda2) (* lambda1 (sin lambda2))) (pow lambda1 2))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) #s(hole binary64 (/ (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))) (pow lambda1 2))))
#s(approx (- (/ 1 (pow lambda1 2)) 1/2) #s(hole binary64 (/ 1 (pow lambda1 2))))
#s(approx (- (/ 1 (pow lambda1 2)) 1/2) #s(hole binary64 (/ (+ 1 (* -1/2 (pow lambda1 2))) (pow lambda1 2))))
#s(approx (/ 1 (pow lambda1 2)) #s(hole binary64 (/ 1 (pow lambda1 2))))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) #s(hole binary64 (* -1 (/ (cos lambda2) (pow lambda1 2)))))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) #s(hole binary64 (/ (+ (* -1 (cos lambda2)) (* -1 (* lambda1 (sin lambda2)))) (pow lambda1 2))))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) #s(hole binary64 (* -1 (/ (cos lambda2) lambda1))))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) #s(hole binary64 (/ (+ (* -1 (cos lambda2)) (* -1 (* lambda1 (sin lambda2)))) lambda1)))
#s(approx (* -1 (/ (cos lambda2) lambda1)) #s(hole binary64 (* -1 (/ (cos lambda2) lambda1))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* -1 (/ (* lambda1 (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (* -1/2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (* -1/6 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 3))) (* 1/2 (/ (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))))) (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- 1 (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* -1 (/ (* lambda1 (* (cos phi2) (sin (neg lambda2)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (/ (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 3))) (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (/ (* (cos phi2) (sin (neg lambda2))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ 1 (- 1 (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -1 (/ (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 3))) (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (- 1 (* (cos phi2) (cos (neg lambda2)))))) (+ (* -1/2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 3))) (* -1/6 (/ (* (cos phi2) (sin (neg lambda2))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2))))))) (+ (* -1 (/ (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 3))) (* 1/2 (/ (* (cos phi2) (cos (neg lambda2))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))))) (/ (* (cos phi2) (sin (neg lambda2))) (pow (- 1 (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ 1 (- 1 (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (+ (* 1/2 (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (+ (* lambda1 (- (/ (* (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 (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (/ (* (cos phi2) (* (sin (neg lambda2)) (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (+ (* 1/2 (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (+ (* 1/2 (/ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (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)))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 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 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (- (* -2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2)))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (- (+ (* -2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (* lambda1 (- (+ (* -1 (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2))))) (/ (pow (sin (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2))))) (+ (* 1/2 (/ (pow (cos (neg lambda2)) 3) (pow (- (cos phi1) (cos (neg lambda2))) 2))) (/ (* (sin (neg lambda2)) (- (* -2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (- (cos phi1) (cos (neg lambda2)))))))) (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2)))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda1 (- (+ (* -2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (* lambda1 (- (+ (* -1 (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2))))) (+ (* lambda1 (- (+ (* 1/3 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (+ (* -1/6 (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (pow (- (cos phi1) (cos (neg lambda2))) 2))) (+ (* 1/2 (/ (* (cos (neg lambda2)) (- (* -2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (sin (neg lambda2)) (- (+ (* -1 (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2))))) (/ (pow (sin (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2))))) (+ (* 1/2 (/ (pow (cos (neg lambda2)) 3) (pow (- (cos phi1) (cos (neg lambda2))) 2))) (/ (* (sin (neg lambda2)) (- (* -2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (- (cos phi1) (cos (neg lambda2))))))) (- (cos phi1) (cos (neg lambda2)))))))) (/ (pow (sin (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2)))))) (+ (* 1/2 (/ (pow (cos (neg lambda2)) 3) (pow (- (cos phi1) (cos (neg lambda2))) 2))) (/ (* (sin (neg lambda2)) (- (* -2 (/ (* (cos (neg lambda2)) (sin (neg lambda2))) (- (cos phi1) (cos (neg lambda2))))) (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (- (cos phi1) (cos (neg lambda2)))))))) (/ (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))) (pow (- (cos phi1) (cos (neg lambda2))) 2)))) (/ (pow (cos (neg lambda2)) 2) (- (cos phi1) (cos (neg lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) #s(hole binary64 (+ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (pow (cos phi1) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (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 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ (* (pow (cos phi2) 3) (pow (cos (neg lambda2)) 3)) (pow (cos phi1) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ (* lambda1 (- (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* lambda1 (- (* 1/2 (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))) (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* lambda1 (- (+ (* 1/2 (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2))))) (* lambda1 (- (* -1/6 (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2))))) (* (pow (cos phi2) 2) (+ (* -1 (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/6 (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))) (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda1 (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2))))) (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda1 (+ (* 1/2 (* lambda1 (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))))) (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))))) (* 1/2 (* (pow (cos phi1) 2) (* (cos phi2) (cos (neg lambda2))))))) (* (pow (cos phi1) 2) (* (cos phi2) (sin (neg lambda2)))))) (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* -1 (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* -1/6 (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2))))) (+ (* (cos phi2) (* (sin (neg lambda2)) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (* (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos phi2) (* (cos (neg lambda2)) (pow (sin (neg lambda2)) 2)))) (+ (* 1/2 (* (cos phi2) (pow (cos (neg lambda2)) 3))) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (* (pow (cos (neg lambda2)) 2) (sin (neg lambda2)))))))) (* (pow (cos phi2) 2) (* (pow (cos (neg lambda2)) 2) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2)))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* 2 (* lambda1 (* (cos phi2) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda1 (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* lambda1 (+ (* (cos phi2) (* (cos (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2)))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda1 (+ (* 2 (* (cos phi2) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* lambda1 (+ (* lambda1 (+ (* -1/3 (* (cos phi2) (* (sin (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (+ (* (cos phi2) (* (cos (neg lambda2)) (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg lambda2)))) 2))))
#s(approx (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2) #s(hole binary64 (pow (- (cos phi1) (cos phi2)) 2)))
#s(approx (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2) #s(hole binary64 (+ (* (pow lambda1 2) (* (cos phi2) (- (cos phi1) (cos phi2)))) (pow (- (cos phi1) (cos phi2)) 2))))
#s(approx (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2) #s(hole binary64 (+ (* (pow lambda1 2) (+ (* (cos phi2) (- (cos phi1) (cos phi2))) (* (pow lambda1 2) (+ (* -1/12 (* (cos phi2) (- (cos phi1) (cos phi2)))) (* 1/4 (pow (cos phi2) 2)))))) (pow (- (cos phi1) (cos phi2)) 2))))
#s(approx (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2) #s(hole binary64 (+ (* (pow lambda1 2) (+ (* (cos phi2) (- (cos phi1) (cos phi2))) (* (pow lambda1 2) (+ (* -1/12 (* (cos phi2) (- (cos phi1) (cos phi2)))) (+ (* 1/4 (pow (cos phi2) 2)) (* (pow lambda1 2) (+ (* -1/24 (pow (cos phi2) 2)) (* 1/360 (* (cos phi2) (- (cos phi1) (cos phi2))))))))))) (pow (- (cos phi1) (cos phi2)) 2))))
#s(approx (- (cos phi1) (* (cos lambda1) (cos phi2))) #s(hole binary64 (- (cos phi1) (cos phi2))))
#s(approx (- (cos phi1) (* (cos lambda1) (cos phi2))) #s(hole binary64 (- (+ (cos phi1) (* 1/2 (* (pow lambda1 2) (cos phi2)))) (cos phi2))))
#s(approx (- (cos phi1) (* (cos lambda1) (cos phi2))) #s(hole binary64 (- (+ (cos phi1) (* (pow lambda1 2) (- (* -1/24 (* (pow lambda1 2) (cos phi2))) (* -1/2 (cos phi2))))) (cos phi2))))
#s(approx (- (cos phi1) (* (cos lambda1) (cos phi2))) #s(hole binary64 (- (+ (cos phi1) (* (pow lambda1 2) (- (* (pow lambda1 2) (- (* 1/720 (* (pow lambda1 2) (cos phi2))) (* 1/24 (cos phi2)))) (* -1/2 (cos phi2))))) (cos phi2))))
#s(approx (* (cos lambda1) (cos phi2)) #s(hole binary64 (cos phi2)))
#s(approx (* (cos lambda1) (cos phi2)) #s(hole binary64 (+ (cos phi2) (* -1/2 (* (pow lambda1 2) (cos phi2))))))
#s(approx (* (cos lambda1) (cos phi2)) #s(hole binary64 (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda1 2) (cos phi2))))))))
#s(approx (* (cos lambda1) (cos phi2)) #s(hole binary64 (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (cos phi2))) (* 1/24 (cos phi2)))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #s(hole binary64 (- (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))))
#s(approx (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #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 (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #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 (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #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 (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #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 (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (* 2 (log (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (+ (* -2 (/ (* lambda1 (sin (neg lambda2))) (cos (neg lambda2)))) (* 2 (log (* (cos phi2) (cos (neg lambda2))))))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (+ (* 2 (log (* (cos phi2) (cos (neg lambda2))))) (* lambda1 (+ (* -2 (/ (sin (neg lambda2)) (cos (neg lambda2)))) (* lambda1 (- (* -1 (/ (pow (sin (neg lambda2)) 2) (pow (cos (neg lambda2)) 2))) 1)))))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (+ (* 2 (log (* (cos phi2) (cos (neg lambda2))))) (* lambda1 (+ (* -2 (/ (sin (neg lambda2)) (cos (neg lambda2)))) (* lambda1 (- (+ (* -1 (/ (pow (sin (neg lambda2)) 2) (pow (cos (neg lambda2)) 2))) (* 1/3 (* lambda1 (+ (* -3 (/ (sin (neg lambda2)) (cos (neg lambda2)))) (+ (* -2 (/ (pow (sin (neg lambda2)) 3) (pow (cos (neg lambda2)) 3))) (/ (sin (neg lambda2)) (cos (neg lambda2)))))))) 1)))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (log (* (cos phi2) (cos (neg lambda2))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (+ (log (* (cos phi2) (cos (neg lambda2)))) (* -1 (/ (* lambda1 (sin (neg lambda2))) (cos (neg lambda2)))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (+ (log (* (cos phi2) (cos (neg lambda2)))) (* lambda1 (+ (* -1 (/ (sin (neg lambda2)) (cos (neg lambda2)))) (* 1/2 (* lambda1 (- (* -1 (/ (pow (sin (neg lambda2)) 2) (pow (cos (neg lambda2)) 2))) 1))))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (+ (log (* (cos phi2) (cos (neg lambda2)))) (* lambda1 (+ (* -1 (/ (sin (neg lambda2)) (cos (neg lambda2)))) (* lambda1 (+ (* 1/6 (* lambda1 (+ (* -3 (/ (sin (neg lambda2)) (cos (neg lambda2)))) (+ (* -2 (/ (pow (sin (neg lambda2)) 3) (pow (cos (neg lambda2)) 3))) (/ (sin (neg lambda2)) (cos (neg lambda2))))))) (* 1/2 (- (* -1 (/ (pow (sin (neg lambda2)) 2) (pow (cos (neg lambda2)) 2))) 1)))))))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (* -1 (pow lambda2 3))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (- (pow lambda1 3) (pow lambda2 3))))
#s(approx (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) #s(hole binary64 (* -1 (pow lambda2 3))))
#s(approx (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) #s(hole binary64 (+ (* -1 (pow lambda2 3)) (pow lambda1 3))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (pow lambda2 2)))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 lambda2) (pow lambda2 2))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ lambda1 lambda2)) (pow lambda2 2))))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) #s(hole binary64 (pow lambda2 2)))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) #s(hole binary64 (+ (* lambda1 lambda2) (pow lambda2 2))))
#s(approx (* lambda1 lambda2) #s(hole binary64 (* lambda1 lambda2)))
#s(approx (pow lambda1 3) #s(hole binary64 (pow lambda1 3)))
#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 (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 (* (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 (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ 1 (* (cos lambda2) (cos phi2)))))
#s(approx (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ 1 (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2))))))
#s(approx (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ 1 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))))
#s(approx (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ 1 (+ (* 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 (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 3)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) #s(hole binary64 (+ (pow lambda1 3) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 3))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 3)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (+ (* -1 (* lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (+ (* lambda1 (- lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) #s(hole binary64 (* -1 (* lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) #s(hole binary64 (* lambda1 (- 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))) lambda1) #s(hole binary64 (* lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (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 (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) #s(hole binary64 (* -1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2))))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) #s(hole binary64 (- (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2))))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) #s(hole binary64 (* -1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) #s(hole binary64 (- lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) #s(hole binary64 (* -1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) #s(hole binary64 (+ lambda1 (* -1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) #s(hole binary64 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))))
#s(approx (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) #s(hole binary64 (/ (+ lambda1 (* -1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) lambda1)))
#s(approx (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) #s(hole binary64 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))))
#s(approx (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) #s(hole binary64 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#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))) lambda1) 1) lambda1) #s(hole binary64 lambda1))
#s(approx (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) 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))) lambda1) 1) #s(hole binary64 1))
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) #s(hole binary64 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))))
#s(approx (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1) #s(hole binary64 1))
#s(approx (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1) #s(hole binary64 (+ 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 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (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 (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (- lambda1 lambda2)))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) lambda1) #s(hole binary64 lambda1))
#s(approx (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) lambda1) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))) lambda1)))))
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) #s(hole binary64 1))
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) #s(hole binary64 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))) lambda1))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 lambda1))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* lambda1 (- (+ 1 (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda2 2)) (pow lambda1 2)))) (/ lambda2 lambda1)))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* lambda1 (- (+ 1 (/ (* lambda2 (+ (* -1 (pow lambda2 2)) (pow lambda2 2))) (pow lambda1 3))) (+ (* -1 (/ (pow lambda2 2) (pow lambda1 2))) (+ (/ lambda2 lambda1) (/ (pow lambda2 2) (pow lambda1 2))))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos phi1) (cos (- lambda1 lambda2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) lambda1)))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))) lambda1)))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))))
#s(approx (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (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) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))) lambda1)))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) #s(hole binary64 (* lambda1 (cos (neg lambda2)))))
#s(approx (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) #s(hole binary64 (* lambda1 (+ (cos (neg lambda2)) (/ (sin (neg lambda2)) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))) lambda1)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))
#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 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))) lambda1)))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) #s(hole binary64 (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (cos (- lambda1 lambda2)))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) #s(hole binary64 (* -1 (* lambda1 (sin (neg lambda2))))))
#s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) #s(hole binary64 (* lambda1 (+ (* -1 (sin (neg lambda2))) (/ (cos (neg lambda2)) lambda1)))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (cos lambda1) #s(hole binary64 (cos lambda1)))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (sin (+ phi2 (* 1/2 (PI)))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (* (sin (+ phi2 (* 1/2 (PI)))) (sin (- lambda1 lambda2)))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (* lambda1 (cos lambda2))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (* lambda1 (+ (cos lambda2) (* -1 (/ (sin lambda2) lambda1))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) #s(hole binary64 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) #s(hole binary64 lambda1))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) #s(hole binary64 (* lambda1 (- (+ 1 (* 1/2 (/ (PI) lambda1))) (/ lambda2 lambda1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) lambda1)))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (pow (cos (- lambda1 lambda2)) 2) #s(hole binary64 (pow (cos (- lambda1 lambda2)) 2)))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (cos phi1) (cos (- lambda1 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 (sin lambda1) #s(hole binary64 (sin 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))
#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 (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) #s(hole binary64 (* -1/2 (* (pow lambda1 2) (cos (neg lambda2))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1 (/ (sin (neg lambda2)) lambda1)) (* -1/2 (cos (neg lambda2)))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) #s(hole binary64 (* (pow lambda1 2) (- (+ (* -1/2 (cos (neg lambda2))) (/ (cos (neg lambda2)) (pow lambda1 2))) (/ (sin (neg lambda2)) lambda1)))))
#s(approx (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))) #s(hole binary64 (* -1/2 (* (pow lambda1 2) (cos (neg lambda2))))))
#s(approx (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1 (/ (sin (neg lambda2)) lambda1)) (* -1/2 (cos (neg lambda2)))))))
#s(approx (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))) #s(hole binary64 (* -1/2 (* lambda1 (cos (neg lambda2))))))
#s(approx (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))) #s(hole binary64 (* lambda1 (+ (* -1 (/ (sin (neg lambda2)) lambda1)) (* -1/2 (cos (neg lambda2)))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) #s(hole binary64 (* 1/6 (* (pow lambda1 3) (sin (neg lambda2))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) #s(hole binary64 (* (pow lambda1 3) (+ (* -1/2 (/ (cos (neg lambda2)) lambda1)) (* 1/6 (sin (neg lambda2)))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) #s(hole binary64 (* (pow lambda1 3) (+ (* -1 (/ (sin (neg lambda2)) (pow lambda1 2))) (+ (* -1/2 (/ (cos (neg lambda2)) lambda1)) (* 1/6 (sin (neg lambda2))))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) #s(hole binary64 (* (pow lambda1 3) (- (+ (* -1/2 (/ (cos (neg lambda2)) lambda1)) (+ (* 1/6 (sin (neg lambda2))) (/ (cos (neg lambda2)) (pow lambda1 3)))) (/ (sin (neg lambda2)) (pow lambda1 2))))))
#s(approx (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) #s(hole binary64 (* 1/6 (* (pow lambda1 3) (sin (neg lambda2))))))
#s(approx (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) #s(hole binary64 (* (pow lambda1 3) (+ (* -1/2 (/ (cos (neg lambda2)) lambda1)) (* 1/6 (sin (neg lambda2)))))))
#s(approx (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) #s(hole binary64 (* (pow lambda1 3) (+ (* -1 (/ (sin (neg lambda2)) (pow lambda1 2))) (+ (* -1/2 (/ (cos (neg lambda2)) lambda1)) (* 1/6 (sin (neg lambda2))))))))
#s(approx (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))) #s(hole binary64 (* 1/6 (* (pow lambda1 2) (sin (neg lambda2))))))
#s(approx (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1/2 (/ (cos (neg lambda2)) lambda1)) (* 1/6 (sin (neg lambda2)))))))
#s(approx (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1 (/ (sin (neg lambda2)) (pow lambda1 2))) (+ (* -1/2 (/ (cos (neg lambda2)) lambda1)) (* 1/6 (sin (neg lambda2))))))))
#s(approx (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) #s(hole binary64 (* 1/6 (* (pow lambda1 2) (sin (neg lambda2))))))
#s(approx (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1/2 (/ (cos (neg lambda2)) lambda1)) (* 1/6 (sin (neg lambda2)))))))
#s(approx (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2))))) #s(hole binary64 (* 1/6 (* lambda1 (sin (neg lambda2))))))
#s(approx (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2))))) #s(hole binary64 (* lambda1 (+ (* -1/2 (/ (cos (neg lambda2)) lambda1)) (* 1/6 (sin (neg lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 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 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) 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 (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (* lambda1 (* (cos phi2) (sin lambda2)))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (* lambda1 (+ (* (cos phi2) (sin lambda2)) (/ (* (cos lambda2) (cos phi2)) lambda1)))))
#s(approx (+ (cos lambda2) (* lambda1 (sin lambda2))) #s(hole binary64 (* lambda1 (sin lambda2))))
#s(approx (+ (cos lambda2) (* lambda1 (sin lambda2))) #s(hole binary64 (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1)))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (* lambda1 (sin (+ lambda2 (* 1/2 (PI)))))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (* lambda1 (+ (sin (+ lambda2 (* 1/2 (PI)))) (* -1 (/ (sin lambda2) lambda1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) #s(hole binary64 (* lambda1 (cos lambda2))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) #s(hole binary64 (* lambda1 (+ (cos lambda2) (* -1 (/ (sin lambda2) lambda1))))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) #s(hole binary64 (* lambda1 (+ 1 (* -1/2 (pow lambda2 2))))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) #s(hole binary64 (* lambda1 (+ 1 (+ (* -1/2 (pow lambda2 2)) (/ (* lambda2 (- (* 1/6 (pow lambda2 2)) 1)) lambda1))))))
#s(approx (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)) #s(hole binary64 (* -1/2 (* lambda1 (pow lambda2 2)))))
#s(approx (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)) #s(hole binary64 (* lambda1 (+ (* -1/2 (pow lambda2 2)) (/ (* lambda2 (- (* 1/6 (pow lambda2 2)) 1)) lambda1)))))
#s(approx (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1) #s(hole binary64 (* -1/2 (* lambda1 lambda2))))
#s(approx (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1) #s(hole binary64 (* lambda1 (- (+ (* -1/2 lambda2) (* 1/6 (/ (pow lambda2 2) lambda1))) (/ 1 lambda1)))))
#s(approx (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) #s(hole binary64 (* -1/2 (* lambda1 lambda2))))
#s(approx (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) #s(hole binary64 (* lambda1 (+ (* -1/2 lambda2) (* 1/6 (/ (pow lambda2 2) lambda1))))))
#s(approx (+ (* -1/2 lambda1) (* 1/6 lambda2)) #s(hole binary64 (* -1/2 lambda1)))
#s(approx (+ (* -1/2 lambda1) (* 1/6 lambda2)) #s(hole binary64 (* lambda1 (- (* 1/6 (/ lambda2 lambda1)) 1/2))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (- (* lambda1 (cos lambda2)) (sin lambda2)) #s(hole binary64 (* lambda1 (cos lambda2))))
#s(approx (- (* lambda1 (cos lambda2)) (sin lambda2)) #s(hole binary64 (* lambda1 (+ (cos lambda2) (* -1 (/ (sin lambda2) lambda1))))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) #s(hole binary64 (* 1/2 (* (pow lambda1 2) (sin lambda2)))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) #s(hole binary64 (* (pow lambda1 2) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))))))
#s(approx (* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))) #s(hole binary64 (* 1/2 (* (pow lambda1 2) (sin lambda2)))))
#s(approx (* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))) #s(hole binary64 (* (pow lambda1 2) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))))
#s(approx (* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))))))
#s(approx (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) #s(hole binary64 (* 1/2 (sin lambda2))))
#s(approx (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) #s(hole binary64 (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))))
#s(approx (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) #s(hole binary64 (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))))
#s(approx (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)) #s(hole binary64 (* 1/2 (sin lambda2))))
#s(approx (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)) #s(hole binary64 (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* -1/2 (* (pow lambda1 2) (cos lambda2)))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (/ (sin lambda2) lambda1)))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (+ (/ (cos lambda2) (pow lambda1 2)) (/ (sin lambda2) lambda1))))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (* -1/2 (* lambda1 (cos lambda2)))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (* lambda1 (+ (* -1/2 (cos lambda2)) (/ (sin lambda2) lambda1)))))
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) #s(hole binary64 (* 1/2 (* (pow lambda1 2) (sin lambda2)))))
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) #s(hole binary64 (* (pow lambda1 2) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) #s(hole binary64 (* 1/2 (* lambda1 (sin lambda2)))))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) #s(hole binary64 (* lambda1 (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))))
#s(approx (* lambda1 (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) #s(hole binary64 (* 1/2 (* lambda1 (sin lambda2)))))
#s(approx (* lambda1 (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) #s(hole binary64 (* lambda1 (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (cos phi2)))))
#s(approx (+ 1 (* -1/2 (* lambda1 lambda1))) #s(hole binary64 (* -1/2 (pow lambda1 2))))
#s(approx (+ 1 (* -1/2 (* lambda1 lambda1))) #s(hole binary64 (* (pow lambda1 2) (- (/ 1 (pow lambda1 2)) 1/2))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) #s(hole binary64 (* 1/24 (pow lambda1 4))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) #s(hole binary64 (* (pow lambda1 4) (- 1/24 (* 1/2 (/ 1 (pow lambda1 2)))))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) #s(hole binary64 (* (pow lambda1 4) (- (+ 1/24 (/ 1 (pow lambda1 4))) (* 1/2 (/ 1 (pow lambda1 2)))))))
#s(approx (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2)) #s(hole binary64 (* 1/24 (pow lambda1 4))))
#s(approx (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2)) #s(hole binary64 (* (pow lambda1 4) (- 1/24 (* 1/2 (/ 1 (pow lambda1 2)))))))
#s(approx (- (* 1/24 (* lambda1 lambda1)) 1/2) #s(hole binary64 (* 1/24 (pow lambda1 2))))
#s(approx (- (* 1/24 (* lambda1 lambda1)) 1/2) #s(hole binary64 (* (pow lambda1 2) (- 1/24 (* 1/2 (/ 1 (pow lambda1 2)))))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) #s(hole binary64 (* -1/720 (pow lambda1 6))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) #s(hole binary64 (* (pow lambda1 6) (- (* 1/24 (/ 1 (pow lambda1 2))) 1/720))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) #s(hole binary64 (* (pow lambda1 6) (- (* 1/24 (/ 1 (pow lambda1 2))) (+ 1/720 (/ 1/2 (pow lambda1 4)))))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) #s(hole binary64 (* (pow lambda1 6) (- (+ (* 1/24 (/ 1 (pow lambda1 2))) (/ 1 (pow lambda1 6))) (+ 1/720 (/ 1/2 (pow lambda1 4)))))))
#s(approx (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) #s(hole binary64 (* -1/720 (pow lambda1 6))))
#s(approx (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) #s(hole binary64 (* (pow lambda1 6) (- (* 1/24 (/ 1 (pow lambda1 2))) 1/720))))
#s(approx (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) #s(hole binary64 (* (pow lambda1 6) (- (* 1/24 (/ 1 (pow lambda1 2))) (+ 1/720 (/ 1/2 (pow lambda1 4)))))))
#s(approx (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) #s(hole binary64 (* -1/720 (pow lambda1 4))))
#s(approx (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) #s(hole binary64 (* (pow lambda1 4) (- (* 1/24 (/ 1 (pow lambda1 2))) 1/720))))
#s(approx (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) #s(hole binary64 (* (pow lambda1 4) (- (* 1/24 (/ 1 (pow lambda1 2))) (+ 1/720 (/ 1/2 (pow lambda1 4)))))))
#s(approx (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) #s(hole binary64 (* -1/720 (pow lambda1 4))))
#s(approx (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) #s(hole binary64 (* (pow lambda1 4) (- (* 1/24 (/ 1 (pow lambda1 2))) 1/720))))
#s(approx (+ 1/24 (* -1/720 (* lambda1 lambda1))) #s(hole binary64 (* -1/720 (pow lambda1 2))))
#s(approx (+ 1/24 (* -1/720 (* lambda1 lambda1))) #s(hole binary64 (* (pow lambda1 2) (- (* 1/24 (/ 1 (pow lambda1 2))) 1/720))))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) #s(hole binary64 lambda1))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))))
#s(approx (* lambda1 (- (pow lambda2 -1) (pow lambda1 -1))) #s(hole binary64 (/ lambda1 lambda2)))
#s(approx (* lambda1 (- (pow lambda2 -1) (pow lambda1 -1))) #s(hole binary64 (* lambda1 (- (/ 1 lambda2) (/ 1 lambda1)))))
#s(approx (- (pow lambda2 -1) (pow lambda1 -1)) #s(hole binary64 (/ 1 lambda2)))
#s(approx (- (pow lambda2 -1) (pow lambda1 -1)) #s(hole binary64 (- (/ 1 lambda2) (/ 1 lambda1))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 lambda1))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* lambda1 (- (+ 1 (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda2 2)) (pow lambda1 2)))) (/ lambda2 lambda1)))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* lambda1 (- (+ 1 (/ (* lambda2 (+ (* -1 (pow lambda2 2)) (pow lambda2 2))) (pow lambda1 3))) (+ (* -1 (/ (pow lambda2 2) (pow lambda1 2))) (+ (/ lambda2 lambda1) (/ (pow lambda2 2) (pow lambda1 2))))))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (/ lambda1 lambda2)))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (* lambda1 (- (/ 1 lambda2) (/ 1 lambda1)))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (* lambda1 (- (+ (* -1 (/ (+ lambda2 (* -1 lambda2)) (pow lambda1 2))) (/ 1 lambda2)) (/ 1 lambda1)))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (* lambda1 (- (+ (/ 1 lambda2) (/ (* lambda2 (+ lambda2 (* -1 lambda2))) (pow lambda1 3))) (+ (* -1 (/ lambda2 (pow lambda1 2))) (+ (/ 1 lambda1) (/ lambda2 (pow lambda1 2))))))))
#s(approx (- (pow (/ lambda1 lambda2) 3) 1) #s(hole binary64 (/ (pow lambda1 3) (pow lambda2 3))))
#s(approx (- (pow (/ lambda1 lambda2) 3) 1) #s(hole binary64 (* (pow lambda1 3) (- (/ 1 (pow lambda2 3)) (/ 1 (pow lambda1 3))))))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) #s(hole binary64 (/ (pow lambda1 2) (pow lambda2 2))))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) #s(hole binary64 (* (pow lambda1 2) (+ (/ 1 (* lambda1 lambda2)) (/ 1 (pow lambda2 2))))))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) #s(hole binary64 (* (pow lambda1 2) (+ (/ 1 (* lambda1 lambda2)) (+ (/ 1 (pow lambda1 2)) (/ 1 (pow lambda2 2)))))))
#s(approx (+ 1 (* (/ lambda1 lambda2) 1)) #s(hole binary64 (/ lambda1 lambda2)))
#s(approx (+ 1 (* (/ lambda1 lambda2) 1)) #s(hole binary64 (* lambda1 (+ (/ 1 lambda1) (/ 1 lambda2)))))
#s(approx (* lambda1 (+ (/ 1 lambda1) (/ 1 lambda2))) #s(hole binary64 (/ lambda1 lambda2)))
#s(approx (* lambda1 (+ (/ 1 lambda1) (/ 1 lambda2))) #s(hole binary64 (* lambda1 (+ (/ 1 lambda1) (/ 1 lambda2)))))
#s(approx (+ (/ 1 lambda1) (/ 1 lambda2)) #s(hole binary64 (/ 1 lambda2)))
#s(approx (+ (/ 1 lambda1) (/ 1 lambda2)) #s(hole binary64 (+ (/ 1 lambda1) (/ 1 lambda2))))
#s(approx (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) #s(hole binary64 lambda1))
#s(approx (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))))
#s(approx (+ 1 (* -1 (/ lambda2 lambda1))) #s(hole binary64 1))
#s(approx (+ 1 (* -1 (/ lambda2 lambda1))) #s(hole binary64 (+ 1 (* -1 (/ lambda2 lambda1)))))
#s(approx (+ 1 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) #s(hole binary64 (+ 1 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))
#s(approx (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) #s(hole binary64 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))
#s(approx (- (+ lambda1 (* 1/2 (PI))) lambda2) #s(hole binary64 lambda1))
#s(approx (- (+ lambda1 (* 1/2 (PI))) lambda2) #s(hole binary64 (* lambda1 (- (+ 1 (* 1/2 (/ (PI) lambda1))) (/ lambda2 lambda1)))))
#s(approx (+ lambda1 (* 1/2 (PI))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (* 1/2 (PI))) #s(hole binary64 (* lambda1 (+ 1 (* 1/2 (/ (PI) lambda1))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (/ (- 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #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 (/ (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 3)) #s(hole binary64 (+ 1 (pow (cos (- lambda1 lambda2)) 3))))
#s(approx (pow (cos (- lambda1 lambda2)) 3) #s(hole binary64 (pow (cos (- lambda1 lambda2)) 3)))
#s(approx (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (+ 1 (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) lambda1)))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))
#s(approx (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))
#s(approx (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) #s(hole binary64 (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) #s(hole binary64 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) lambda1)))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) #s(hole binary64 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))))
#s(approx (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) #s(hole binary64 (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))))
#s(approx (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) #s(hole binary64 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))))
#s(approx (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) #s(hole binary64 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))
#s(approx (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) #s(hole binary64 (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))
#s(approx (pow (cos (- lambda1 lambda2)) 4) #s(hole binary64 (pow (cos (- lambda1 lambda2)) 4)))
#s(approx (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) #s(hole binary64 (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))
#s(approx (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) #s(hole binary64 (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))))))
#s(approx (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) #s(hole binary64 (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)))))
#s(approx (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) #s(hole binary64 (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))))
#s(approx (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) #s(hole binary64 (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)))
#s(approx (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) #s(hole binary64 (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))))
#s(approx (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) #s(hole binary64 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))))
#s(approx (pow (cos (- lambda1 lambda2)) 6) #s(hole binary64 (pow (cos (- lambda1 lambda2)) 6)))
#s(approx (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))
#s(approx (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) #s(hole binary64 (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2)))
#s(approx (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (/ (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (/ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (/ (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (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 (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) #s(hole binary64 (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (cos (- lambda1 lambda2)))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (* lambda1 (sin lambda2))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1)))))
#s(approx (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2)))) #s(hole binary64 (* lambda1 lambda2)))
#s(approx (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2)))) #s(hole binary64 (* lambda1 (+ lambda2 (+ (* -1/2 (/ (pow lambda2 2) lambda1)) (/ 1 lambda1))))))
#s(approx (* lambda2 (+ lambda1 (* -1/2 lambda2))) #s(hole binary64 (* lambda1 lambda2)))
#s(approx (* lambda2 (+ lambda1 (* -1/2 lambda2))) #s(hole binary64 (* lambda1 (+ lambda2 (* -1/2 (/ (pow lambda2 2) lambda1))))))
#s(approx (+ lambda1 (* -1/2 lambda2)) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (* -1/2 lambda2)) #s(hole binary64 (* lambda1 (+ 1 (* -1/2 (/ lambda2 lambda1))))))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) #s(hole binary64 (* lambda1 (sin lambda2))))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) #s(hole binary64 (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1)))))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) #s(hole binary64 (sin lambda2)))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) #s(hole binary64 (+ (sin lambda2) (/ (cos lambda2) lambda1))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) #s(hole binary64 (* -1/2 (* (pow lambda1 2) (cos lambda2)))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (/ (sin lambda2) lambda1)))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (+ (/ (cos lambda2) (pow lambda1 2)) (/ (sin lambda2) lambda1))))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) #s(hole binary64 (* -1/2 (cos lambda2))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) #s(hole binary64 (+ (* -1/2 (cos lambda2)) (/ (sin lambda2) lambda1))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) #s(hole binary64 (+ (* -1/2 (cos lambda2)) (+ (/ (cos lambda2) (pow lambda1 2)) (/ (sin lambda2) lambda1)))))
#s(approx (- (/ 1 (pow lambda1 2)) 1/2) #s(hole binary64 -1/2))
#s(approx (- (/ 1 (pow lambda1 2)) 1/2) #s(hole binary64 (- (/ 1 (pow lambda1 2)) 1/2)))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) #s(hole binary64 (* -1 (/ (sin lambda2) lambda1))))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) #s(hole binary64 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) #s(hole binary64 (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1)))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) #s(hole binary64 (+ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (pow (cos phi1) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (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 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)) (pow (cos phi1) 3))))
#s(approx (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (pow (- (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))
#s(approx (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2) #s(hole binary64 (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))
#s(approx (- (cos phi1) (* (cos lambda1) (cos phi2))) #s(hole binary64 (- (cos phi1) (* (cos lambda1) (cos phi2)))))
#s(approx (* (cos lambda1) (cos phi2)) #s(hole binary64 (* (cos lambda1) (cos phi2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #s(hole binary64 (- (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (* 2 (log (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (log (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (pow lambda1 3)))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (* (pow lambda1 3) (+ 1 (* -1 (/ (pow lambda2 3) (pow lambda1 3)))))))
#s(approx (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) #s(hole binary64 (pow lambda1 3)))
#s(approx (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) #s(hole binary64 (* (pow lambda1 3) (+ 1 (* -1 (/ (pow lambda2 3) (pow lambda1 3)))))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (pow lambda1 2)))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (* (pow lambda1 2) (+ 1 (/ lambda2 lambda1)))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (* (pow lambda1 2) (+ 1 (+ (/ lambda2 lambda1) (/ (pow lambda2 2) (pow lambda1 2)))))))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) #s(hole binary64 (* lambda1 lambda2)))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) #s(hole binary64 (* lambda1 (+ lambda2 (/ (pow lambda2 2) 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))
#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 (* (cos lambda1) (sin lambda2)) #s(hole binary64 (* (cos lambda1) (sin lambda2))))
#s(approx (+ 1 (* (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 (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 lambda1))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (* lambda1 (- (+ 1 (* -1 (/ (+ (* -1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)) (pow lambda1 2)))) (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (* lambda1 (- (+ 1 (* -1 (/ (* (+ (* -1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (pow lambda1 3)))) (+ (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) (+ (* -1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2))) (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2))))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) #s(hole binary64 (pow lambda1 3)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) #s(hole binary64 (* (pow lambda1 3) (+ 1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 3) (pow lambda1 3))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (pow lambda1 2)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (* (pow lambda1 2) (- (+ 1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2))) (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) #s(hole binary64 (pow lambda1 2)))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))))))
#s(approx (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) #s(hole binary64 lambda1))
#s(approx (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) #s(hole binary64 (pow lambda1 2)))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)))))))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) #s(hole binary64 lambda1))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))))))
#s(approx (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) #s(hole binary64 lambda1))
#s(approx (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))))))
#s(approx (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) #s(hole binary64 1))
#s(approx (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) #s(hole binary64 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #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))) lambda1) 1) 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))) lambda1) 1) #s(hole binary64 (+ 1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1))))
#s(approx (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1) #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 (* (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 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (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 (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) #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))) #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 (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) lambda1) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))) lambda1)) 1)))))
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) #s(hole binary64 (+ 1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))) lambda1))))
#s(approx (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) #s(hole binary64 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))) lambda1)))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (cos (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (+ (* -1 lambda2) (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda2 2)) lambda1))) lambda1)) 1)))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (+ (* -1 lambda2) (* -1 (/ (+ (* -1 (/ (* lambda2 (+ (* -1 (pow lambda2 2)) (pow lambda2 2))) lambda1)) (+ (* -1 (pow lambda2 2)) (pow lambda2 2))) lambda1))) lambda1)) 1)))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (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))))) (* (cos (* 1/2 (PI))) (sin phi1))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (+ (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi1) (+ (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (* (cos (* 1/2 (PI))) (sin phi1)))))
#s(approx (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (sin (neg (+ lambda2 (* -1 lambda1)))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (sin (neg (+ lambda2 (* -1 lambda1)))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (* (sin (neg (+ lambda2 (* -1 lambda1)))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (cos (neg lambda2))) (* -1 (/ (sin (neg lambda2)) lambda1)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (cos (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))
#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 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI))))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) #s(hole binary64 (+ 1 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) #s(hole binary64 (* -1 (* lambda1 (+ (sin (neg lambda2)) (* -1 (/ (cos (neg lambda2)) lambda1)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (neg (+ lambda2 (* -1 lambda1)))) (* -1/2 (* (pow phi2 2) (sin (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))))
#s(approx (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (cos lambda2)) (/ (sin lambda2) lambda1))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (sin (- (* 1/2 (PI)) (+ lambda2 (* -1 lambda1))))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (+ lambda2 (* -1 lambda1))))))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (- (* 1/2 (PI)) lambda2) lambda1)) 1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (/ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (/ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (/ (* (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 (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (- (pow (cos phi1) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (- (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (pow (cos phi1) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))))
#s(approx (pow (cos (- lambda1 lambda2)) 2) #s(hole binary64 (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (cos phi1) (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 (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1 (/ (+ (sin (neg lambda2)) (* -1 (/ (cos (neg lambda2)) lambda1))) lambda1)) (* -1/2 (cos (neg lambda2)))))))
#s(approx (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))) #s(hole binary64 (* -1 (* lambda1 (+ (* 1/2 (cos (neg lambda2))) (/ (sin (neg lambda2)) lambda1))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) #s(hole binary64 (* -1 (* (pow lambda1 3) (+ (* -1/6 (sin (neg lambda2))) (* 1/2 (/ (cos (neg lambda2)) lambda1)))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) #s(hole binary64 (* -1 (* (pow lambda1 3) (+ (* -1 (/ (+ (* -1 (/ (sin (neg lambda2)) lambda1)) (* -1/2 (cos (neg lambda2)))) lambda1)) (* -1/6 (sin (neg lambda2))))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) #s(hole binary64 (* -1 (* (pow lambda1 3) (+ (* -1 (/ (+ (* -1 (/ (+ (sin (neg lambda2)) (* -1 (/ (cos (neg lambda2)) lambda1))) lambda1)) (* -1/2 (cos (neg lambda2)))) lambda1)) (* -1/6 (sin (neg lambda2))))))))
#s(approx (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) #s(hole binary64 (* -1 (* (pow lambda1 3) (+ (* -1/6 (sin (neg lambda2))) (* 1/2 (/ (cos (neg lambda2)) lambda1)))))))
#s(approx (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) #s(hole binary64 (* -1 (* (pow lambda1 3) (+ (* -1 (/ (+ (* -1 (/ (sin (neg lambda2)) lambda1)) (* -1/2 (cos (neg lambda2)))) lambda1)) (* -1/6 (sin (neg lambda2))))))))
#s(approx (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1 (/ (+ (* 1/2 (cos (neg lambda2))) (/ (sin (neg lambda2)) lambda1)) lambda1)) (* 1/6 (sin (neg lambda2)))))))
#s(approx (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2))))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1/6 (sin (neg lambda2))) (* 1/2 (/ (cos (neg lambda2)) lambda1)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (* (cos phi2) (sin lambda2))) (* -1 (/ (* (cos lambda2) (cos phi2)) lambda1)))))))
#s(approx (+ (cos lambda2) (* lambda1 (sin lambda2))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1)))))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (sin (+ lambda2 (* 1/2 (PI))))) (/ (sin lambda2) lambda1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (sin (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (sin (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (cos lambda2)) (/ (sin lambda2) lambda1))))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) #s(hole binary64 (* -1 (* lambda1 (- (* 1/2 (pow lambda2 2)) 1)))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) #s(hole binary64 (* -1 (* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* 1/6 (pow lambda2 2)) 1)) lambda1)) (* 1/2 (pow lambda2 2))) 1)))))
#s(approx (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (/ (* lambda2 (- (* 1/6 (pow lambda2 2)) 1)) lambda1)) (* 1/2 (pow lambda2 2)))))))
#s(approx (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (/ (- (* 1/6 (pow lambda2 2)) 1) lambda1)) (* 1/2 lambda2))))))
#s(approx (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1/6 (/ (pow lambda2 2) lambda1)) (* 1/2 lambda2))))))
#s(approx (+ (* -1/2 lambda1) (* 1/6 lambda2)) #s(hole binary64 (* -1 (* lambda1 (+ 1/2 (* -1/6 (/ lambda2 lambda1)))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (- (* lambda1 (cos lambda2)) (sin lambda2)) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (cos lambda2)) (/ (sin lambda2) lambda1))))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (cos lambda2)) (/ (sin lambda2) lambda1)) lambda1)) (* 1/2 (sin lambda2))))))
#s(approx (* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (cos lambda2)) (/ (sin lambda2) lambda1)) lambda1)) (* 1/2 (sin lambda2))))))
#s(approx (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (cos lambda2)) (/ (sin lambda2) lambda1)) lambda1)) (* 1/2 (sin lambda2)))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (/ (sin lambda2) lambda1)) (* 1/2 (cos lambda2)))))))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (/ (cos lambda2) lambda1)) (* -1/2 (sin lambda2)))))))
#s(approx (* lambda1 (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (/ (cos lambda2) lambda1)) (* -1/2 (sin lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (* -1 (/ (+ (* -1 (pow lambda1 3)) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) #s(hole binary64 (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))))
#s(approx (* lambda1 (- (pow lambda2 -1) (pow lambda1 -1))) #s(hole binary64 (* -1 (* lambda1 (- (/ 1 lambda1) (/ 1 lambda2))))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (+ (* -1 lambda2) (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda2 2)) lambda1))) lambda1)) 1)))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (+ (* -1 lambda2) (* -1 (/ (+ (* -1 (/ (* lambda2 (+ (* -1 (pow lambda2 2)) (pow lambda2 2))) lambda1)) (+ (* -1 (pow lambda2 2)) (pow lambda2 2))) lambda1))) lambda1)) 1)))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (* -1 (* lambda1 (- (/ 1 lambda1) (/ 1 lambda2))))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (- (* -1 (/ (+ lambda2 (* -1 lambda2)) lambda1)) 1) lambda1)) (/ 1 lambda2))))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (- (* -1 (/ (+ lambda2 (+ (* -1 lambda2) (* -1 (/ (* lambda2 (+ lambda2 (* -1 lambda2))) lambda1)))) lambda1)) 1) lambda1)) (/ 1 lambda2))))))
#s(approx (- (pow (/ lambda1 lambda2) 3) 1) #s(hole binary64 (* -1 (* (pow lambda1 3) (- (/ 1 (pow lambda1 3)) (/ 1 (pow lambda2 3)))))))
#s(approx (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) #s(hole binary64 (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))))
#s(approx (+ 1 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) #s(hole binary64 (+ 1 (sin (- (* 1/2 (PI)) (+ lambda2 (* -1 lambda1)))))))
#s(approx (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) #s(hole binary64 (sin (- (* 1/2 (PI)) (+ lambda2 (* -1 lambda1))))))
#s(approx (- (+ lambda1 (* 1/2 (PI))) lambda2) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (- (* 1/2 (PI)) lambda2) lambda1)) 1)))))
#s(approx (+ lambda1 (* 1/2 (PI))) #s(hole binary64 (* -1 (* lambda1 (- (* -1/2 (/ (PI) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (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))))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi1) (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (* (cos (* 1/2 (PI))) (sin phi1)))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (/ (- 1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- 1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (/ (+ 1 (* (pow (cos phi2) 3) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 3))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (/ (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (+ 1 (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 3)) (- (+ 1 (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 3)) #s(hole binary64 (+ 1 (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 3))))
#s(approx (pow (cos (- lambda1 lambda2)) 3) #s(hole binary64 (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 3)))
#s(approx (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ 1 (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (cos (neg (+ lambda2 (* -1 lambda1)))))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (+ 1 (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* (pow (cos phi2) 2) (* (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) 2))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* (pow (cos phi2) 2) (* (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) 2)))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* (pow (cos phi2) 2) (* (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))) (pow (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) 2))))
#s(approx (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (/ (- 1 (+ (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (* (pow (cos phi2) 2) (* (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2) (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))) (pow (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) 2))))
#s(approx (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) #s(hole binary64 (- 1 (+ (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (* (pow (cos phi2) 2) (* (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2) (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (* (pow (cos phi2) 2) (* (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2) (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))))
#s(approx (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* (pow (cos phi2) 2) (* (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2) (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))))
#s(approx (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (* (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2) (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) #s(hole binary64 (pow (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) 2)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (- (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)))) (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4))))) (* (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)))) (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))) (/ (* (pow (cos phi2) 6) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)))) (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)))) (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4))))) (* (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)))) (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))))
#s(approx (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) #s(hole binary64 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)))) (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4))))) (* (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) 2)))))))
#s(approx (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) #s(hole binary64 (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)))) (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4))))) (* (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) 2))))))
#s(approx (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)))) (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))))
#s(approx (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)))) (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) #s(hole binary64 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4))))))
#s(approx (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) #s(hole binary64 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)))))
#s(approx (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) #s(hole binary64 (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4))))
#s(approx (pow (cos (- lambda1 lambda2)) 4) #s(hole binary64 (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)))
#s(approx (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) #s(hole binary64 (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4))))) (* (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) 2)))))
#s(approx (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) #s(hole binary64 (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4))))) (* (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 6))))))
#s(approx (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) #s(hole binary64 (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4))))) (* (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) 2)))))
#s(approx (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) #s(hole binary64 (* (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) 2))))
#s(approx (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) #s(hole binary64 (- (* -1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) 2)))
#s(approx (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (* -1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)))))
#s(approx (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))))
#s(approx (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) #s(hole binary64 (- 1 (* (pow (cos phi2) 6) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 6)))))
#s(approx (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) #s(hole binary64 (* (pow (cos phi2) 6) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 6))))
#s(approx (pow (cos (- lambda1 lambda2)) 6) #s(hole binary64 (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 6)))
#s(approx (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) 2))))
#s(approx (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) #s(hole binary64 (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)))) 2)))
#s(approx (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (/ (* (pow (cos phi2) 6) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 4)))) (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) #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 phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))) (/ (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))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (/ (* (pow (cos phi2) 3) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 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)))))))) (/ (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (/ (* (pow (cos phi2) 3) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 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)))))))) (/ (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (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 (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (* (pow (cos phi2) 3) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 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 (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) #s(hole binary64 (* (pow (cos phi2) 3) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 3))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ 1 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1)))))))
#s(approx (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2)))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 lambda2) (* -1 (/ (+ 1 (* -1/2 (pow lambda2 2))) lambda1)))))))
#s(approx (* lambda2 (+ lambda1 (* -1/2 lambda2))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 lambda2) (* 1/2 (/ (pow lambda2 2) lambda1)))))))
#s(approx (+ lambda1 (* -1/2 lambda2)) #s(hole binary64 (* -1 (* lambda1 (- (* 1/2 (/ lambda2 lambda1)) 1)))))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1)))))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) #s(hole binary64 (* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) #s(hole binary64 (* -1 (/ (+ (sin lambda2) (/ (cos lambda2) lambda1)) lambda1))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- 1 (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2) (- (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) #s(hole binary64 (+ (* (pow (cos phi2) 3) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 3)) (pow (cos phi1) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (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 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ (* (pow (cos phi2) 3) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 3)) (pow (cos phi1) 3))))
#s(approx (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (* (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (pow (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) 2)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #s(hole binary64 (- (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (* 2 (log (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (log (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (* -1 (* (pow lambda1 3) (- (/ (pow lambda2 3) (pow lambda1 3)) 1)))))
#s(approx (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) #s(hole binary64 (* -1 (* (pow lambda1 3) (- (/ (pow lambda2 3) (pow lambda1 3)) 1)))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -1 (/ (+ (* -1 lambda2) (* -1 (/ (pow lambda2 2) lambda1))) lambda1))))))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 lambda2) (* -1 (/ (pow lambda2 2) 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 (* -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 (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 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 (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (- (+ (* -1 (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2) lambda1)) (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2) lambda1)) (* -1 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))) lambda1)) 1)))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (- (* -1 (/ (- (* -1 (/ (* (+ (* -1 (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2)) (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2)) (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))) lambda1)) (+ (* -1 (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2)) (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2))) lambda1)) (* -1 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))) lambda1)) 1)))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) #s(hole binary64 (* -1 (* (pow lambda1 3) (- (* -1 (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 3) (pow lambda1 3))) 1)))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 3)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -1 (/ (- (* -1 (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2) lambda1)) (* -1 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))) lambda1))))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2)))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -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))) lambda1) #s(hole binary64 (* lambda1 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))))
#s(approx (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) #s(hole binary64 (* (pow lambda1 2) (+ 1 (* -1 (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2) (pow lambda1 2)))))))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) #s(hole binary64 (* -1 (* lambda1 (- (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1) 1)))))
#s(approx (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) #s(hole binary64 (* -1 (* lambda1 (- (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1) 1)))))
#s(approx (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) #s(hole binary64 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)))))
#s(approx (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) #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 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) #s(hole binary64 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 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 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos lambda1) (cos phi2)))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* 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 (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (+ (* (cos (- 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (cos phi2)))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (cos lambda1)))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (cos lambda1) (* lambda2 (sin lambda1)))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos lambda1) (cos phi1))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* lambda2 (sin lambda1))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1))))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1))))))))
#s(approx (cos (neg lambda2)) #s(hole binary64 1))
#s(approx (cos (neg lambda2)) #s(hole binary64 (+ 1 (* -1/2 (pow lambda2 2)))))
#s(approx (cos (neg lambda2)) #s(hole binary64 (+ 1 (* (pow lambda2 2) (- (* 1/24 (pow lambda2 2)) 1/2)))))
#s(approx (cos (neg lambda2)) #s(hole binary64 (+ 1 (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/24 (* -1/720 (pow lambda2 2)))) 1/2)))))
#s(approx (neg lambda2) #s(hole binary64 (* -1 lambda2)))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/6 (* lambda2 (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))) (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (* lambda2 (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/6 (* lambda2 (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))) (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi1) (+ (* (cos lambda1) (cos phi2)) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (+ (* (cos lambda1) (cos phi2)) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (cos phi2)) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin 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)) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (* (cos lambda1) (cos phi2)) (* (cos (* 1/2 (PI))) (sin phi1)))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (* lambda2 (* (cos phi2) (sin lambda1))) (+ (* (cos lambda1) (cos phi2)) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (cos phi2)) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) #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)) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/2 (* lambda2 (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))) (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* lambda2 (+ (* -1/2 (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* 1/6 (* lambda2 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))))) (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (sin (neg lambda2)) #s(hole binary64 (* -1 lambda2)))
#s(approx (sin (neg lambda2)) #s(hole binary64 (* lambda2 (- (* 1/6 (pow lambda2 2)) 1))))
#s(approx (sin (neg lambda2)) #s(hole binary64 (* lambda2 (- (* (pow lambda2 2) (+ 1/6 (* -1/120 (pow lambda2 2)))) 1))))
#s(approx (sin (neg lambda2)) #s(hole binary64 (* lambda2 (- (* (pow lambda2 2) (+ 1/6 (* (pow lambda2 2) (- (* 1/5040 (pow lambda2 2)) 1/120)))) 1))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (sin lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* 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)))))) (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/6 (* 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)))))) (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) #s(hole binary64 lambda1))
#s(approx (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) #s(hole binary64 (+ lambda1 (* lambda2 (- (* -1/2 (* lambda1 lambda2)) 1)))))
#s(approx (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) #s(hole binary64 (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)))))
#s(approx (* lambda1 (cos (neg lambda2))) #s(hole binary64 lambda1))
#s(approx (* lambda1 (cos (neg lambda2))) #s(hole binary64 (+ lambda1 (* -1/2 (* lambda1 (pow lambda2 2))))))
#s(approx (* lambda1 (cos (neg lambda2))) #s(hole binary64 (+ lambda1 (* (pow lambda2 2) (+ (* -1/2 lambda1) (* 1/24 (* lambda1 (pow lambda2 2))))))))
#s(approx (* lambda1 (cos (neg lambda2))) #s(hole binary64 (+ lambda1 (* (pow lambda2 2) (+ (* -1/2 lambda1) (* (pow lambda2 2) (+ (* -1/720 (* lambda1 (pow lambda2 2))) (* 1/24 lambda1))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (cos phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos lambda1) (cos phi2))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (- (/ lambda1 lambda2) 1) #s(hole binary64 (/ (+ lambda1 (* -1 lambda2)) lambda2)))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/6 (* lambda2 (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))))) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) #s(hole binary64 (+ 1 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) #s(hole binary64 (+ 1 (+ (* lambda2 (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/6 (* lambda2 (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))))) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (+ (* lambda2 (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/6 (* lambda2 (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))))) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos lambda1) (cos phi2))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (+ (* 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 (+ 1 (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (cos lambda1))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (+ (cos lambda1) (* lambda2 (sin lambda1))))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1))))))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1))))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1/2 (pow phi1 2)) (* (cos lambda1) (cos phi2)))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1/2 (pow phi1 2)) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1/2 (pow phi1 2)) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1/2 (pow phi1 2)) (+ (* 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 (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) #s(hole binary64 1))
#s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) #s(hole binary64 (+ 1 (* lambda1 lambda2))))
#s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) #s(hole binary64 (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2))))))
#s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) #s(hole binary64 (+ 1 (* lambda2 (+ lambda1 (* lambda2 (- (* -1/6 (* lambda1 lambda2)) 1/2)))))))
#s(approx (* -1 (* lambda1 (sin (neg lambda2)))) #s(hole binary64 (* lambda1 lambda2)))
#s(approx (* -1 (* lambda1 (sin (neg lambda2)))) #s(hole binary64 (* lambda2 (+ lambda1 (* -1/6 (* lambda1 (pow lambda2 2)))))))
#s(approx (* -1 (* lambda1 (sin (neg lambda2)))) #s(hole binary64 (* lambda2 (+ lambda1 (* (pow lambda2 2) (+ (* -1/6 lambda1) (* 1/120 (* lambda1 (pow lambda2 2)))))))))
#s(approx (* -1 (* lambda1 (sin (neg lambda2)))) #s(hole binary64 (* lambda2 (+ lambda1 (* (pow lambda2 2) (+ (* -1/6 lambda1) (* (pow lambda2 2) (+ (* -1/5040 (* lambda1 (pow lambda2 2))) (* 1/120 lambda1)))))))))
#s(approx (* lambda1 (sin (neg lambda2))) #s(hole binary64 (* -1 (* lambda1 lambda2))))
#s(approx (* lambda1 (sin (neg lambda2))) #s(hole binary64 (* lambda2 (+ (* -1 lambda1) (* 1/6 (* lambda1 (pow lambda2 2)))))))
#s(approx (* lambda1 (sin (neg lambda2))) #s(hole binary64 (* lambda2 (+ (* -1 lambda1) (* (pow lambda2 2) (+ (* -1/120 (* lambda1 (pow lambda2 2))) (* 1/6 lambda1)))))))
#s(approx (* lambda1 (sin (neg lambda2))) #s(hole binary64 (* lambda2 (+ (* -1 lambda1) (* (pow lambda2 2) (+ (* 1/6 lambda1) (* (pow lambda2 2) (+ (* -1/120 lambda1) (* 1/5040 (* lambda1 (pow lambda2 2)))))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/6 (* lambda2 (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))))) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos 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)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (* (sin lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* (cos 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)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* 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)))))) (* (cos 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)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/6 (* 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)))))) (* (cos lambda1) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin lambda1) (* -1/2 (* (pow phi2 2) (sin lambda1))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin lambda1) (+ (* -1/2 (* (pow phi2 2) (sin lambda1))) (* lambda2 (+ (* -1 (cos lambda1)) (* 1/2 (* (pow phi2 2) (cos lambda1)))))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin lambda1) (+ (* -1/2 (* (pow phi2 2) (sin lambda1))) (* lambda2 (+ (* -1 (cos lambda1)) (+ (* 1/2 (* (pow phi2 2) (cos lambda1))) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/4 (* (pow phi2 2) (sin lambda1))))))))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin lambda1) (+ (* -1/2 (* (pow phi2 2) (sin lambda1))) (* lambda2 (+ (* -1 (cos lambda1)) (+ (* 1/2 (* (pow phi2 2) (cos lambda1))) (* lambda2 (+ (* -1/2 (sin lambda1)) (+ (* 1/4 (* (pow phi2 2) (sin lambda1))) (* lambda2 (+ (* -1/12 (* (pow phi2 2) (cos lambda1))) (* 1/6 (cos lambda1))))))))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))) (* -1/2 (* lambda2 (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))))) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI)))))) (* lambda2 (+ (* -1/2 (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI)))))) (* 1/6 (* lambda2 (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))))))))) (* (sin lambda1) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (* -1 (* lambda2 (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (* lambda2 (+ (* -1 (sin (+ phi2 (* 1/2 (PI))))) (* 1/6 (* (pow lambda2 2) (sin (+ phi2 (* 1/2 (PI))))))))))
#s(approx (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (* lambda2 (+ (* -1 (sin (+ phi2 (* 1/2 (PI))))) (* (pow lambda2 2) (+ (* -1/120 (* (pow lambda2 2) (sin (+ phi2 (* 1/2 (PI)))))) (* 1/6 (sin (+ phi2 (* 1/2 (PI)))))))))))
#s(approx (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (* lambda2 (+ (* -1 (sin (+ phi2 (* 1/2 (PI))))) (* (pow lambda2 2) (+ (* 1/6 (sin (+ phi2 (* 1/2 (PI))))) (* (pow lambda2 2) (+ (* -1/120 (sin (+ phi2 (* 1/2 (PI))))) (* 1/5040 (* (pow lambda2 2) (sin (+ phi2 (* 1/2 (PI))))))))))))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 lambda1))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ lambda1 (* lambda2 (- (* -1/2 (* lambda1 lambda2)) 1)))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (cos phi2))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* -1/2 (* (pow lambda2 2) (cos phi2)))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda2 2) (cos phi2)))))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (cos phi2))) (* 1/24 (cos phi2))))))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (sin (+ lambda1 (* 1/2 (PI))))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* -1 (* lambda2 (* (cos phi2) (cos (+ lambda1 (* 1/2 (PI))))))) (* (cos phi2) (sin (+ lambda1 (* 1/2 (PI)))))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* -1 (* (cos phi2) (cos (+ lambda1 (* 1/2 (PI)))))) (* -1/2 (* lambda2 (* (cos phi2) (sin (+ lambda1 (* 1/2 (PI))))))))) (* (cos phi2) (sin (+ lambda1 (* 1/2 (PI)))))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* -1 (* (cos phi2) (cos (+ lambda1 (* 1/2 (PI)))))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin (+ lambda1 (* 1/2 (PI)))))) (* 1/6 (* lambda2 (* (cos phi2) (cos (+ lambda1 (* 1/2 (PI))))))))))) (* (cos phi2) (sin (+ lambda1 (* 1/2 (PI)))))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) #s(hole binary64 (sin (+ lambda1 (* 1/2 (PI))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ lambda1 (* 1/2 (PI)))) (* -1 (* lambda2 (cos (+ lambda1 (* 1/2 (PI)))))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ lambda1 (* 1/2 (PI)))) (* lambda2 (+ (* -1 (cos (+ lambda1 (* 1/2 (PI))))) (* -1/2 (* lambda2 (sin (+ lambda1 (* 1/2 (PI)))))))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ lambda1 (* 1/2 (PI)))) (* lambda2 (+ (* -1 (cos (+ lambda1 (* 1/2 (PI))))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 (* 1/2 (PI))))) (* 1/6 (* lambda2 (cos (+ lambda1 (* 1/2 (PI)))))))))))))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) #s(hole binary64 (+ lambda1 (* 1/2 (PI)))))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) #s(hole binary64 (+ lambda1 (+ (* -1 lambda2) (* 1/2 (PI))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (/ (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda2 (- (* -1 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (/ (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -1 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* lambda2 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* -1 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* 1/2 (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (+ (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (/ (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -1 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* lambda2 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* -1 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (* 1/2 (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* lambda2 (- (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (/ (* (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 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* 1/2 (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (* 1/6 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (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 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (+ (* 1/6 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1)))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (+ (/ (* (cos phi2) (* (sin lambda1) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (+ (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (/ (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 (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (- (pow (cos phi1) 2) (pow (cos lambda1) 2)) (- (cos phi1) (cos lambda1)))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda2 (- (* -2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (sin lambda1) (- (pow (cos phi1) 2) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos lambda1)))) (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* lambda2 (- (* -1 (/ (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (cos lambda1)))) (+ (* -1 (/ (* (sin lambda1) (- (* -2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (sin lambda1) (- (pow (cos phi1) 2) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))) (- (cos phi1) (cos lambda1)))) (* 1/2 (/ (* (cos lambda1) (- (pow (cos phi1) 2) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))))) (* -1 (/ (* (sin lambda1) (- (pow (cos phi1) 2) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos lambda1)))) (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* lambda2 (- (+ (* -1 (/ (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (cos lambda1)))) (* lambda2 (- (* -1 (/ (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))) (- (cos phi1) (cos lambda1)))) (+ (* -1 (/ (* (sin lambda1) (- (* -1 (/ (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (cos lambda1)))) (+ (* -1 (/ (* (sin lambda1) (- (* -2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (sin lambda1) (- (pow (cos phi1) 2) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))) (- (cos phi1) (cos lambda1)))) (* 1/2 (/ (* (cos lambda1) (- (pow (cos phi1) 2) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2)))))) (- (cos phi1) (cos lambda1)))) (+ (* 1/6 (/ (* (sin lambda1) (- (pow (cos phi1) 2) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))) (* 1/2 (/ (* (cos lambda1) (- (* -2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (sin lambda1) (- (pow (cos phi1) 2) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))) (- (cos phi1) (cos lambda1))))))))) (+ (* -1 (/ (* (sin lambda1) (- (* -2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (sin lambda1) (- (pow (cos phi1) 2) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))) (- (cos phi1) (cos lambda1)))) (* 1/2 (/ (* (cos lambda1) (- (pow (cos phi1) 2) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))))) (* -1 (/ (* (sin lambda1) (- (pow (cos phi1) 2) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos lambda1)))) (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1))))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (pow (cos phi1) 2) (pow (cos lambda1) 2))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ (* -2 (* lambda2 (* (cos lambda1) (sin lambda1)))) (pow (cos phi1) 2)) (pow (cos lambda1) 2))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ (* lambda2 (- (* -1 (* lambda2 (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 2 (* (cos lambda1) (sin lambda1))))) (pow (cos phi1) 2)) (pow (cos lambda1) 2))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 2 (* (cos lambda1) (sin lambda1))))) (pow (cos phi1) 2)) (pow (cos lambda1) 2))))
#s(approx (pow (cos (- lambda1 lambda2)) 2) #s(hole binary64 (pow (cos lambda1) 2)))
#s(approx (pow (cos (- lambda1 lambda2)) 2) #s(hole binary64 (+ (* 2 (* lambda2 (* (cos lambda1) (sin lambda1)))) (pow (cos lambda1) 2))))
#s(approx (pow (cos (- lambda1 lambda2)) 2) #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 (pow (cos (- lambda1 lambda2)) 2) #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 phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (cos phi1) (cos lambda1))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ (cos phi1) (* -1 (* lambda2 (sin lambda1)))) (cos lambda1))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ (cos phi1) (* lambda2 (+ (* -1 (sin lambda1)) (* 1/2 (* lambda2 (cos lambda1)))))) (cos lambda1))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ (cos phi1) (* lambda2 (+ (* -1 (sin lambda1)) (* lambda2 (- (* 1/6 (* lambda2 (sin lambda1))) (* -1/2 (cos lambda1))))))) (cos lambda1))))
#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 (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 (* (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 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 (* (+ (* (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 lambda2) (cos phi1)) #s(hole binary64 (+ 1 (cos phi1))))
#s(approx (+ (cos lambda2) (cos phi1)) #s(hole binary64 (+ 1 (+ (cos phi1) (* -1/2 (pow lambda2 2))))))
#s(approx (+ (cos lambda2) (cos phi1)) #s(hole binary64 (+ 1 (+ (cos phi1) (* (pow lambda2 2) (- (* 1/24 (pow lambda2 2)) 1/2))))))
#s(approx (+ (cos lambda2) (cos phi1)) #s(hole binary64 (+ 1 (+ (cos phi1) (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/24 (* -1/720 (pow lambda2 2)))) 1/2))))))
#s(approx (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 (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) #s(hole binary64 (+ 1 (* -1/2 (pow lambda1 2)))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda1 lambda2)))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ lambda1 (* lambda2 (- (* 1/4 (pow lambda1 2)) 1/2))))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ lambda1 (* lambda2 (- (+ (* -1/6 (* lambda1 lambda2)) (* 1/4 (pow lambda1 2))) 1/2))))))))
#s(approx (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))) #s(hole binary64 (* -1/2 (pow lambda1 2))))
#s(approx (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))) #s(hole binary64 (+ (* -1/2 (pow lambda1 2)) (* lambda1 lambda2))))
#s(approx (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))) #s(hole binary64 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ lambda1 (* 1/4 (* (pow lambda1 2) lambda2)))))))
#s(approx (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))) #s(hole binary64 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ lambda1 (* lambda2 (+ (* -1/6 (* lambda1 lambda2)) (* 1/4 (pow lambda1 2)))))))))
#s(approx (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))) #s(hole binary64 (* -1/2 lambda1)))
#s(approx (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))) #s(hole binary64 (+ lambda2 (* -1/2 lambda1))))
#s(approx (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ 1 (* 1/4 (* lambda1 lambda2)))))))
#s(approx (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ 1 (* lambda2 (+ (* -1/6 lambda2) (* 1/4 lambda1))))))))
#s(approx (* -1/2 (* lambda1 (cos (neg lambda2)))) #s(hole binary64 (* -1/2 lambda1)))
#s(approx (* -1/2 (* lambda1 (cos (neg lambda2)))) #s(hole binary64 (+ (* -1/2 lambda1) (* 1/4 (* lambda1 (pow lambda2 2))))))
#s(approx (* -1/2 (* lambda1 (cos (neg lambda2)))) #s(hole binary64 (+ (* -1/2 lambda1) (* (pow lambda2 2) (+ (* -1/48 (* lambda1 (pow lambda2 2))) (* 1/4 lambda1))))))
#s(approx (* -1/2 (* lambda1 (cos (neg lambda2)))) #s(hole binary64 (+ (* -1/2 lambda1) (* (pow lambda2 2) (+ (* 1/4 lambda1) (* (pow lambda2 2) (+ (* -1/48 lambda1) (* 1/1440 (* lambda1 (pow lambda2 2))))))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) #s(hole binary64 (+ 1 (* -1/2 (pow lambda1 2)))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda1 (* lambda2 (+ 1 (* -1/6 (pow lambda1 2)))))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ (* lambda1 (+ 1 (* -1/6 (pow lambda1 2)))) (* lambda2 (- (* 1/4 (pow lambda1 2)) 1/2))))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ (* lambda1 (+ 1 (* -1/6 (pow lambda1 2)))) (* lambda2 (- (+ (* 1/4 (pow lambda1 2)) (* lambda1 (* lambda2 (- (* 1/36 (pow lambda1 2)) 1/6)))) 1/2))))))))
#s(approx (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) #s(hole binary64 (* -1/2 (pow lambda1 2))))
#s(approx (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) #s(hole binary64 (+ (* -1/2 (pow lambda1 2)) (* lambda1 (* lambda2 (+ 1 (* -1/6 (pow lambda1 2))))))))
#s(approx (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) #s(hole binary64 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ (* 1/4 (* (pow lambda1 2) lambda2)) (* lambda1 (+ 1 (* -1/6 (pow lambda1 2)))))))))
#s(approx (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) #s(hole binary64 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ (* lambda1 (+ 1 (* -1/6 (pow lambda1 2)))) (* lambda2 (+ (* 1/4 (pow lambda1 2)) (* lambda1 (* lambda2 (- (* 1/36 (pow lambda1 2)) 1/6))))))))))
#s(approx (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))) #s(hole binary64 (* -1/2 lambda1)))
#s(approx (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ 1 (* -1/6 (pow lambda1 2)))))))
#s(approx (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ 1 (+ (* -1/6 (pow lambda1 2)) (* 1/4 (* lambda1 lambda2))))))))
#s(approx (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ 1 (+ (* -1/6 (pow lambda1 2)) (* lambda2 (+ (* 1/4 lambda1) (* lambda2 (- (* 1/36 (pow lambda1 2)) 1/6))))))))))
#s(approx (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) #s(hole binary64 (* -1/2 lambda1)))
#s(approx (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) #s(hole binary64 (+ (* -1/2 lambda1) (* -1/6 (* (pow lambda1 2) lambda2)))))
#s(approx (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ (* -1/6 (pow lambda1 2)) (* 1/4 (* lambda1 lambda2)))))))
#s(approx (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ (* -1/6 (pow lambda1 2)) (* lambda2 (+ (* 1/36 (* (pow lambda1 2) lambda2)) (* 1/4 lambda1))))))))
#s(approx (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2))))) #s(hole binary64 -1/2))
#s(approx (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2))))) #s(hole binary64 (- (* -1/6 (* lambda1 lambda2)) 1/2)))
#s(approx (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2))))) #s(hole binary64 (- (* lambda2 (+ (* -1/6 lambda1) (* 1/4 lambda2))) 1/2)))
#s(approx (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2))))) #s(hole binary64 (- (* lambda2 (+ (* -1/6 lambda1) (* lambda2 (+ 1/4 (* 1/36 (* lambda1 lambda2)))))) 1/2)))
#s(approx (* 1/6 (* lambda1 (sin (neg lambda2)))) #s(hole binary64 (* -1/6 (* lambda1 lambda2))))
#s(approx (* 1/6 (* lambda1 (sin (neg lambda2)))) #s(hole binary64 (* lambda2 (+ (* -1/6 lambda1) (* 1/36 (* lambda1 (pow lambda2 2)))))))
#s(approx (* 1/6 (* lambda1 (sin (neg lambda2)))) #s(hole binary64 (* lambda2 (+ (* -1/6 lambda1) (* (pow lambda2 2) (+ (* -1/720 (* lambda1 (pow lambda2 2))) (* 1/36 lambda1)))))))
#s(approx (* 1/6 (* lambda1 (sin (neg lambda2)))) #s(hole binary64 (* lambda2 (+ (* -1/6 lambda1) (* (pow lambda2 2) (+ (* 1/36 lambda1) (* (pow lambda2 2) (+ (* -1/720 lambda1) (* 1/30240 (* lambda1 (pow lambda2 2)))))))))))
#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 (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (cos phi2)))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (+ (cos phi2) (* lambda1 (* lambda2 (cos phi2))))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (+ (cos phi2) (* lambda2 (+ (* -1/2 (* lambda2 (cos phi2))) (* lambda1 (cos phi2)))))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (+ (cos phi2) (* lambda2 (+ (* lambda1 (cos phi2)) (* lambda2 (+ (* -1/2 (cos phi2)) (* -1/6 (* lambda1 (* lambda2 (cos phi2)))))))))))
#s(approx (+ (cos lambda2) (* lambda1 (sin lambda2))) #s(hole binary64 1))
#s(approx (+ (cos lambda2) (* lambda1 (sin lambda2))) #s(hole binary64 (+ 1 (* lambda1 lambda2))))
#s(approx (+ (cos lambda2) (* lambda1 (sin lambda2))) #s(hole binary64 (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2))))))
#s(approx (+ (cos lambda2) (* lambda1 (sin lambda2))) #s(hole binary64 (+ 1 (* lambda2 (+ lambda1 (* lambda2 (- (* -1/6 (* lambda1 lambda2)) 1/2)))))))
#s(approx (* lambda1 (sin lambda2)) #s(hole binary64 (* lambda1 lambda2)))
#s(approx (* lambda1 (sin lambda2)) #s(hole binary64 (* lambda2 (+ lambda1 (* -1/6 (* lambda1 (pow lambda2 2)))))))
#s(approx (* lambda1 (sin lambda2)) #s(hole binary64 (* lambda2 (+ lambda1 (* (pow lambda2 2) (+ (* -1/6 lambda1) (* 1/120 (* lambda1 (pow lambda2 2)))))))))
#s(approx (* lambda1 (sin lambda2)) #s(hole binary64 (* lambda2 (+ lambda1 (* (pow lambda2 2) (+ (* -1/6 lambda1) (* (pow lambda2 2) (+ (* -1/5040 (* lambda1 (pow lambda2 2))) (* 1/120 lambda1)))))))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (* lambda1 (sin (* 1/2 (PI))))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ (* lambda1 (sin (* 1/2 (PI)))) (* lambda2 (- (* lambda1 (cos (* 1/2 (PI)))) 1)))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ (* lambda1 (sin (* 1/2 (PI)))) (* lambda2 (- (+ (* -1/2 (* lambda1 (* lambda2 (sin (* 1/2 (PI)))))) (* lambda1 (cos (* 1/2 (PI))))) 1)))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (+ (* lambda1 (sin (* 1/2 (PI)))) (* lambda2 (- (+ (* lambda1 (cos (* 1/2 (PI)))) (* lambda2 (+ (* -1/2 (* lambda1 (sin (* 1/2 (PI))))) (* lambda2 (+ 1/6 (* -1/6 (* lambda1 (cos (* 1/2 (PI)))))))))) 1)))))
#s(approx (sin (+ lambda2 (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ lambda2 (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* lambda2 (cos (* 1/2 (PI)))))))
#s(approx (sin (+ lambda2 (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* lambda2 (+ (cos (* 1/2 (PI))) (* -1/2 (* lambda2 (sin (* 1/2 (PI))))))))))
#s(approx (sin (+ lambda2 (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* lambda2 (+ (cos (* 1/2 (PI))) (* lambda2 (+ (* -1/2 (sin (* 1/2 (PI)))) (* -1/6 (* lambda2 (cos (* 1/2 (PI))))))))))))
#s(approx (+ lambda2 (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ lambda2 (/ (PI) 2)) #s(hole binary64 (+ lambda2 (* 1/2 (PI)))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (sin lambda1)))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) #s(hole binary64 lambda1))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) #s(hole binary64 (+ lambda1 (* lambda2 (- (* -1/2 (* lambda1 lambda2)) 1)))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) #s(hole binary64 (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) #s(hole binary64 (+ lambda1 (* lambda2 (- (* -1/2 (* lambda1 lambda2)) 1)))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) #s(hole binary64 (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)))))
#s(approx (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)) #s(hole binary64 (* -1 lambda2)))
#s(approx (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)) #s(hole binary64 (* lambda2 (- (* -1/2 (* lambda1 lambda2)) 1))))
#s(approx (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)) #s(hole binary64 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))))
#s(approx (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1) #s(hole binary64 -1))
#s(approx (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1) #s(hole binary64 (- (* -1/2 (* lambda1 lambda2)) 1)))
#s(approx (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1) #s(hole binary64 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)))
#s(approx (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) #s(hole binary64 (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2)))))
#s(approx (* 1/6 lambda2) #s(hole binary64 (* 1/6 lambda2)))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos lambda1) (cos phi2)))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* 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 (- (* lambda1 (cos lambda2)) (sin lambda2)) #s(hole binary64 lambda1))
#s(approx (- (* lambda1 (cos lambda2)) (sin lambda2)) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (- (* lambda1 (cos lambda2)) (sin lambda2)) #s(hole binary64 (+ lambda1 (* lambda2 (- (* -1/2 (* lambda1 lambda2)) 1)))))
#s(approx (- (* lambda1 (cos lambda2)) (sin lambda2)) #s(hole binary64 (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)))))
#s(approx (* lambda1 (cos lambda2)) #s(hole binary64 lambda1))
#s(approx (* lambda1 (cos lambda2)) #s(hole binary64 (+ lambda1 (* -1/2 (* lambda1 (pow lambda2 2))))))
#s(approx (* lambda1 (cos lambda2)) #s(hole binary64 (+ lambda1 (* (pow lambda2 2) (+ (* -1/2 lambda1) (* 1/24 (* lambda1 (pow lambda2 2))))))))
#s(approx (* lambda1 (cos lambda2)) #s(hole binary64 (+ lambda1 (* (pow lambda2 2) (+ (* -1/2 lambda1) (* (pow lambda2 2) (+ (* -1/720 (* lambda1 (pow lambda2 2))) (* 1/24 lambda1))))))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) #s(hole binary64 lambda1))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) #s(hole binary64 (+ lambda1 (* lambda2 (- (* 1/2 (pow lambda1 2)) 1)))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) #s(hole binary64 (+ lambda1 (* lambda2 (- (+ (* -1/2 (* lambda1 lambda2)) (* 1/2 (pow lambda1 2))) 1)))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) #s(hole binary64 (+ lambda1 (* lambda2 (- (+ (* 1/2 (pow lambda1 2)) (* lambda2 (+ (* -1/2 lambda1) (* lambda2 (+ 1/6 (* -1/12 (pow lambda1 2))))))) 1)))))
#s(approx (* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))) #s(hole binary64 lambda1))
#s(approx (* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))) #s(hole binary64 (+ lambda1 (* (pow lambda1 2) (* lambda2 (- 1/2 (/ 1 (pow lambda1 2))))))))
#s(approx (* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))) #s(hole binary64 (+ lambda1 (* lambda2 (+ (* -1/2 (* lambda1 lambda2)) (* (pow lambda1 2) (- 1/2 (/ 1 (pow lambda1 2)))))))))
#s(approx (* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))) #s(hole binary64 (+ lambda1 (* lambda2 (+ (* lambda2 (+ (* -1/2 lambda1) (* (pow lambda1 2) (* lambda2 (- (* 1/6 (/ 1 (pow lambda1 2))) 1/12))))) (* (pow lambda1 2) (- 1/2 (/ 1 (pow lambda1 2)))))))))
#s(approx (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) #s(hole binary64 (/ 1 lambda1)))
#s(approx (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) #s(hole binary64 (+ (* lambda2 (- 1/2 (/ 1 (pow lambda1 2)))) (/ 1 lambda1))))
#s(approx (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) #s(hole binary64 (+ (* lambda2 (- (+ 1/2 (* -1/2 (/ lambda2 lambda1))) (/ 1 (pow lambda1 2)))) (/ 1 lambda1))))
#s(approx (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) #s(hole binary64 (+ (* lambda2 (- (+ 1/2 (* lambda2 (- (* lambda2 (- (* 1/6 (/ 1 (pow lambda1 2))) 1/12)) (* 1/2 (/ 1 lambda1))))) (/ 1 (pow lambda1 2)))) (/ 1 lambda1))))
#s(approx (/ (sin lambda2) (pow lambda1 2)) #s(hole binary64 (/ lambda2 (pow lambda1 2))))
#s(approx (/ (sin lambda2) (pow lambda1 2)) #s(hole binary64 (* lambda2 (+ (* -1/6 (/ (pow lambda2 2) (pow lambda1 2))) (/ 1 (pow lambda1 2))))))
#s(approx (/ (sin lambda2) (pow lambda1 2)) #s(hole binary64 (* lambda2 (+ (* (pow lambda2 2) (- (* 1/120 (/ (pow lambda2 2) (pow lambda1 2))) (* 1/6 (/ 1 (pow lambda1 2))))) (/ 1 (pow lambda1 2))))))
#s(approx (/ (sin lambda2) (pow lambda1 2)) #s(hole binary64 (* lambda2 (+ (* (pow lambda2 2) (- (* (pow lambda2 2) (+ (* -1/5040 (/ (pow lambda2 2) (pow lambda1 2))) (* 1/120 (/ 1 (pow lambda1 2))))) (* 1/6 (/ 1 (pow lambda1 2))))) (/ 1 (pow lambda1 2))))))
#s(approx (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)) #s(hole binary64 (/ 1 lambda1)))
#s(approx (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)) #s(hole binary64 (+ (* 1/2 lambda2) (/ 1 lambda1))))
#s(approx (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)) #s(hole binary64 (+ (* lambda2 (+ 1/2 (* -1/2 (/ lambda2 lambda1)))) (/ 1 lambda1))))
#s(approx (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)) #s(hole binary64 (+ (* lambda2 (+ 1/2 (* lambda2 (- (* -1/12 lambda2) (* 1/2 (/ 1 lambda1)))))) (/ 1 lambda1))))
#s(approx (/ (cos lambda2) lambda1) #s(hole binary64 (/ 1 lambda1)))
#s(approx (/ (cos lambda2) lambda1) #s(hole binary64 (+ (* -1/2 (/ (pow lambda2 2) lambda1)) (/ 1 lambda1))))
#s(approx (/ (cos lambda2) lambda1) #s(hole binary64 (+ (* (pow lambda2 2) (- (* 1/24 (/ (pow lambda2 2) lambda1)) (* 1/2 (/ 1 lambda1)))) (/ 1 lambda1))))
#s(approx (/ (cos lambda2) lambda1) #s(hole binary64 (+ (* (pow lambda2 2) (- (* (pow lambda2 2) (+ (* -1/720 (/ (pow lambda2 2) lambda1)) (* 1/24 (/ 1 lambda1)))) (* 1/2 (/ 1 lambda1)))) (/ 1 lambda1))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ 1 (* -1/2 (pow lambda1 2)))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda1 lambda2)))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ lambda1 (* lambda2 (- (* 1/4 (pow lambda1 2)) 1/2))))))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ lambda1 (* lambda2 (- (+ (* -1/6 (* lambda1 lambda2)) (* 1/4 (pow lambda1 2))) 1/2))))))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (* -1/2 lambda1)))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (+ lambda2 (* -1/2 lambda1))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ 1 (* 1/4 (* lambda1 lambda2)))))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) #s(hole binary64 (+ (* -1/2 lambda1) (* lambda2 (+ 1 (* lambda2 (+ (* -1/6 lambda2) (* 1/4 lambda1))))))))
#s(approx (* (* (cos lambda2) lambda1) -1/2) #s(hole binary64 (* -1/2 lambda1)))
#s(approx (* (* (cos lambda2) lambda1) -1/2) #s(hole binary64 (+ (* -1/2 lambda1) (* 1/4 (* lambda1 (pow lambda2 2))))))
#s(approx (* (* (cos lambda2) lambda1) -1/2) #s(hole binary64 (+ (* -1/2 lambda1) (* (pow lambda2 2) (+ (* -1/48 (* lambda1 (pow lambda2 2))) (* 1/4 lambda1))))))
#s(approx (* (* (cos lambda2) lambda1) -1/2) #s(hole binary64 (+ (* -1/2 lambda1) (* (pow lambda2 2) (+ (* 1/4 lambda1) (* (pow lambda2 2) (+ (* -1/48 lambda1) (* 1/1440 (* lambda1 (pow lambda2 2))))))))))
#s(approx (* (cos lambda2) lambda1) #s(hole binary64 lambda1))
#s(approx (* (cos lambda2) lambda1) #s(hole binary64 (+ lambda1 (* -1/2 (* lambda1 (pow lambda2 2))))))
#s(approx (* (cos lambda2) lambda1) #s(hole binary64 (+ lambda1 (* (pow lambda2 2) (+ (* -1/2 lambda1) (* 1/24 (* lambda1 (pow lambda2 2))))))))
#s(approx (* (cos lambda2) lambda1) #s(hole binary64 (+ lambda1 (* (pow lambda2 2) (+ (* -1/2 lambda1) (* (pow lambda2 2) (+ (* -1/720 (* lambda1 (pow lambda2 2))) (* 1/24 lambda1))))))))
#s(approx (+ 1 (* (cos lambda2) (cos phi2))) #s(hole binary64 (+ 1 (cos phi2))))
#s(approx (+ 1 (* (cos lambda2) (cos phi2))) #s(hole binary64 (+ 1 (+ (cos phi2) (* -1/2 (* (pow lambda2 2) (cos phi2)))))))
#s(approx (+ 1 (* (cos lambda2) (cos phi2))) #s(hole binary64 (+ 1 (+ (cos phi2) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda2 2) (cos phi2)))))))))
#s(approx (+ 1 (* (cos lambda2) (cos phi2))) #s(hole binary64 (+ 1 (+ (cos phi2) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (cos phi2))) (* 1/24 (cos phi2))))))))))
#s(approx (* (cos lambda2) (cos phi2)) #s(hole binary64 (cos phi2)))
#s(approx (* (cos lambda2) (cos phi2)) #s(hole binary64 (+ (cos phi2) (* -1/2 (* (pow lambda2 2) (cos phi2))))))
#s(approx (* (cos lambda2) (cos phi2)) #s(hole binary64 (+ (cos phi2) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda2 2) (cos phi2))))))))
#s(approx (* (cos lambda2) (cos phi2)) #s(hole binary64 (+ (cos phi2) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (cos phi2))) (* 1/24 (cos phi2)))))))))
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) #s(hole binary64 lambda1))
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) #s(hole binary64 (+ lambda1 (* 1/2 (* (pow lambda1 2) lambda2)))))
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) #s(hole binary64 (+ lambda1 (* lambda2 (+ (* -1/2 (* lambda1 lambda2)) (* 1/2 (pow lambda1 2)))))))
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) #s(hole binary64 (+ lambda1 (* lambda2 (+ (* 1/2 (pow lambda1 2)) (* lambda2 (+ (* -1/2 lambda1) (* -1/12 (* (pow lambda1 2) lambda2)))))))))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) #s(hole binary64 1))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) #s(hole binary64 (+ 1 (* 1/2 (* lambda1 lambda2)))))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) #s(hole binary64 (+ 1 (* lambda2 (+ (* -1/2 lambda2) (* 1/2 lambda1))))))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) #s(hole binary64 (+ 1 (* lambda2 (+ (* 1/2 lambda1) (* lambda2 (- (* -1/12 (* lambda1 lambda2)) 1/2)))))))
#s(approx (* lambda1 (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) #s(hole binary64 1))
#s(approx (* lambda1 (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) #s(hole binary64 (+ 1 (* 1/2 (* lambda1 lambda2)))))
#s(approx (* lambda1 (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) #s(hole binary64 (+ 1 (* lambda2 (+ (* -1/2 lambda2) (* 1/2 lambda1))))))
#s(approx (* lambda1 (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) #s(hole binary64 (+ 1 (* lambda2 (+ (* 1/2 lambda1) (* lambda2 (- (* -1/12 (* lambda1 lambda2)) 1/2)))))))
#s(approx (* -1/2 (* lambda1 (neg (sin lambda2)))) #s(hole binary64 (* 1/2 (* lambda1 lambda2))))
#s(approx (* -1/2 (* lambda1 (neg (sin lambda2)))) #s(hole binary64 (* lambda2 (+ (* -1/12 (* lambda1 (pow lambda2 2))) (* 1/2 lambda1)))))
#s(approx (* -1/2 (* lambda1 (neg (sin lambda2)))) #s(hole binary64 (* lambda2 (+ (* 1/2 lambda1) (* (pow lambda2 2) (+ (* -1/12 lambda1) (* 1/240 (* lambda1 (pow lambda2 2)))))))))
#s(approx (* -1/2 (* lambda1 (neg (sin lambda2)))) #s(hole binary64 (* lambda2 (+ (* 1/2 lambda1) (* (pow lambda2 2) (+ (* -1/12 lambda1) (* (pow lambda2 2) (+ (* -1/10080 (* lambda1 (pow lambda2 2))) (* 1/240 lambda1)))))))))
#s(approx (* lambda1 (neg (sin lambda2))) #s(hole binary64 (* -1 (* lambda1 lambda2))))
#s(approx (* lambda1 (neg (sin lambda2))) #s(hole binary64 (* lambda2 (+ (* -1 lambda1) (* 1/6 (* lambda1 (pow lambda2 2)))))))
#s(approx (* lambda1 (neg (sin lambda2))) #s(hole binary64 (* lambda2 (+ (* -1 lambda1) (* (pow lambda2 2) (+ (* -1/120 (* lambda1 (pow lambda2 2))) (* 1/6 lambda1)))))))
#s(approx (* lambda1 (neg (sin lambda2))) #s(hole binary64 (* lambda2 (+ (* -1 lambda1) (* (pow lambda2 2) (+ (* 1/6 lambda1) (* (pow lambda2 2) (+ (* -1/120 lambda1) (* 1/5040 (* lambda1 (pow lambda2 2)))))))))))
#s(approx (* lambda1 (- (pow lambda2 -1) (pow lambda1 -1))) #s(hole binary64 (/ (+ lambda1 (* -1 lambda2)) lambda2)))
#s(approx (- (pow lambda2 -1) (pow lambda1 -1)) #s(hole binary64 (/ (+ 1 (* -1 (/ lambda2 lambda1))) lambda2)))
#s(approx (/ 1 lambda2) #s(hole binary64 (/ 1 lambda2)))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (/ (+ lambda1 (* -1 lambda2)) lambda2)))
#s(approx (- (pow (/ lambda1 lambda2) 3) 1) #s(hole binary64 (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (pow lambda2 3))))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) #s(hole binary64 (/ (+ (* lambda1 lambda2) (pow lambda1 2)) (pow lambda2 2))))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) #s(hole binary64 (/ (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)) (pow lambda2 2))))
#s(approx (+ 1 (* (/ lambda1 lambda2) 1)) #s(hole binary64 (/ (+ lambda1 lambda2) lambda2)))
#s(approx (* lambda1 (+ (/ 1 lambda1) (/ 1 lambda2))) #s(hole binary64 (/ (+ lambda1 lambda2) lambda2)))
#s(approx (+ (/ 1 lambda1) (/ 1 lambda2)) #s(hole binary64 (/ (+ 1 (/ lambda2 lambda1)) lambda2)))
#s(approx (+ 1 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) #s(hole binary64 (+ 1 (sin (+ lambda1 (* 1/2 (PI)))))))
#s(approx (+ 1 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) #s(hole binary64 (+ 1 (+ (sin (+ lambda1 (* 1/2 (PI)))) (* -1 (* lambda2 (cos (+ lambda1 (* 1/2 (PI))))))))))
#s(approx (+ 1 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) #s(hole binary64 (+ 1 (+ (sin (+ lambda1 (* 1/2 (PI)))) (* lambda2 (+ (* -1 (cos (+ lambda1 (* 1/2 (PI))))) (* -1/2 (* lambda2 (sin (+ lambda1 (* 1/2 (PI))))))))))))
#s(approx (+ 1 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) #s(hole binary64 (+ 1 (+ (sin (+ lambda1 (* 1/2 (PI)))) (* lambda2 (+ (* -1 (cos (+ lambda1 (* 1/2 (PI))))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 (* 1/2 (PI))))) (* 1/6 (* lambda2 (cos (+ lambda1 (* 1/2 (PI))))))))))))))
#s(approx (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) #s(hole binary64 (sin (+ lambda1 (* 1/2 (PI))))))
#s(approx (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) #s(hole binary64 (+ (sin (+ lambda1 (* 1/2 (PI)))) (* -1 (* lambda2 (cos (+ lambda1 (* 1/2 (PI)))))))))
#s(approx (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) #s(hole binary64 (+ (sin (+ lambda1 (* 1/2 (PI)))) (* lambda2 (+ (* -1 (cos (+ lambda1 (* 1/2 (PI))))) (* -1/2 (* lambda2 (sin (+ lambda1 (* 1/2 (PI)))))))))))
#s(approx (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) #s(hole binary64 (+ (sin (+ lambda1 (* 1/2 (PI)))) (* lambda2 (+ (* -1 (cos (+ lambda1 (* 1/2 (PI))))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 (* 1/2 (PI))))) (* 1/6 (* lambda2 (cos (+ lambda1 (* 1/2 (PI)))))))))))))
#s(approx (- (+ lambda1 (* 1/2 (PI))) lambda2) #s(hole binary64 (+ lambda1 (* 1/2 (PI)))))
#s(approx (- (+ lambda1 (* 1/2 (PI))) lambda2) #s(hole binary64 (+ lambda1 (+ (* -1 lambda2) (* 1/2 (PI))))))
#s(approx (- (* 1/2 (PI)) lambda2) #s(hole binary64 (* 1/2 (PI))))
#s(approx (- (* 1/2 (PI)) lambda2) #s(hole binary64 (+ (* -1 lambda2) (* 1/2 (PI)))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/6 (* lambda2 (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))) (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (+ (* lambda2 (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (* -1/6 (* lambda2 (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))) (* (sin lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (* (cos lambda1) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* (cos lambda1) (cos phi2)) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (+ (* (cos lambda1) (cos phi2)) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (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)) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (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)) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (+ (* lambda2 (sin lambda1)) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (+ (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (+ (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos lambda1) (* (cos (* 1/2 (PI))) (sin phi1)))))
#s(approx (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos lambda1) (+ (* lambda2 (sin lambda1)) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos lambda1) (+ (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos lambda1) (+ (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (/ (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (- 1 (* (cos lambda1) (cos phi2))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (- (+ (* lambda2 (- (* -2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- 1 (* (cos lambda1) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda1) (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ 1 (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- 1 (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- 1 (* (cos lambda1) (cos phi2))))) (* lambda2 (- (* -1 (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (* -2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- 1 (* (cos lambda1) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda1) (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (- 1 (* (cos lambda1) (cos phi2))))) (* 1/2 (/ (* (cos lambda1) (* (cos phi2) (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))) (* -1 (/ (* (cos phi2) (* (sin lambda1) (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ 1 (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- 1 (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- 1 (* (cos lambda1) (cos phi2))))) (* lambda2 (- (+ (* -1 (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (- 1 (* (cos lambda1) (cos phi2))))) (* lambda2 (- (* -1 (/ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (* -1 (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (* -2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- 1 (* (cos lambda1) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda1) (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (- 1 (* (cos lambda1) (cos phi2))))) (* 1/2 (/ (* (cos lambda1) (* (cos phi2) (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* 1/6 (/ (* (cos phi2) (* (sin lambda1) (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (* 1/2 (/ (* (cos lambda1) (* (cos phi2) (- (* -2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- 1 (* (cos lambda1) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda1) (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (- 1 (* (cos lambda1) (cos phi2)))))))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (* -2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- 1 (* (cos lambda1) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda1) (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (- 1 (* (cos lambda1) (cos phi2))))) (* 1/2 (/ (* (cos lambda1) (* (cos phi2) (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))) (* -1 (/ (* (cos phi2) (* (sin lambda1) (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ 1 (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- 1 (* (cos lambda1) (cos phi2)))))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- (+ 1 (* -2 (* lambda2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- (+ 1 (* 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 lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- (+ 1 (* 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 lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) #s(hole binary64 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) #s(hole binary64 (+ (* 2 (* lambda2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) #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 (* (cos phi2) (cos (- lambda1 lambda2))) 2) #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 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- 1 (* (cos lambda1) (cos phi2)))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* -1 (* lambda2 (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (cos phi2)))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* lambda2 (- (* 1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (cos phi2)))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* 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 (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (/ (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* lambda2 (- (/ (* (pow (cos phi2) 3) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1)))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)))) (+ (/ 1 (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #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)))))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (+ (/ (* (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* -1/2 (* (cos lambda1) (cos phi2))))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)) (/ (* (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1))) (- (/ (* (pow (cos phi2) 3) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1)))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))))))) (/ (* (pow (cos phi2) 3) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))))) (/ (* (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1)))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)))) (+ (/ 1 (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #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))))))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (+ (/ (* (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* -1/6 (* (cos phi2) (sin lambda1))))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)) (+ (/ (* (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (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)))))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (+ (/ (* (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* -1/2 (* (cos lambda1) (cos phi2))))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)) (/ (* (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1))) (- (/ (* (pow (cos phi2) 3) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1)))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))))))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (- (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* -1/2 (* (cos lambda1) (cos phi2)))) (- (/ (* (pow (cos phi2) 3) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1)))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (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)))))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))))) (+ (/ (* (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* -1/2 (* (cos lambda1) (cos phi2))))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)) (/ (* (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1))) (- (/ (* (pow (cos phi2) 3) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1)))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))))))) (/ (* (pow (cos phi2) 3) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))))) (/ (* (+ 1 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))) (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1)))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)))) (+ (/ 1 (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))))))))
#s(approx (/ (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (+ 1 (pow (cos lambda1) 3)) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))))
#s(approx (/ (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (- (+ (* 2 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))) (/ (* (pow (cos lambda1) 2) (sin lambda1)) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))) (/ (* (+ 1 (pow (cos lambda1) 3)) (+ (* -1 (sin lambda1)) (* 2 (* (cos lambda1) (sin lambda1))))) (pow (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)) 2)))) (+ (/ 1 (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1))) (/ (pow (cos lambda1) 3) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))))))
#s(approx (/ (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (- (+ (* 2 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))) (+ (* lambda2 (- (+ (* -1/2 (/ (pow (cos lambda1) 3) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))) (+ (* 2 (/ (* (cos lambda1) (pow (sin lambda1) 2)) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))) (/ (* (cos lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1))))) (+ (/ (* (+ 1 (pow (cos lambda1) 3)) (- (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (* -1/2 (cos lambda1)))) (pow (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)) 2)) (/ (* (+ (* -1 (sin lambda1)) (* 2 (* (cos lambda1) (sin lambda1)))) (- (+ (* 2 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))) (/ (* (pow (cos lambda1) 2) (sin lambda1)) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))) (/ (* (+ 1 (pow (cos lambda1) 3)) (+ (* -1 (sin lambda1)) (* 2 (* (cos lambda1) (sin lambda1))))) (pow (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)) 2)))) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))))) (/ (* (pow (cos lambda1) 2) (sin lambda1)) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1))))) (/ (* (+ 1 (pow (cos lambda1) 3)) (+ (* -1 (sin lambda1)) (* 2 (* (cos lambda1) (sin lambda1))))) (pow (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)) 2)))) (+ (/ 1 (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1))) (/ (pow (cos lambda1) 3) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))))))
#s(approx (/ (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (- (+ (* 2 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))) (+ (* lambda2 (- (+ (* -1/2 (/ (pow (cos lambda1) 3) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))) (+ (* 2 (/ (* (cos lambda1) (pow (sin lambda1) 2)) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))) (+ (* lambda2 (- (+ (* -1 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))) (+ (* -1/6 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))) (+ (/ (* (cos lambda1) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1))) (/ (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))))) (+ (/ (* (+ 1 (pow (cos lambda1) 3)) (+ (* -1 (* (cos lambda1) (sin lambda1))) (+ (* -1/3 (* (cos lambda1) (sin lambda1))) (* 1/6 (sin lambda1))))) (pow (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)) 2)) (+ (/ (* (+ (* -1 (sin lambda1)) (* 2 (* (cos lambda1) (sin lambda1)))) (- (+ (* -1/2 (/ (pow (cos lambda1) 3) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))) (+ (* 2 (/ (* (cos lambda1) (pow (sin lambda1) 2)) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))) (/ (* (cos lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1))))) (+ (/ (* (+ 1 (pow (cos lambda1) 3)) (- (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (* -1/2 (cos lambda1)))) (pow (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)) 2)) (/ (* (+ (* -1 (sin lambda1)) (* 2 (* (cos lambda1) (sin lambda1)))) (- (+ (* 2 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))) (/ (* (pow (cos lambda1) 2) (sin lambda1)) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))) (/ (* (+ 1 (pow (cos lambda1) 3)) (+ (* -1 (sin lambda1)) (* 2 (* (cos lambda1) (sin lambda1))))) (pow (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)) 2)))) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))))) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1))) (/ (* (- (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (* -1/2 (cos lambda1))) (- (+ (* 2 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))) (/ (* (pow (cos lambda1) 2) (sin lambda1)) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))) (/ (* (+ 1 (pow (cos lambda1) 3)) (+ (* -1 (sin lambda1)) (* 2 (* (cos lambda1) (sin lambda1))))) (pow (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)) 2)))) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1))))))) (/ (* (cos lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))))) (+ (/ (* (+ 1 (pow (cos lambda1) 3)) (- (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (* -1/2 (cos lambda1)))) (pow (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)) 2)) (/ (* (+ (* -1 (sin lambda1)) (* 2 (* (cos lambda1) (sin lambda1)))) (- (+ (* 2 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))) (/ (* (pow (cos lambda1) 2) (sin lambda1)) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))) (/ (* (+ 1 (pow (cos lambda1) 3)) (+ (* -1 (sin lambda1)) (* 2 (* (cos lambda1) (sin lambda1))))) (pow (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)) 2)))) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))))) (/ (* (pow (cos lambda1) 2) (sin lambda1)) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1))))) (/ (* (+ 1 (pow (cos lambda1) 3)) (+ (* -1 (sin lambda1)) (* 2 (* (cos lambda1) (sin lambda1))))) (pow (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)) 2)))) (+ (/ 1 (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1))) (/ (pow (cos lambda1) 3) (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1)))))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 3)) #s(hole binary64 (+ 1 (pow (cos lambda1) 3))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 3)) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))) (pow (cos lambda1) 3)))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 3)) #s(hole binary64 (+ 1 (+ (* 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 (+ 1 (pow (cos (- lambda1 lambda2)) 3)) #s(hole binary64 (+ 1 (+ (* 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)) 3) #s(hole binary64 (pow (cos lambda1) 3)))
#s(approx (pow (cos (- lambda1 lambda2)) 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)) 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)) 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 (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ 1 (pow (cos lambda1) 2)) (cos lambda1))))
#s(approx (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ 1 (+ (* lambda2 (+ (* -1 (sin lambda1)) (* 2 (* (cos lambda1) (sin lambda1))))) (pow (cos lambda1) 2))) (cos lambda1))))
#s(approx (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ 1 (+ (* lambda2 (+ (* -1 (sin lambda1)) (+ (* 2 (* (cos lambda1) (sin lambda1))) (* lambda2 (- (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (* -1/2 (cos lambda1))))))) (pow (cos lambda1) 2))) (cos lambda1))))
#s(approx (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ 1 (+ (* lambda2 (+ (* -1 (sin lambda1)) (+ (* 2 (* (cos lambda1) (sin lambda1))) (* lambda2 (- (+ (* -1 (pow (cos lambda1) 2)) (+ (* lambda2 (+ (* -1 (* (cos lambda1) (sin lambda1))) (+ (* -1/3 (* (cos lambda1) (sin lambda1))) (* 1/6 (sin lambda1))))) (pow (sin lambda1) 2))) (* -1/2 (cos lambda1))))))) (pow (cos lambda1) 2))) (cos lambda1))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (+ 1 (pow (cos lambda1) 2))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (+ 1 (+ (* 2 (* lambda2 (* (cos lambda1) (sin lambda1)))) (pow (cos lambda1) 2)))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* 2 (* (cos lambda1) (sin lambda1))) (* lambda2 (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (pow (cos lambda1) 2)))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (+ 1 (+ (* 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 (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda2 (- (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* lambda2 (- (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (/ (* (+ (* (cos lambda1) (* (cos phi2) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 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))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 4)) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* lambda2 (- (+ (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (* lambda2 (- (* 1/6 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (/ (* (+ (* (cos lambda1) (* (cos phi2) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 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))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 4)) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (/ (* (+ (* -1 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 1/3 (* (cos phi2) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 4)) (+ (/ (* (+ (* (cos lambda1) (* (cos phi2) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 1/6 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (+ (* (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (/ (* (+ (* (cos lambda1) (* (cos phi2) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 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))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 4)) (/ (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (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 (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (/ (- 1 (+ (* (cos lambda1) (cos phi2)) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))
#s(approx (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (- (+ (* lambda2 (- (* -1 (/ (+ (* (cos phi2) (sin lambda1)) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (* -2 (/ (* (cos phi2) (* (sin lambda1) (- 1 (+ (* (cos lambda1) (cos phi2)) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 3))))) (/ 1 (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (+ (/ (* (cos lambda1) (cos phi2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- 1 (* (cos lambda1) (cos phi2))))))))
#s(approx (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -1 (/ (+ (* (cos phi2) (sin lambda1)) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (* lambda2 (- (* -1 (/ (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* -1 (/ (+ (* (cos phi2) (sin lambda1)) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (* -2 (/ (* (cos phi2) (* (sin lambda1) (- 1 (+ (* (cos lambda1) (cos phi2)) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 3)))))) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- 1 (+ (* (cos lambda1) (cos phi2)) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2)))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 4)))))) (* -2 (/ (* (cos phi2) (* (sin lambda1) (- 1 (+ (* (cos lambda1) (cos phi2)) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 3))))) (/ 1 (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (+ (/ (* (cos lambda1) (cos phi2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- 1 (* (cos lambda1) (cos phi2))))))))
#s(approx (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -1 (/ (+ (* (cos phi2) (sin lambda1)) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (* lambda2 (- (+ (* -1 (/ (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (* lambda2 (- (* -1 (/ (+ (* -1/6 (* (cos phi2) (sin lambda1))) (* (pow (cos phi2) 2) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 1/6 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (+ (* (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))) (- 1 (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* -1 (/ (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* -1 (/ (+ (* (cos phi2) (sin lambda1)) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (* -2 (/ (* (cos phi2) (* (sin lambda1) (- 1 (+ (* (cos lambda1) (cos phi2)) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 3)))))) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- 1 (+ (* (cos lambda1) (cos phi2)) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2)))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 4)))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (/ (* (+ (* -1 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 1/3 (* (cos phi2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (- 1 (+ (* (cos lambda1) (cos phi2)) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2)))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 4)) (/ (* (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (* -1 (/ (+ (* (cos phi2) (sin lambda1)) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (* -2 (/ (* (cos phi2) (* (sin lambda1) (- 1 (+ (* (cos lambda1) (cos phi2)) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 3))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))) (+ (* -2 (/ (* (cos phi2) (* (sin lambda1) (- (* -1 (/ (+ (* (cos phi2) (sin lambda1)) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (* -2 (/ (* (cos phi2) (* (sin lambda1) (- 1 (+ (* (cos lambda1) (cos phi2)) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 3)))))) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- 1 (+ (* (cos lambda1) (cos phi2)) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2)))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 4)))))) (* -2 (/ (* (cos phi2) (* (sin lambda1) (- 1 (+ (* (cos lambda1) (cos phi2)) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 3))))) (/ 1 (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (+ (/ (* (cos lambda1) (cos phi2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- 1 (* (cos lambda1) (cos phi2))))))))
#s(approx (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) #s(hole binary64 (- 1 (+ (* (cos lambda1) (cos phi2)) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))
#s(approx (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) #s(hole binary64 (- (+ 1 (* -1 (* lambda2 (+ (* (cos phi2) (sin lambda1)) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2)))))))))))) (+ (* (cos lambda1) (cos phi2)) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))
#s(approx (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) #s(hole binary64 (- (+ 1 (* lambda2 (- (* -1 (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))))))) (+ (* (cos phi2) (sin lambda1)) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2)))))))))))) (+ (* (cos lambda1) (cos phi2)) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))
#s(approx (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) #s(hole binary64 (- (+ 1 (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (+ (* -1/6 (* (cos phi2) (sin lambda1))) (* (pow (cos phi2) 2) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 1/6 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (+ (* (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))) (- 1 (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))))))))) (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))))))) (+ (* (cos phi2) (sin lambda1)) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2)))))))))))) (+ (* (cos lambda1) (cos phi2)) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* (cos lambda1) (cos phi2)) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2))))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* lambda2 (+ (* (cos phi2) (sin lambda1)) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2)))))))))) (+ (* (cos lambda1) (cos phi2)) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2))))))))) (+ (* (cos phi2) (sin lambda1)) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))))))) (+ (* (cos lambda1) (cos phi2)) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (+ (* lambda2 (+ (* -1/6 (* (cos phi2) (sin lambda1))) (* (pow (cos phi2) 2) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 1/6 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (+ (* (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))) (- 1 (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1))))))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))))))) (+ (* (cos phi2) (sin lambda1)) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))))))) (+ (* (cos lambda1) (cos phi2)) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))
#s(approx (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2)))))))
#s(approx (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda2 (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2))))))))
#s(approx (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))))) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2)))))))))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2))))))))
#s(approx (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* lambda2 (* (pow (cos phi2) 2) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 1/6 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (+ (* (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))) (- 1 (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2)))))))))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- 1 (* (cos lambda1) (cos phi2))))))))
#s(approx (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (* (pow (cos lambda1) 2) (- 1 (* (cos lambda1) (cos phi2))))))
#s(approx (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2)))))))) (* (pow (cos lambda1) 2) (- 1 (* (cos lambda1) (cos phi2)))))))
#s(approx (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (+ (* 2 (* (cos lambda1) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2)))))) (* lambda2 (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))))))) (* (pow (cos lambda1) 2) (- 1 (* (cos lambda1) (cos phi2)))))))
#s(approx (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (+ (* 2 (* (cos lambda1) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2)))))) (* lambda2 (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (+ (* lambda2 (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 1/6 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (+ (* (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))) (- 1 (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1))))))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2))))))))))) (* (pow (cos lambda1) 2) (- 1 (* (cos lambda1) (cos phi2)))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) #s(hole binary64 (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) #s(hole binary64 (+ (* -2 (* lambda2 (* (cos phi2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) #s(hole binary64 (+ (* lambda2 (+ (* -2 (* (cos phi2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2)))))) (* lambda2 (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) #s(hole binary64 (+ (* lambda2 (+ (* -2 (* (cos phi2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2)))))) (* lambda2 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 1/3 (* (cos phi2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (* lambda2 (- (* -2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (* 1/2 (/ 1 (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (* 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) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))))) (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (* 1/2 (/ 1 (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (* 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) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))))) (* -1 (/ (* (cos phi2) (* (sin lambda1) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (* 1/2 (/ 1 (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos lambda1) 2)) (- (cos phi1) (cos lambda1)))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (cos lambda1)))) (+ (* lambda2 (- (* -2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (sin lambda1) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))) (* 1/2 (/ 1 (- (cos phi1) (cos lambda1)))))) (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (cos lambda1)))) (+ (* lambda2 (- (+ (* -2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* lambda2 (- (* -1 (/ (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (cos lambda1)))) (+ (* -1 (/ (* (sin lambda1) (- (* -2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (sin lambda1) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))) (- (cos phi1) (cos lambda1)))) (* 1/2 (/ (* (cos lambda1) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))))) (* -1 (/ (* (sin lambda1) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))) (* 1/2 (/ 1 (- (cos phi1) (cos lambda1)))))) (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (cos lambda1)))) (+ (* lambda2 (- (+ (* -2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* lambda2 (- (+ (* -1 (/ (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (cos lambda1)))) (* lambda2 (- (* -1 (/ (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))) (- (cos phi1) (cos lambda1)))) (+ (* -1 (/ (* (sin lambda1) (- (* -1 (/ (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (cos lambda1)))) (+ (* -1 (/ (* (sin lambda1) (- (* -2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (sin lambda1) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))) (- (cos phi1) (cos lambda1)))) (* 1/2 (/ (* (cos lambda1) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2)))))) (- (cos phi1) (cos lambda1)))) (+ (* 1/6 (/ (* (sin lambda1) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))) (* 1/2 (/ (* (cos lambda1) (- (* -2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (sin lambda1) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))) (- (cos phi1) (cos lambda1))))))))) (+ (* -1 (/ (* (sin lambda1) (- (* -2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (sin lambda1) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))) (- (cos phi1) (cos lambda1)))) (* 1/2 (/ (* (cos lambda1) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))))) (* -1 (/ (* (sin lambda1) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos lambda1) 2))) (pow (- (cos phi1) (cos lambda1)) 2))))) (* 1/2 (/ 1 (- (cos phi1) (cos lambda1)))))) (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1))))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos lambda1) 2))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ 1/2 (+ (* -2 (* lambda2 (* (cos lambda1) (sin lambda1)))) (* 1/2 (cos (* 2 phi1))))) (pow (cos lambda1) 2))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* lambda2 (- (* -1 (* lambda2 (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 2 (* (cos lambda1) (sin lambda1))))))) (pow (cos lambda1) 2))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 2 (* (cos lambda1) (sin lambda1))))))) (pow (cos lambda1) 2))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* lambda2 (- (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (/ (pow (cos phi1) 6) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (/ (* (pow (cos lambda1) 6) (pow (cos phi2) 6)) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (* lambda2 (- (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (+ (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (- (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))) (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (/ (pow (cos phi1) 6) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (/ (* (pow (cos lambda1) 6) (pow (cos phi2) 6)) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (* lambda2 (- (+ (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (* lambda2 (- (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (+ (* -1/2 (pow (cos lambda1) 3)) (+ (* 2 (* (cos lambda1) (pow (sin lambda1) 2))) (* (cos lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* 2 (* (pow (cos lambda1) 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 phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (+ (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (- (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (- (* -1 (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (+ (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (- (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))))) (+ (* 1/6 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))))) (+ (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (- (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))) (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4)))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (- (pow (cos phi1) 6) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) 2) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (/ (pow (cos phi1) 6) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (/ (* (pow (cos lambda1) 6) (pow (cos phi2) 6)) (* (+ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (+ (* (pow (cos lambda1) 4) (pow (cos phi2) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (pow (cos lambda1) 6) (pow (cos phi2) 6)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (+ (* lambda2 (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4)))))) (/ (* (pow (cos lambda1) 6) (* (pow (cos phi2) 6) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))))) (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))))) (/ (* (pow (cos lambda1) 6) (pow (cos phi2) 6)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (+ (* lambda2 (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4)))))) (+ (* lambda2 (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (/ (* (cos lambda1) (cos phi2)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (+ (/ (* (+ (* -4 (* (cos phi2) (* (sin lambda1) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))) (+ (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (- (* 2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (pow (cos lambda1) 6) (* (pow (cos phi2) 6) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos lambda1) 6) (* (pow (cos phi2) 6) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (/ (* (cos lambda1) (cos phi2)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (+ (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))))))))) (/ (* (pow (cos lambda1) 6) (* (pow (cos phi2) 6) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))))) (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))))) (/ (* (pow (cos lambda1) 6) (pow (cos phi2) 6)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (+ (* lambda2 (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4)))))) (+ (* lambda2 (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (/ (* (cos lambda1) (cos phi2)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (+ (/ (* (+ (* -4 (* (cos phi2) (* (sin lambda1) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))) (+ (* lambda2 (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (/ (* (cos lambda1) (cos phi2)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/6 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 1/2 (/ (* (cos lambda1) (* (cos phi2) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (+ (* -1/2 (pow (cos lambda1) 3)) (+ (* 2 (* (cos lambda1) (pow (sin lambda1) 2))) (* (cos lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* 2 (* (pow (cos lambda1) 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 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -1 (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1)))) (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))))) (+ (* 1/6 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* (pow (cos phi2) 3) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))) (+ (/ (* (+ (* -4 (* (cos phi2) (* (sin lambda1) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (+ (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))))) (* 2 (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* -1 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 1/3 (* (cos phi2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (+ (/ (* (+ (* -4 (* (cos phi2) (* (sin lambda1) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))))) (+ (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (- (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (- (* 2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (pow (cos lambda1) 6) (* (pow (cos phi2) 6) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos lambda1) 6) (* (pow (cos phi2) 6) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- 1 (* (cos lambda1) (cos phi2)))))) (- (* 2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (pow (cos lambda1) 6) (* (pow (cos phi2) 6) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos lambda1) 6) (* (pow (cos phi2) 6) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))))) (+ (* 1/6 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (/ (* (cos lambda1) (cos phi2)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/6 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 1/2 (/ (* (cos lambda1) (* (cos phi2) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (+ (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 6) (+ (* 2 (* (+ (* -1/2 (pow (cos lambda1) 3)) (+ (* 2 (* (cos lambda1) (pow (sin lambda1) 2))) (* (cos lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* 2 (* (pow (cos lambda1) 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)))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))))))))))) (+ (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (- (* 2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (pow (cos lambda1) 6) (* (pow (cos phi2) 6) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos lambda1) 6) (* (pow (cos phi2) 6) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (/ (* (cos lambda1) (cos phi2)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (+ (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))))))))) (/ (* (pow (cos lambda1) 6) (* (pow (cos phi2) 6) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))))) (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))))) (/ (* (pow (cos lambda1) 6) (pow (cos phi2) 6)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (+ (* lambda2 (- (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4)))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))) (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (+ (* lambda2 (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4)))))) (* lambda2 (- (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (/ (* (cos lambda1) (cos phi2)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (+ (/ (* (+ (* -4 (* (cos phi2) (* (sin lambda1) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (/ (* (cos lambda1) (cos phi2)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))) (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (+ (* lambda2 (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4)))))) (* lambda2 (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (/ (* (cos lambda1) (cos phi2)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (+ (/ (* (+ (* -4 (* (cos phi2) (* (sin lambda1) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))) (* lambda2 (- (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (/ (* (cos lambda1) (cos phi2)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/6 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 1/2 (/ (* (cos lambda1) (* (cos phi2) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (+ (* -1/2 (pow (cos lambda1) 3)) (+ (* 2 (* (cos lambda1) (pow (sin lambda1) 2))) (* (cos lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* 2 (* (pow (cos lambda1) 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 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -1 (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1)))) (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))))) (+ (* 1/6 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* (pow (cos phi2) 3) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))) (+ (/ (* (+ (* -4 (* (cos phi2) (* (sin lambda1) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (+ (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))))) (* 2 (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* -1 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 1/3 (* (cos phi2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (+ (/ (* (+ (* -4 (* (cos phi2) (* (sin lambda1) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (/ (* (cos lambda1) (cos phi2)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/6 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 1/2 (/ (* (cos lambda1) (* (cos phi2) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (/ (* (cos lambda1) (cos phi2)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))) (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))))))
#s(approx (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) #s(hole binary64 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))))
#s(approx (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) #s(hole binary64 (+ (* lambda2 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4)))))) (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))))
#s(approx (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (/ (* (cos lambda1) (cos phi2)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (+ (/ (* (+ (* -4 (* (cos phi2) (* (sin lambda1) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))) (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))))) (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))))
#s(approx (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* lambda2 (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (/ (* (cos lambda1) (cos phi2)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/6 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 1/2 (/ (* (cos lambda1) (* (cos phi2) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (+ (* -1/2 (pow (cos lambda1) 3)) (+ (* 2 (* (cos lambda1) (pow (sin lambda1) 2))) (* (cos lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* 2 (* (pow (cos lambda1) 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 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -1 (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1)))) (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))))) (+ (* 1/6 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* (pow (cos phi2) 3) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))) (+ (/ (* (+ (* -4 (* (cos phi2) (* (sin lambda1) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (+ (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))))) (* 2 (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* -1 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 1/3 (* (cos phi2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (+ (/ (* (+ (* -4 (* (cos phi2) (* (sin lambda1) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))))) (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (/ (* (cos lambda1) (cos phi2)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (+ (/ (* (+ (* -4 (* (cos phi2) (* (sin lambda1) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))))) (* (pow phi1 2) (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))))) (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))))
#s(approx (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) #s(hole binary64 (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))
#s(approx (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) #s(hole binary64 (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* lambda2 (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))))
#s(approx (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) #s(hole binary64 (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* lambda2 (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* lambda2 (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (/ (* (cos lambda1) (cos phi2)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (+ (/ (* (+ (* -4 (* (cos phi2) (* (sin lambda1) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))))
#s(approx (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) #s(hole binary64 (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* lambda2 (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* lambda2 (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (/ (* (cos lambda1) (cos phi2)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* lambda2 (- (+ (* -3 (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (/ (* (cos lambda1) (cos phi2)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/6 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 1/2 (/ (* (cos lambda1) (* (cos phi2) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))))) (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (+ (* -1/2 (pow (cos lambda1) 3)) (+ (* 2 (* (cos lambda1) (pow (sin lambda1) 2))) (* (cos lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* 2 (* (pow (cos lambda1) 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 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -1 (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1)))) (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))))) (+ (* 1/6 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* (pow (cos phi2) 3) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))) (+ (/ (* (+ (* -4 (* (cos phi2) (* (sin lambda1) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (+ (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))))) (* 2 (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* -1 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 1/3 (* (cos phi2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (+ (/ (* (+ (* -4 (* (cos phi2) (* (sin lambda1) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))) (+ (/ (* (+ (* -4 (* (cos phi2) (* (sin lambda1) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))))
#s(approx (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))))
#s(approx (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* -1 (* lambda2 (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))) (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))))))
#s(approx (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda2 (- (* -1 (* lambda2 (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (/ (* (cos lambda1) (cos phi2)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))) (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))))))
#s(approx (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (/ (* (cos lambda1) (cos phi2)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/6 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 1/2 (/ (* (cos lambda1) (* (cos phi2) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))))))) (+ (* -1 (/ (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (/ (* (cos lambda1) (cos phi2)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))))))) (+ (* -1 (/ (* (cos phi2) (sin lambda1)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))) (* 4 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2)))))))))) (/ 1 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))))))
#s(approx (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))))
#s(approx (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))))
#s(approx (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (+ (* lambda2 (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- 1 (* (cos lambda1) (cos phi2))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))))
#s(approx (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (+ (* lambda2 (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (+ (* lambda2 (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))))) (+ (* 1/6 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))))
#s(approx (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) #s(hole binary64 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))
#s(approx (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))) (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))))))
#s(approx (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (+ (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))) (* lambda2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))))) (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))))))
#s(approx (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (+ (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))) (* lambda2 (+ (* lambda2 (+ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))))))) (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))))))
#s(approx (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) #s(hole binary64 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))))
#s(approx (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) #s(hole binary64 (+ (* lambda2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))) (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))
#s(approx (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) #s(hole binary64 (+ (* lambda2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (+ (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))) (* lambda2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))))) (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))
#s(approx (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) #s(hole binary64 (+ (* lambda2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (+ (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))) (* lambda2 (+ (* lambda2 (+ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))))))) (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))
#s(approx (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) #s(hole binary64 (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))
#s(approx (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) #s(hole binary64 (+ (* 4 (* lambda2 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))))
#s(approx (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) #s(hole binary64 (+ (* lambda2 (+ (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))) (* lambda2 (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))))
#s(approx (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) #s(hole binary64 (+ (* lambda2 (+ (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))) (* lambda2 (+ (* lambda2 (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))))) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))))
#s(approx (pow (cos (- lambda1 lambda2)) 4) #s(hole binary64 (pow (cos lambda1) 4)))
#s(approx (pow (cos (- lambda1 lambda2)) 4) #s(hole binary64 (+ (* 4 (* lambda2 (* (pow (cos lambda1) 3) (sin lambda1)))) (pow (cos lambda1) 4))))
#s(approx (pow (cos (- lambda1 lambda2)) 4) #s(hole binary64 (+ (* lambda2 (+ (* 4 (* (pow (cos lambda1) 3) (sin lambda1))) (* lambda2 (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (pow (cos lambda1) 4))))
#s(approx (pow (cos (- lambda1 lambda2)) 4) #s(hole binary64 (+ (* lambda2 (+ (* 4 (* (pow (cos lambda1) 3) (sin lambda1))) (* lambda2 (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (+ (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))) (* lambda2 (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))))))) (pow (cos lambda1) 4))))
#s(approx (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) #s(hole binary64 (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))
#s(approx (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) #s(hole binary64 (+ (* lambda2 (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))
#s(approx (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) #s(hole binary64 (+ (* lambda2 (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* lambda2 (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (+ (/ (* (+ (* -4 (* (cos phi2) (* (sin lambda1) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))
#s(approx (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) #s(hole binary64 (+ (* lambda2 (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* lambda2 (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* lambda2 (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (+ (* -1/2 (pow (cos lambda1) 3)) (+ (* 2 (* (cos lambda1) (pow (sin lambda1) 2))) (* (cos lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* 2 (* (pow (cos lambda1) 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 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -1 (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1)))) (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))))) (+ (* 1/6 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* (pow (cos phi2) 3) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (+ (/ (* (+ (* -4 (* (cos phi2) (* (sin lambda1) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (+ (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))))) (* 2 (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* -1 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 1/3 (* (cos phi2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (+ (* -1 (/ (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (+ (/ (* (+ (* -4 (* (cos phi2) (* (sin lambda1) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))) (/ (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (+ (/ (* (+ (* -4 (* (cos phi2) (* (sin lambda1) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (- (+ (* -2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (/ (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ (* (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 4) (pow (- 1 (* (cos lambda1) (cos phi2))) 4))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))
#s(approx (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) #s(hole binary64 (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))))
#s(approx (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) #s(hole binary64 (+ (* lambda2 (+ (* -2 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))))) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))))))
#s(approx (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) #s(hole binary64 (+ (* lambda2 (+ (* -2 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))))) (+ (* lambda2 (+ (* -2 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))))) (+ (* -1 (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))))) (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))))) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))))))
#s(approx (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) #s(hole binary64 (+ (* lambda2 (+ (* -2 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))))) (+ (* lambda2 (+ (* -2 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))))) (+ (* -1 (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))))) (+ (* lambda2 (+ (* -2 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))))) (+ (* -1 (* (pow (cos phi2) 6) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))))) (+ (* -1 (* (pow (cos phi2) 6) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (+ (* 2 (* (+ (* -1/2 (pow (cos lambda1) 3)) (+ (* 2 (* (cos lambda1) (pow (sin lambda1) 2))) (* (cos lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* 2 (* (pow (cos lambda1) 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)))))))))))) (* (+ (* -1 (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1)))) (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))))) (+ (* 1/6 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* (pow (cos phi2) 3) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))))))) (* (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))))))) (* (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))))) (* (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))) (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))))))
#s(approx (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) #s(hole binary64 (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))))
#s(approx (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) #s(hole binary64 (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (+ (* lambda2 (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))))))
#s(approx (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) #s(hole binary64 (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (+ (* lambda2 (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (+ (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))) (* lambda2 (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2)))))))))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))))))
#s(approx (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) #s(hole binary64 (+ (* -1/2 (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))) (+ (* lambda2 (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (+ (* -1/2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))) (* lambda2 (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2)))) (* lambda2 (+ (* -1 (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1)))) (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* -1/2 (+ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))))) (+ (* 1/6 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* (pow (cos phi2) 3) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))))))))))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))))))
#s(approx (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) #s(hole binary64 (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2))))
#s(approx (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) #s(hole binary64 (+ (* lambda2 (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))))
#s(approx (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) #s(hole binary64 (+ (* lambda2 (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* lambda2 (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2)))))))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))))
#s(approx (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) #s(hole binary64 (+ (* lambda2 (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* -1 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* lambda2 (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 3) (pow (sin lambda1) 2)))) (* lambda2 (+ (* -1 (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1)))) (+ (* -1 (* (pow (cos phi2) 2) (* (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (* 1/6 (* (cos phi2) (* (sin lambda1) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))) (* (pow (cos phi2) 3) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))))))))))) (* (- 1 (* (cos lambda1) (cos phi2))) (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))))
#s(approx (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) #s(hole binary64 (- (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) 2)))
#s(approx (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) #s(hole binary64 (- (+ (* -2 (* lambda2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))))) (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))) 2)))
#s(approx (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) #s(hole binary64 (- (+ (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* lambda2 (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* -1 (* lambda2 (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))) 2)))
#s(approx (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) #s(hole binary64 (- (+ (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* lambda2 (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* lambda2 (+ (* -1 (* lambda2 (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))))) (* -1 (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))))) 2)))
#s(approx (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ (* -2 (* lambda2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))))) (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))))
#s(approx (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* lambda2 (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* -1 (* lambda2 (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))))))
#s(approx (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ (* -1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* lambda2 (+ (* -2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* lambda2 (+ (* -1 (* lambda2 (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))))) (* -1 (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))))))
#s(approx (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))
#s(approx (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (+ (* 2 (* lambda2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) #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 (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) #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 (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) #s(hole binary64 (- 1 (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))))
#s(approx (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) #s(hole binary64 (- (+ 1 (* -2 (* lambda2 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))))) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))))
#s(approx (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) #s(hole binary64 (- (+ 1 (* lambda2 (- (* -1 (* lambda2 (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))))) (* 2 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))))))) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))))
#s(approx (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) #s(hole binary64 (- (+ 1 (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (* (pow (cos phi2) 6) (+ (* 2 (* (+ (* -1/2 (pow (cos lambda1) 3)) (+ (* 2 (* (cos lambda1) (pow (sin lambda1) 2))) (* (cos lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* 2 (* (pow (cos lambda1) 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) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))))) (* 2 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))))))) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))))
#s(approx (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) #s(hole binary64 (* (pow (cos lambda1) 6) (pow (cos phi2) 6))))
#s(approx (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) #s(hole binary64 (+ (* 2 (* lambda2 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))))) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))))
#s(approx (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) #s(hole binary64 (+ (* lambda2 (+ (* 2 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* lambda2 (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))))) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))))
#s(approx (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) #s(hole binary64 (+ (* lambda2 (+ (* 2 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (* lambda2 (+ (* lambda2 (* (pow (cos phi2) 6) (+ (* 2 (* (+ (* -1/2 (pow (cos lambda1) 3)) (+ (* 2 (* (cos lambda1) (pow (sin lambda1) 2))) (* (cos lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* 2 (* (pow (cos lambda1) 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) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))))))) (* (pow (cos lambda1) 6) (pow (cos phi2) 6)))))
#s(approx (pow (cos (- lambda1 lambda2)) 6) #s(hole binary64 (pow (cos lambda1) 6)))
#s(approx (pow (cos (- lambda1 lambda2)) 6) #s(hole binary64 (+ (* 2 (* lambda2 (* (pow (cos lambda1) 3) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1)))))) (pow (cos lambda1) 6))))
#s(approx (pow (cos (- lambda1 lambda2)) 6) #s(hole binary64 (+ (* lambda2 (+ (* 2 (* (pow (cos lambda1) 3) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* lambda2 (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))))) (pow (cos lambda1) 6))))
#s(approx (pow (cos (- lambda1 lambda2)) 6) #s(hole binary64 (+ (* lambda2 (+ (* 2 (* (pow (cos lambda1) 3) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* lambda2 (+ (* 2 (* (pow (cos lambda1) 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))))))) (+ (* lambda2 (+ (* 2 (* (+ (* -1/2 (pow (cos lambda1) 3)) (+ (* 2 (* (cos lambda1) (pow (sin lambda1) 2))) (* (cos lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2)))))) (pow (cos lambda1) 6))))
#s(approx (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))
#s(approx (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (* lambda2 (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))
#s(approx (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (* lambda2 (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (* lambda2 (+ (* -4 (* (cos phi2) (* (sin lambda1) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))
#s(approx (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (* lambda2 (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))) (* lambda2 (+ (* -4 (* (cos phi2) (* (sin lambda1) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* lambda2 (+ (* -2 (* (cos phi2) (* (sin lambda1) (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (- 1 (* (cos lambda1) (cos phi2))))))) (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))))) (* 2 (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* -1 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 1/3 (* (cos phi2) (* (sin lambda1) (- 1 (* (cos lambda1) (cos phi2)))))))))))) (+ (* (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (+ (* (cos lambda1) (* (cos phi2) (- 1 (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))))))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))
#s(approx (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) #s(hole binary64 (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2)))
#s(approx (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) #s(hole binary64 (+ (* 2 (* lambda2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2))))
#s(approx (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) #s(hole binary64 (+ (* lambda2 (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* lambda2 (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2))))) (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2))))
#s(approx (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) #s(hole binary64 (+ (* lambda2 (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))))) (* lambda2 (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))) (+ (* lambda2 (+ (* 2 (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (+ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))))) (* 2 (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))))))) (pow (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) 2)))))) (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2))))
#s(approx (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (/ (* (pow (cos lambda1) 6) (pow (cos phi2) 6)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda2 (- (* 2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (pow (cos lambda1) 6) (* (pow (cos phi2) 6) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ (* (pow (cos lambda1) 6) (pow (cos phi2) 6)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))))))
#s(approx (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda2 (- (+ (* 2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (* lambda2 (- (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (- (* 2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (pow (cos lambda1) 6) (* (pow (cos phi2) 6) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos lambda1) 6) (* (pow (cos phi2) 6) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))) (/ (* (pow (cos lambda1) 6) (* (pow (cos phi2) 6) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ (* (pow (cos lambda1) 6) (pow (cos phi2) 6)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))))))
#s(approx (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* lambda2 (- (+ (* 2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (* lambda2 (- (+ (* lambda2 (- (/ (* (pow (cos phi2) 6) (+ (* 2 (* (+ (* -1/2 (pow (cos lambda1) 3)) (+ (* 2 (* (cos lambda1) (pow (sin lambda1) 2))) (* (cos lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* 2 (* (pow (cos lambda1) 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)))))))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (- (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (- (* 2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (pow (cos lambda1) 6) (* (pow (cos phi2) 6) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos lambda1) 6) (* (pow (cos phi2) 6) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))) (+ (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- 1 (* (cos lambda1) (cos phi2)))))) (- (* 2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (pow (cos lambda1) 6) (* (pow (cos phi2) 6) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos lambda1) 6) (* (pow (cos phi2) 6) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2))))))))) (+ (* 1/6 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* 4 (* (cos lambda1) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))) (- 1 (* (cos lambda1) (cos phi2))))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))) (/ (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 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 (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))) 2))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (+ (/ (* (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))) (- (* 2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi2) 6) (+ (* 2 (* (pow (cos lambda1) 2) (sin lambda1))) (* (pow (cos lambda1) 2) (sin lambda1))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2)))))) (/ (* (pow (cos lambda1) 6) (* (pow (cos phi2) 6) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))) (/ (* (pow (cos lambda1) 6) (* (pow (cos phi2) 6) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1)))))))) (+ (* 1/2 (* (cos lambda1) (* (cos phi2) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda1) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* 4 (* (pow (cos lambda1) 2) (pow (sin lambda1) 2)))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))))) (/ (* (pow (cos lambda1) 6) (* (pow (cos phi2) 6) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4))))))) (* (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 4 (* (pow (cos lambda1) 3) (* (pow (cos phi2) 4) (sin lambda1))))) (- 1 (* (cos lambda1) (cos phi2))))))) (* (pow (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) 2) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ (* (pow (cos lambda1) 6) (pow (cos phi2) 6)) (* (+ 1 (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (* (pow (cos lambda1) 4) (pow (cos phi2) 4)))) (- 1 (* (cos lambda1) (cos phi2))))))))
#s(approx (* (cos phi2) (cos lambda2)) #s(hole binary64 (cos phi2)))
#s(approx (* (cos phi2) (cos lambda2)) #s(hole binary64 (+ (cos phi2) (* -1/2 (* (pow lambda2 2) (cos phi2))))))
#s(approx (* (cos phi2) (cos lambda2)) #s(hole binary64 (+ (cos phi2) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda2 2) (cos phi2))))))))
#s(approx (* (cos phi2) (cos lambda2)) #s(hole binary64 (+ (cos phi2) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (cos phi2))) (* 1/24 (cos phi2)))))))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (/ (* (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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) (- (* 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 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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi1) (* (cos phi2) (sin lambda1)))) 2)) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2)))) 3))) (+ (/ (* (- (* 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) (- (* 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) 3) (* (pow (cos phi2) 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)) (/ (* (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))))))) (/ (* (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) (- (* 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 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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi1) (* (cos phi2) (sin lambda1)))) 2)) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (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 lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (* (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (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))))))) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2)))) 3))) (+ (/ (* (- (* 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))))) (+ (/ (* (- (* 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) (- (* 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) 3) (* (pow (cos phi2) 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))))) (- (+ (* (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) (- (* 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) 3) (* (pow (cos phi2) 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)) (/ (* (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))))))))) (/ (* (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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi1) (* (cos phi2) (sin lambda1)))) 2)) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2)))) 3))) (+ (/ (* (- (* 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) (- (* 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) 3) (* (pow (cos phi2) 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)) (/ (* (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))))))) (/ (* (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) (- (* 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 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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (pow (cos phi1) 3) (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2)))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* -1 (/ (* lambda2 (* (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 phi1) 3) (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* lambda2 (- (* -1 (* lambda2 (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi1) (* (cos phi2) (sin lambda1)))) 2)) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (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))))) (/ (* (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 phi1) 3) (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (+ (* -1 (/ (* (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi1) (* (cos phi2) (sin lambda1)))) 2)) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (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 lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (* (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (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))))))) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi1) (* (cos phi2) (sin lambda1)))) 2)) (pow (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (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))))) (/ (* (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 phi1) 3) (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2))))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* lambda2 (- (/ (* (cos phi2) (sin lambda1)) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))))) (/ 1 (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* lambda2 (- (+ (* lambda2 (- (* -1/2 (/ (* (cos lambda1) (cos phi2)) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))) (+ (/ (* (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1))) (- (/ (* (cos phi2) (sin lambda1)) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))))) (/ (* (cos phi2) (sin lambda1)) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))))) (/ 1 (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* lambda2 (- (+ (* lambda2 (- (+ (* -1/2 (/ (* (cos lambda1) (cos phi2)) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))) (* lambda2 (- (* -1/6 (/ (* (cos phi2) (sin lambda1)) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))) (+ (/ (* (- (* -1/2 (/ (* (cos lambda1) (cos phi2)) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))) (+ (/ (* (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1))) (- (/ (* (cos phi2) (sin lambda1)) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)))) (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1)))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (+ (/ (* (- (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (* -1/2 (* (cos lambda1) (cos phi2)))) (- (/ (* (cos phi2) (sin lambda1)) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))))))) (+ (/ (* (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1))) (- (/ (* (cos phi2) (sin lambda1)) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2)) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))))) (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))))) (/ (* (cos phi2) (sin lambda1)) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))) (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (pow (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2))) 2))))) (/ 1 (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* lambda2 (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1)))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))) (* (cos lambda1) (cos phi2)))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* 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 phi2)))))) (* (cos phi2) (sin lambda1)))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))) (* (cos lambda1) (cos phi2)))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* 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 phi2) (sin lambda1))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* -1/2 (* (cos lambda1) (cos phi2)))))) (* (cos phi2) (sin lambda1)))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))) (* (cos lambda1) (cos phi2)))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (+ (* 2 (* lambda2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (+ (* 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 (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (+ (* 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 (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (* (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)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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) (- (* 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))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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))))) (+ (/ (* (- (* 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) (- (* 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) 3) (* (pow (cos phi2) 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))))) (/ (* (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) (- (* 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))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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))))) (+ (/ (* (- (* 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))))) (+ (/ (* (- (* 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) (- (* 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) 3) (* (pow (cos phi2) 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))))) (- (+ (* (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) (- (* 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) 3) (* (pow (cos phi2) 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)))))) (/ (* (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)))))) (+ (/ (* (- (* 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) (- (* 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) 3) (* (pow (cos phi2) 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))))) (/ (* (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) (- (* 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))))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) #s(hole binary64 (* (pow (cos lambda1) 3) (pow (cos phi2) 3))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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)))))
#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 phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (* (cos lambda1) (* (cos phi1) (cos phi2))))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (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))) (* -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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (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))))) (* -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 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (* (cos lambda1) (cos phi2)))))
#s(approx (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* lambda2 (- (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* (cos phi2) (sin lambda1)))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))) (* (cos lambda1) (cos phi2)))))
#s(approx (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* 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 phi2)))))) (* (cos phi2) (sin lambda1)))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))) (* (cos lambda1) (cos phi2)))))
#s(approx (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* 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 phi2) (sin lambda1))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (* -1/2 (* (cos lambda1) (cos phi2)))))) (* (cos phi2) (sin lambda1)))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))) (* (cos lambda1) (cos phi2)))))
#s(approx (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ 1 (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ 1 (+ (* 2 (* lambda2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))))
#s(approx (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ 1 (+ (* 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 (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ 1 (+ (* 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 (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 1))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (+ 1 (* lambda1 lambda2))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2))))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (+ 1 (* lambda2 (+ lambda1 (* lambda2 (- (* -1/6 (* lambda1 lambda2)) 1/2)))))))
#s(approx (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2)))) #s(hole binary64 1))
#s(approx (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2)))) #s(hole binary64 (+ 1 (* lambda1 lambda2))))
#s(approx (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2)))) #s(hole binary64 (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2))))))
#s(approx (* lambda2 (+ lambda1 (* -1/2 lambda2))) #s(hole binary64 (* lambda2 (+ lambda1 (* -1/2 lambda2)))))
#s(approx (* -1/2 lambda2) #s(hole binary64 (* -1/2 lambda2)))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) #s(hole binary64 1))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) #s(hole binary64 (+ 1 (* lambda1 lambda2))))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) #s(hole binary64 (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2))))))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) #s(hole binary64 (+ 1 (* lambda2 (+ lambda1 (* lambda2 (- (* -1/6 (* lambda1 lambda2)) 1/2)))))))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) #s(hole binary64 (/ 1 lambda1)))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) #s(hole binary64 (+ lambda2 (/ 1 lambda1))))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) #s(hole binary64 (+ (* lambda2 (+ 1 (* -1/2 (/ lambda2 lambda1)))) (/ 1 lambda1))))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) #s(hole binary64 (+ (* lambda2 (+ 1 (* lambda2 (- (* -1/6 lambda2) (* 1/2 (/ 1 lambda1)))))) (/ 1 lambda1))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) #s(hole binary64 (* (pow lambda1 2) (- (/ 1 (pow lambda1 2)) 1/2))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) #s(hole binary64 (+ (* lambda1 lambda2) (* (pow lambda1 2) (- (/ 1 (pow lambda1 2)) 1/2)))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) #s(hole binary64 (+ (* lambda2 (+ lambda1 (* (pow lambda1 2) (* lambda2 (- 1/4 (* 1/2 (/ 1 (pow lambda1 2)))))))) (* (pow lambda1 2) (- (/ 1 (pow lambda1 2)) 1/2)))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) #s(hole binary64 (+ (* lambda2 (+ lambda1 (* lambda2 (+ (* -1/6 (* lambda1 lambda2)) (* (pow lambda1 2) (- 1/4 (* 1/2 (/ 1 (pow lambda1 2))))))))) (* (pow lambda1 2) (- (/ 1 (pow lambda1 2)) 1/2)))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) #s(hole binary64 (- (/ 1 (pow lambda1 2)) 1/2)))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) #s(hole binary64 (- (+ (/ 1 (pow lambda1 2)) (/ lambda2 lambda1)) 1/2)))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) #s(hole binary64 (- (+ (* lambda2 (+ (* lambda2 (- 1/4 (* 1/2 (/ 1 (pow lambda1 2))))) (/ 1 lambda1))) (/ 1 (pow lambda1 2))) 1/2)))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) #s(hole binary64 (- (+ (* lambda2 (+ (* lambda2 (- (+ 1/4 (* -1/6 (/ lambda2 lambda1))) (* 1/2 (/ 1 (pow lambda1 2))))) (/ 1 lambda1))) (/ 1 (pow lambda1 2))) 1/2)))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) #s(hole binary64 (/ -1 (pow lambda1 2))))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) #s(hole binary64 (- (* -1 (/ lambda2 lambda1)) (/ 1 (pow lambda1 2)))))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) #s(hole binary64 (- (* lambda2 (- (* 1/2 (/ lambda2 (pow lambda1 2))) (/ 1 lambda1))) (/ 1 (pow lambda1 2)))))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) #s(hole binary64 (- (* lambda2 (- (* lambda2 (+ (* 1/6 (/ lambda2 lambda1)) (* 1/2 (/ 1 (pow lambda1 2))))) (/ 1 lambda1))) (/ 1 (pow lambda1 2)))))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) #s(hole binary64 (/ -1 lambda1)))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) #s(hole binary64 (- (* -1 lambda2) (/ 1 lambda1))))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) #s(hole binary64 (- (* lambda2 (- (* 1/2 (/ lambda2 lambda1)) 1)) (/ 1 lambda1))))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) #s(hole binary64 (- (* lambda2 (- (* lambda2 (+ (* 1/6 lambda2) (* 1/2 (/ 1 lambda1)))) 1)) (/ 1 lambda1))))
#s(approx (* -1 (/ (cos lambda2) lambda1)) #s(hole binary64 (/ -1 lambda1)))
#s(approx (* -1 (/ (cos lambda2) lambda1)) #s(hole binary64 (- (* 1/2 (/ (pow lambda2 2) lambda1)) (/ 1 lambda1))))
#s(approx (* -1 (/ (cos lambda2) lambda1)) #s(hole binary64 (- (* (pow lambda2 2) (+ (* -1/24 (/ (pow lambda2 2) lambda1)) (* 1/2 (/ 1 lambda1)))) (/ 1 lambda1))))
#s(approx (* -1 (/ (cos lambda2) lambda1)) #s(hole binary64 (- (* (pow lambda2 2) (+ (* (pow lambda2 2) (- (* 1/720 (/ (pow lambda2 2) lambda1)) (* 1/24 (/ 1 lambda1)))) (* 1/2 (/ 1 lambda1)))) (/ 1 lambda1))))
#s(approx (* -1/2 (cos lambda2)) #s(hole binary64 -1/2))
#s(approx (* -1/2 (cos lambda2)) #s(hole binary64 (- (* 1/4 (pow lambda2 2)) 1/2)))
#s(approx (* -1/2 (cos lambda2)) #s(hole binary64 (- (* (pow lambda2 2) (+ 1/4 (* -1/48 (pow lambda2 2)))) 1/2)))
#s(approx (* -1/2 (cos lambda2)) #s(hole binary64 (- (* (pow lambda2 2) (+ 1/4 (* (pow lambda2 2) (- (* 1/1440 (pow lambda2 2)) 1/48)))) 1/2)))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (/ (* lambda2 (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1)))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda2 (- (* -1 (* lambda2 (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (+ (* 1/6 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))) (+ (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1)))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (/ (* (cos phi2) (* (sin lambda1) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 3))) (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (* -1 (/ (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- 1 (* (cos lambda1) (cos phi2))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (/ 1 (- 1 (* (cos lambda1) (cos phi2)))) (/ (* lambda2 (* (cos phi2) (sin lambda1))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* lambda2 (- (* -1 (* lambda2 (+ (* -1 (/ (* (pow (cos phi2) 2) (pow (sin lambda1) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 3))) (* 1/2 (/ (* (cos lambda1) (cos phi2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (* -1 (/ (* (cos phi2) (sin lambda1)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ 1 (- 1 (* (cos lambda1) (cos phi2)))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (+ (* 1/6 (/ (* (cos phi2) (sin lambda1)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))) (+ (* 1/2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (pow (- 1 (* (cos lambda1) (cos phi2))) 3))) (/ (* (cos phi2) (* (sin lambda1) (+ (* -1 (/ (* (pow (cos phi2) 2) (pow (sin lambda1) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 3))) (* 1/2 (/ (* (cos lambda1) (cos phi2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (- 1 (* (cos lambda1) (cos phi2)))))))) (+ (* -1 (/ (* (pow (cos phi2) 2) (pow (sin lambda1) 2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 3))) (* 1/2 (/ (* (cos lambda1) (cos phi2)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))))) (* -1 (/ (* (cos phi2) (sin lambda1)) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))) (/ 1 (- 1 (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (/ (* (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 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* 1/2 (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))))) (* -1 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (+ (* lambda2 (- (/ (* (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) (- (/ (* (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 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* 1/2 (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (+ (* 1/6 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (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 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))) (/ (* (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 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))))) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* 1/2 (/ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))))) (* -1 (/ (* (pow (cos lambda1) 2) (* (pow (cos phi2) 3) (sin lambda1))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #s(hole binary64 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #s(hole binary64 (+ (* 2 (* lambda2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 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 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1)))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (- (* 2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (pow (- (cos phi1) (cos lambda1)) 2))))) (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (- (+ (* 2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* lambda2 (- (+ (* -1 (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1)))) (/ (pow (sin lambda1) 2) (- (cos phi1) (cos lambda1)))) (+ (* -1 (/ (* (sin lambda1) (- (* 2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (pow (- (cos phi1) (cos lambda1)) 2))))) (- (cos phi1) (cos lambda1)))) (* 1/2 (/ (pow (cos lambda1) 3) (pow (- (cos phi1) (cos lambda1)) 2))))))) (* -1 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (pow (- (cos phi1) (cos lambda1)) 2))))) (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* lambda2 (- (+ (* 2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* lambda2 (- (+ (* -1 (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1)))) (+ (* lambda2 (- (+ (* -1 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1/3 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1))))) (+ (* -1 (/ (* (sin lambda1) (- (+ (* -1 (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1)))) (/ (pow (sin lambda1) 2) (- (cos phi1) (cos lambda1)))) (+ (* -1 (/ (* (sin lambda1) (- (* 2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (pow (- (cos phi1) (cos lambda1)) 2))))) (- (cos phi1) (cos lambda1)))) (* 1/2 (/ (pow (cos lambda1) 3) (pow (- (cos phi1) (cos lambda1)) 2)))))) (- (cos phi1) (cos lambda1)))) (+ (* 1/6 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (pow (- (cos phi1) (cos lambda1)) 2))) (* 1/2 (/ (* (cos lambda1) (- (* 2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (pow (- (cos phi1) (cos lambda1)) 2))))) (- (cos phi1) (cos lambda1)))))))) (/ (pow (sin lambda1) 2) (- (cos phi1) (cos lambda1))))) (+ (* -1 (/ (* (sin lambda1) (- (* 2 (/ (* (cos lambda1) (sin lambda1)) (- (cos phi1) (cos lambda1)))) (* -1 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (pow (- (cos phi1) (cos lambda1)) 2))))) (- (cos phi1) (cos lambda1)))) (* 1/2 (/ (pow (cos lambda1) 3) (pow (- (cos phi1) (cos lambda1)) 2))))))) (* -1 (/ (* (pow (cos lambda1) 2) (sin lambda1)) (pow (- (cos phi1) (cos lambda1)) 2))))) (/ (pow (cos lambda1) 2) (- (cos phi1) (cos lambda1))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) #s(hole binary64 (+ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (cos phi1) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ (* (pow (cos lambda1) 3) (pow (cos phi2) 3)) (pow (cos phi1) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ (* lambda2 (- (* -1 (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1)))) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))))) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -1 (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1)))) (* lambda2 (- (* 1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2)))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))))) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))))) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -1 (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1)))) (* lambda2 (- (+ (* 1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2)))) (* lambda2 (- (* 1/6 (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1)))) (* (pow (cos phi2) 2) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 1/6 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (+ (* (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))))))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))))) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))))) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* -1 (* lambda2 (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))))) (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1)))) (* 1/2 (* lambda2 (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2))))))) (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1)))) (* lambda2 (+ (* 1/6 (* lambda2 (* (pow (cos phi1) 2) (* (cos phi2) (sin lambda1))))) (* 1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (cos phi2)))))))) (* (pow (cos phi1) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* lambda2 (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* lambda2 (* (pow (cos phi2) 2) (+ (* -1 (* (cos phi2) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (+ (* 1/6 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (+ (* (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))) (- (cos phi1) (* (cos lambda1) (cos phi2)))) (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))))))) (* (pow (cos phi2) 2) (+ (* -2 (* (cos lambda1) (* (cos phi2) (pow (sin lambda1) 2)))) (+ (* 1/2 (* (pow (cos lambda1) 3) (cos phi2))) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))) (* (pow (cos phi2) 2) (+ (* -1 (* (pow (cos lambda1) 2) (* (cos phi2) (sin lambda1)))) (* 2 (* (cos lambda1) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))))) (* (pow (cos lambda1) 2) (* (pow (cos phi2) 2) (- (cos phi1) (* (cos lambda1) (cos phi2))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2)))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* -2 (* lambda2 (* (cos phi2) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda2 (+ (* -2 (* (cos phi2) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (* lambda2 (+ (* (cos lambda1) (* (cos phi2) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2)))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* lambda2 (+ (* -2 (* (cos phi2) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))) (* lambda2 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* 1/3 (* (cos phi2) (* (sin lambda1) (- (cos phi1) (* (cos lambda1) (cos phi2)))))))) (+ (* (cos lambda1) (* (cos phi2) (- (cos phi1) (* (cos lambda1) (cos phi2))))) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))))))) (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2))))
#s(approx (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #s(hole binary64 (- (pow (cos phi1) 2) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #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 (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #s(hole binary64 (* (pow (cos lambda1) 2) (pow (cos phi2) 2))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #s(hole binary64 (+ (* 2 (* lambda2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2)))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #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 (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #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 (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (* 2 (log (* (cos lambda1) (cos phi2))))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (+ (* 2 (log (* (cos lambda1) (cos phi2)))) (* 2 (/ (* lambda2 (sin lambda1)) (cos lambda1))))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (+ (* 2 (log (* (cos lambda1) (cos phi2)))) (* lambda2 (+ (* 2 (/ (sin lambda1) (cos lambda1))) (* lambda2 (- (* -1 (/ (pow (sin lambda1) 2) (pow (cos lambda1) 2))) 1)))))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (+ (* 2 (log (* (cos lambda1) (cos phi2)))) (* lambda2 (+ (* 2 (/ (sin lambda1) (cos lambda1))) (* lambda2 (- (+ (* -1 (/ (pow (sin lambda1) 2) (pow (cos lambda1) 2))) (* 1/3 (* lambda2 (+ (* -1 (/ (sin lambda1) (cos lambda1))) (+ (* 2 (/ (pow (sin lambda1) 3) (pow (cos lambda1) 3))) (* 3 (/ (sin lambda1) (cos lambda1)))))))) 1)))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (log (* (cos lambda1) (cos phi2)))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (+ (log (* (cos lambda1) (cos phi2))) (/ (* lambda2 (sin lambda1)) (cos lambda1)))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (+ (log (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* 1/2 (* lambda2 (- (* -1 (/ (pow (sin lambda1) 2) (pow (cos lambda1) 2))) 1))) (/ (sin lambda1) (cos lambda1)))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (+ (log (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* lambda2 (+ (* 1/6 (* lambda2 (+ (* -1 (/ (sin lambda1) (cos lambda1))) (+ (* 2 (/ (pow (sin lambda1) 3) (pow (cos lambda1) 3))) (* 3 (/ (sin lambda1) (cos lambda1))))))) (* 1/2 (- (* -1 (/ (pow (sin lambda1) 2) (pow (cos lambda1) 2))) 1)))) (/ (sin lambda1) (cos lambda1)))))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (+ (* -1 (pow lambda2 3)) (pow lambda1 3))))
#s(approx (pow lambda2 3) #s(hole binary64 (pow lambda2 3)))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 lambda2) (pow lambda1 2))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) #s(hole binary64 (* lambda2 (+ lambda1 lambda2))))
#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 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 (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ 1 (* (cos lambda1) (cos phi2)))))
#s(approx (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ 1 (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ 1 (+ (* 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 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (/ (+ (pow lambda1 3) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 3)) (- (+ (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)) (* lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (- (+ (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)) (* lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) #s(hole binary64 (- (pow lambda1 2) (* lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) #s(hole binary64 (/ (- (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)) (- lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* lambda2 (- (* -1 (/ (+ (* -1 (pow lambda1 2)) (pow lambda1 2)) (pow lambda2 2))) (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* lambda2 (- (/ (* lambda1 (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) (pow lambda2 3)) (+ 1 (+ (* -1 (/ lambda1 lambda2)) (+ (* -1 (/ (pow lambda1 2) (pow lambda2 2))) (/ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (cos (neg lambda2)) #s(hole binary64 (cos (neg lambda2))))
#s(approx (sin (neg lambda2)) #s(hole binary64 (sin (neg lambda2))))
#s(approx (* lambda2 (- (/ lambda1 lambda2) 1)) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1))))
#s(approx (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos lambda2) (cos phi2)))))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) #s(hole binary64 (* -1 lambda2)))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) #s(hole binary64 (* lambda2 (- (+ (* 1/2 (/ (PI) lambda2)) (/ lambda1 lambda2)) 1))))
#s(approx (cos lambda2) #s(hole binary64 (cos lambda2)))
#s(approx (sin lambda2) #s(hole binary64 (sin lambda2)))
#s(approx (+ (cos lambda2) (cos phi1)) #s(hole binary64 (+ (cos lambda2) (cos phi1))))
#s(approx (neg (sin lambda2)) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))))
#s(approx (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))) #s(hole binary64 (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg 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 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) #s(hole binary64 (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))))
#s(approx (sin (+ lambda2 (/ (PI) 2))) #s(hole binary64 (sin (+ lambda2 (* 1/2 (PI))))))
#s(approx (+ lambda2 (/ (PI) 2)) #s(hole binary64 lambda2))
#s(approx (+ lambda2 (/ (PI) 2)) #s(hole binary64 (* lambda2 (+ 1 (* 1/2 (/ (PI) lambda2))))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) #s(hole binary64 (* 1/6 (pow lambda2 3))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) #s(hole binary64 (* (pow lambda2 3) (+ 1/6 (* -1/2 (/ lambda1 lambda2))))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) #s(hole binary64 (* (pow lambda2 3) (- (+ 1/6 (* -1/2 (/ lambda1 lambda2))) (/ 1 (pow lambda2 2))))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) #s(hole binary64 (* (pow lambda2 3) (- (+ 1/6 (+ (* -1/2 (/ lambda1 lambda2)) (/ lambda1 (pow lambda2 3)))) (/ 1 (pow lambda2 2))))))
#s(approx (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)) #s(hole binary64 (* 1/6 (pow lambda2 3))))
#s(approx (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)) #s(hole binary64 (* (pow lambda2 3) (+ 1/6 (* -1/2 (/ lambda1 lambda2))))))
#s(approx (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)) #s(hole binary64 (* (pow lambda2 3) (- (+ 1/6 (* -1/2 (/ lambda1 lambda2))) (/ 1 (pow lambda2 2))))))
#s(approx (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1) #s(hole binary64 (* 1/6 (pow lambda2 2))))
#s(approx (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1) #s(hole binary64 (* (pow lambda2 2) (+ 1/6 (* -1/2 (/ lambda1 lambda2))))))
#s(approx (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1) #s(hole binary64 (* (pow lambda2 2) (- (+ 1/6 (* -1/2 (/ lambda1 lambda2))) (/ 1 (pow lambda2 2))))))
#s(approx (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) #s(hole binary64 (* (pow lambda2 2) (+ 1/6 (* -1/2 (/ lambda1 lambda2))))))
#s(approx (+ (* -1/2 lambda1) (* 1/6 lambda2)) #s(hole binary64 (* lambda2 (+ 1/6 (* -1/2 (/ lambda1 lambda2))))))
#s(approx (+ 1 (* (cos lambda2) (cos phi2))) #s(hole binary64 (+ 1 (* (cos lambda2) (cos phi2)))))
#s(approx (* (cos lambda2) (cos phi2)) #s(hole binary64 (* (cos lambda2) (cos phi2))))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* lambda2 (- (* -1 (/ (+ (* -1 (pow lambda1 2)) (pow lambda1 2)) (pow lambda2 2))) (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* lambda2 (- (/ (* lambda1 (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) (pow lambda2 3)) (+ 1 (+ (* -1 (/ lambda1 lambda2)) (+ (* -1 (/ (pow lambda1 2) (pow lambda2 2))) (/ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (- (* -1 (/ (+ (* -1 (pow lambda1 2)) (pow lambda1 2)) (pow lambda2 2))) (+ 1 (* -1 (/ lambda1 lambda2))))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (- (/ (* lambda1 (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) (pow lambda2 3)) (+ 1 (+ (* -1 (/ lambda1 lambda2)) (+ (* -1 (/ (pow lambda1 2) (pow lambda2 2))) (/ (pow lambda1 2) (pow lambda2 2))))))))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) #s(hole binary64 (+ 1 (+ (/ lambda1 lambda2) (/ (pow lambda1 2) (pow lambda2 2))))))
#s(approx (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1))))
#s(approx (+ 1 (* -1 (/ lambda2 lambda1))) #s(hole binary64 (* lambda2 (- (/ 1 lambda2) (/ 1 lambda1)))))
#s(approx (- (+ lambda1 (* 1/2 (PI))) lambda2) #s(hole binary64 (* -1 lambda2)))
#s(approx (- (+ lambda1 (* 1/2 (PI))) lambda2) #s(hole binary64 (* lambda2 (- (+ (* 1/2 (/ (PI) lambda2)) (/ lambda1 lambda2)) 1))))
#s(approx (- (* 1/2 (PI)) lambda2) #s(hole binary64 (* -1 lambda2)))
#s(approx (- (* 1/2 (PI)) lambda2) #s(hole binary64 (* lambda2 (- (* 1/2 (/ (PI) lambda2)) 1))))
#s(approx (* (cos phi2) (cos lambda2)) #s(hole binary64 (* (cos lambda2) (cos phi2))))
#s(approx (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2)))) #s(hole binary64 (* -1/2 (pow lambda2 2))))
#s(approx (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2)))) #s(hole binary64 (* (pow lambda2 2) (- (/ lambda1 lambda2) 1/2))))
#s(approx (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2)))) #s(hole binary64 (* (pow lambda2 2) (- (+ (/ 1 (pow lambda2 2)) (/ lambda1 lambda2)) 1/2))))
#s(approx (* lambda2 (+ lambda1 (* -1/2 lambda2))) #s(hole binary64 (* (pow lambda2 2) (- (/ lambda1 lambda2) 1/2))))
#s(approx (+ lambda1 (* -1/2 lambda2)) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1/2))))
#s(approx (* -1/2 (cos lambda2)) #s(hole binary64 (* -1/2 (cos lambda2))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (* (pow lambda2 3) (- (/ (pow lambda1 3) (pow lambda2 3)) 1))))
#s(approx (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) #s(hole binary64 (* (pow lambda2 3) (- (/ (pow lambda1 3) (pow lambda2 3)) 1))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (* (pow lambda2 2) (+ 1 (/ lambda1 lambda2)))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (* (pow lambda2 2) (+ 1 (+ (/ lambda1 lambda2) (/ (pow lambda1 2) (pow lambda2 2)))))))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) #s(hole binary64 (* (pow lambda2 2) (+ 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))) lambda1) 1) 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))) lambda1) 1) #s(hole binary64 (+ 1 (/ (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) lambda1))))
#s(approx (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1) #s(hole binary64 (/ (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) lambda1)))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (* (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 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (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 (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) #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))) #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 (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) lambda1) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))) lambda1)))))
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) #s(hole binary64 (+ 1 (/ (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))) lambda1))))
#s(approx (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) #s(hole binary64 (/ (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))) lambda1)))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (cos (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ (- (+ (* -1 (/ (pow lambda1 2) lambda2)) (/ (pow lambda1 2) lambda2)) (* -1 lambda1)) lambda2)))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ (- (* -1 (/ (- (/ (* lambda1 (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) lambda2) (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) lambda2)) (* -1 lambda1)) lambda2)))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (cos phi1) (cos (+ lambda1 (* -1 lambda2))))))
#s(approx (cos (neg lambda2)) #s(hole binary64 (cos (* -1 lambda2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (* (cos (+ lambda1 (* -1 lambda2))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (+ (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (+ (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi1) (+ (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1)))))
#s(approx (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (sin (+ lambda1 (* -1 lambda2))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (sin (+ lambda1 (* -1 lambda2))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (* (sin (+ lambda1 (* -1 lambda2))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (sin (neg lambda2)) #s(hole binary64 (sin (* -1 lambda2))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) #s(hole binary64 (+ (sin (* -1 lambda2)) (* lambda1 (cos (* -1 lambda2))))))
#s(approx (* lambda1 (cos (neg lambda2))) #s(hole binary64 (* lambda1 (cos (* -1 lambda2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (cos (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))
#s(approx (* lambda2 (- (/ lambda1 lambda2) 1)) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI))))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) #s(hole binary64 (+ 1 (* (cos (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (* (cos (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (cos (+ lambda1 (* -1 lambda2))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) #s(hole binary64 (+ (cos (* -1 lambda2)) (* -1 (* lambda1 (sin (* -1 lambda2)))))))
#s(approx (* -1 (* lambda1 (sin (neg lambda2)))) #s(hole binary64 (* -1 (* lambda1 (sin (* -1 lambda2))))))
#s(approx (* lambda1 (sin (neg lambda2))) #s(hole binary64 (* lambda1 (sin (* -1 lambda2)))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (+ lambda1 (* -1 lambda2))) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (+ lambda1 (* -1 lambda2))) (* -1/2 (* (pow phi2 2) (sin (+ lambda1 (* -1 lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (sin (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (sin (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (* (sin (+ lambda1 (* -1 lambda2))) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (* (sin (* -1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (sin (+ lambda1 (+ (* -1 lambda2) (* 1/2 (PI)))))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) #s(hole binary64 (sin (+ lambda1 (+ (* -1 lambda2) (* 1/2 (PI)))))))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ (+ lambda1 (* 1/2 (PI))) lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (/ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (/ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (/ (* (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 (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (- (pow (cos phi1) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (- (cos phi1) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (pow (cos phi1) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))))
#s(approx (pow (cos (- lambda1 lambda2)) 2) #s(hole binary64 (pow (cos (+ lambda1 (* -1 lambda2))) 2)))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (cos phi1) (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 (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) #s(hole binary64 (+ (cos (* -1 lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (* -1 lambda2)))) (sin (* -1 lambda2)))))))
#s(approx (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))) #s(hole binary64 (* lambda1 (- (* -1/2 (* lambda1 (cos (* -1 lambda2)))) (sin (* -1 lambda2))))))
#s(approx (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))) #s(hole binary64 (- (* -1/2 (* lambda1 (cos (* -1 lambda2)))) (sin (* -1 lambda2)))))
#s(approx (* -1/2 (* lambda1 (cos (neg lambda2)))) #s(hole binary64 (* -1/2 (* lambda1 (cos (* -1 lambda2))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) #s(hole binary64 (+ (cos (* -1 lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (* -1 lambda2))) (* 1/6 (* lambda1 (sin (* -1 lambda2)))))) (sin (* -1 lambda2)))))))
#s(approx (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) #s(hole binary64 (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (* -1 lambda2))) (* 1/6 (* lambda1 (sin (* -1 lambda2)))))) (sin (* -1 lambda2))))))
#s(approx (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))) #s(hole binary64 (- (* lambda1 (+ (* -1/2 (cos (* -1 lambda2))) (* 1/6 (* lambda1 (sin (* -1 lambda2)))))) (sin (* -1 lambda2)))))
#s(approx (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) #s(hole binary64 (* lambda1 (+ (* -1/2 (cos (* -1 lambda2))) (* 1/6 (* lambda1 (sin (* -1 lambda2))))))))
#s(approx (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2))))) #s(hole binary64 (+ (* -1/2 (cos (* -1 lambda2))) (* 1/6 (* lambda1 (sin (* -1 lambda2)))))))
#s(approx (* 1/6 (* lambda1 (sin (neg lambda2)))) #s(hole binary64 (* 1/6 (* lambda1 (sin (* -1 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) #s(hole binary64 (- (* lambda1 (sin (- (* 1/2 (PI)) (* -1 lambda2)))) (sin lambda2))))
#s(approx (sin (+ lambda2 (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (* -1 lambda2)))))
#s(approx (+ lambda2 (/ (PI) 2)) #s(hole binary64 (* -1 (* lambda2 (- (* -1/2 (/ (PI) lambda2)) 1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(hole binary64 (sin (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) #s(hole binary64 (* -1 (* (pow lambda2 3) (- (* 1/2 (/ lambda1 lambda2)) 1/6)))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) #s(hole binary64 (* -1 (* (pow lambda2 3) (- (* -1 (/ (- (* -1/2 lambda1) (/ 1 lambda2)) lambda2)) 1/6)))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) #s(hole binary64 (* -1 (* (pow lambda2 3) (- (* -1 (/ (+ (* -1 (/ (+ 1 (* -1 (/ lambda1 lambda2))) lambda2)) (* -1/2 lambda1)) lambda2)) 1/6)))))
#s(approx (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)) #s(hole binary64 (* -1 (* (pow lambda2 3) (- (* 1/2 (/ lambda1 lambda2)) 1/6)))))
#s(approx (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)) #s(hole binary64 (* -1 (* (pow lambda2 3) (- (* -1 (/ (- (* -1/2 lambda1) (/ 1 lambda2)) lambda2)) 1/6)))))
#s(approx (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1) #s(hole binary64 (* (pow lambda2 2) (+ 1/6 (* -1 (/ (+ (* 1/2 lambda1) (/ 1 lambda2)) lambda2))))))
#s(approx (+ (* -1/2 lambda1) (* 1/6 lambda2)) #s(hole binary64 (* -1 (* lambda2 (- (* 1/2 (/ lambda1 lambda2)) 1/6)))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 3)) (pow lambda1 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ (+ lambda1 (* -1 (/ (+ (* -1 (pow lambda1 2)) (pow lambda1 2)) lambda2))) lambda2)))))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ (+ lambda1 (* -1 (/ (+ (* -1 (/ (* lambda1 (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) lambda2)) (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) lambda2))) lambda2)))))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (- (* -1 (/ (- (+ (* -1 (/ (pow lambda1 2) lambda2)) (/ (pow lambda1 2) lambda2)) lambda1) lambda2)) 1)))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(hole binary64 (- (* -1 (/ (- (* -1 (/ (- (/ (* lambda1 (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) lambda2) (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) lambda2)) lambda1) lambda2)) 1)))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) #s(hole binary64 (+ 1 (* -1 (/ (+ (* -1 lambda1) (* -1 (/ (pow lambda1 2) lambda2))) lambda2)))))
#s(approx (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (+ 1 (* -1 (/ lambda2 lambda1))) #s(hole binary64 (* -1 (* lambda2 (- (/ 1 lambda1) (/ 1 lambda2))))))
#s(approx (+ 1 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) #s(hole binary64 (+ 1 (sin (+ lambda1 (+ (* -1 lambda2) (* 1/2 (PI))))))))
#s(approx (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) #s(hole binary64 (sin (+ lambda1 (+ (* -1 lambda2) (* 1/2 (PI)))))))
#s(approx (- (+ lambda1 (* 1/2 (PI))) lambda2) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ (+ lambda1 (* 1/2 (PI))) lambda2)))))))
#s(approx (- (* 1/2 (PI)) lambda2) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1/2 (/ (PI) lambda2)))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (+ lambda1 (* -1 lambda2))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (* (cos (+ lambda1 (* -1 lambda2))) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (+ (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi1) (+ (cos (+ lambda1 (* -1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos (+ lambda1 (* -1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (/ (- 1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- 1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (/ (+ 1 (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 3))) (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (/ (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (+ 1 (pow (cos (+ lambda1 (* -1 lambda2))) 3)) (- (+ 1 (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 3)) #s(hole binary64 (+ 1 (pow (cos (+ lambda1 (* -1 lambda2))) 3))))
#s(approx (pow (cos (- lambda1 lambda2)) 3) #s(hole binary64 (pow (cos (+ lambda1 (* -1 lambda2))) 3)))
#s(approx (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ 1 (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (cos (+ lambda1 (* -1 lambda2))))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (+ 1 (pow (cos (+ lambda1 (* -1 lambda2))) 2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* (pow (cos phi2) 2) (* (pow (cos (+ lambda1 (* -1 lambda2))) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) 2))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* (pow (cos phi2) 2) (* (pow (cos (+ lambda1 (* -1 lambda2))) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) 2)))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* (pow (cos phi2) 2) (* (pow (cos (+ lambda1 (* -1 lambda2))) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))) (pow (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) 2))))
#s(approx (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (/ (- 1 (+ (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (* (pow (cos phi2) 2) (* (pow (cos (+ lambda1 (* -1 lambda2))) 2) (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))) (pow (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) 2))))
#s(approx (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) #s(hole binary64 (- 1 (+ (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (* (pow (cos phi2) 2) (* (pow (cos (+ lambda1 (* -1 lambda2))) 2) (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (* (pow (cos phi2) 2) (* (pow (cos (+ lambda1 (* -1 lambda2))) 2) (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))))
#s(approx (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* (pow (cos phi2) 2) (* (pow (cos (+ lambda1 (* -1 lambda2))) 2) (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (* (pow (cos (+ lambda1 (* -1 lambda2))) 2) (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) #s(hole binary64 (pow (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) 2)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (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))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (- (cos phi1) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (+ lambda1 (* -1 lambda2))) 2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (+ lambda1 (* -1 lambda2))) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (+ lambda1 (* -1 lambda2))) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (pow (cos phi1) 6) (* (pow (cos phi2) 6) (pow (cos (+ lambda1 (* -1 lambda2))) 6))) (* (+ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (+ (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)) (pow (cos phi1) 4))) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)))) (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4))))) (* (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (+ lambda1 (* -1 lambda2))) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)))) (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))) (/ (* (pow (cos phi2) 6) (pow (cos (+ lambda1 (* -1 lambda2))) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)))) (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)))) (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4))))) (* (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (+ lambda1 (* -1 lambda2))) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)))) (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))))
#s(approx (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) #s(hole binary64 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)))) (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4))))) (* (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (+ lambda1 (* -1 lambda2))) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) 2)))))))
#s(approx (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) #s(hole binary64 (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)))) (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4))))) (* (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (+ lambda1 (* -1 lambda2))) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) 2))))))
#s(approx (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)))) (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)))) (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) #s(hole binary64 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4))))))
#s(approx (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) #s(hole binary64 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)))))
#s(approx (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) #s(hole binary64 (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4))))
#s(approx (pow (cos (- lambda1 lambda2)) 4) #s(hole binary64 (pow (cos (+ lambda1 (* -1 lambda2))) 4)))
#s(approx (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) #s(hole binary64 (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4))))) (* (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (+ lambda1 (* -1 lambda2))) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) 2)))))
#s(approx (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) #s(hole binary64 (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4))))) (* (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (+ lambda1 (* -1 lambda2))) 6))))))
#s(approx (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) #s(hole binary64 (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4))))) (* (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) 2)))))
#s(approx (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) #s(hole binary64 (* (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) 2))))
#s(approx (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) #s(hole binary64 (- (* -1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) 2)))
#s(approx (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (* -1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)))))
#s(approx (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))))
#s(approx (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) #s(hole binary64 (- 1 (* (pow (cos phi2) 6) (pow (cos (+ lambda1 (* -1 lambda2))) 6)))))
#s(approx (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) #s(hole binary64 (* (pow (cos phi2) 6) (pow (cos (+ lambda1 (* -1 lambda2))) 6))))
#s(approx (pow (cos (- lambda1 lambda2)) 6) #s(hole binary64 (pow (cos (+ lambda1 (* -1 lambda2))) 6)))
#s(approx (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) 2))))
#s(approx (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) #s(hole binary64 (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)))) 2)))
#s(approx (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (/ (* (pow (cos phi2) 6) (pow (cos (+ lambda1 (* -1 lambda2))) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (* (pow (cos phi2) 4) (pow (cos (+ lambda1 (* -1 lambda2))) 4)))) (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (/ (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (/ (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))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (/ (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (/ (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (/ (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 3)) (- (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (/ (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (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 (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 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 (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) #s(hole binary64 (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 3))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ 1 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)))))
#s(approx (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2)))) #s(hole binary64 (* (pow lambda2 2) (- (* -1 (/ (- (* -1 lambda1) (/ 1 lambda2)) lambda2)) 1/2))))
#s(approx (+ lambda1 (* -1/2 lambda2)) #s(hole binary64 (* -1 (* lambda2 (+ 1/2 (* -1 (/ lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- 1 (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (pow (cos (+ lambda1 (* -1 lambda2))) 2) (- (cos phi1) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) #s(hole binary64 (+ (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 3)) (pow (cos phi1) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (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 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ (* (pow (cos phi2) 3) (pow (cos (+ lambda1 (* -1 lambda2))) 3)) (pow (cos phi1) 3))))
#s(approx (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (* (pow (cos phi1) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (* (pow (cos (+ lambda1 (* -1 lambda2))) 2) (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (pow (- (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) 2)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #s(hole binary64 (- (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (* 2 (log (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (log (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) #s(hole binary64 (* -1 (* (pow lambda2 3) (+ 1 (* -1 (/ (pow lambda1 3) (pow lambda2 3))))))))
#s(approx (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) #s(hole binary64 (* -1 (* (pow lambda2 3) (+ 1 (* -1 (/ (pow lambda1 3) (pow lambda2 3))))))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) #s(hole binary64 (* (pow lambda2 2) (+ 1 (* -1 (/ (+ (* -1 lambda1) (* -1 (/ (pow lambda1 2) lambda2))) lambda2))))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) #s(hole binary64 (/ (+ (pow lambda1 3) (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 3)) (- (+ (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 2)) (* lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) #s(hole binary64 (+ (pow lambda1 3) (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 3))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 3)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) #s(hole binary64 (- (+ (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 2)) (* lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) #s(hole binary64 (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 2)))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) #s(hole binary64 (- (pow lambda1 2) (* 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))) lambda1) #s(hole binary64 (* lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) #s(hole binary64 (/ (- (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 2)) (- lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) #s(hole binary64 (- (pow lambda1 2) (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 2))))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) #s(hole binary64 (- lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) lambda1))))))
#s(approx (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) #s(hole binary64 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) lambda1)))))
#s(approx (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) #s(hole binary64 (* -1 (/ (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) lambda1))))
#s(approx (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) #s(hole binary64 (/ (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) lambda1)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #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 (- 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 (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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (cos (- lambda1 lambda2)))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (* -1/2 (pow phi1 2))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (+ (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (+ (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ 1 (+ (* phi1 (cos (* 1/2 (PI)))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ 1 (+ (* phi1 (+ (cos (* 1/2 (PI))) (* -1/2 phi1))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ 1 (+ (* phi1 (+ (cos (* 1/2 (PI))) (* phi1 (- (* -1/6 (* phi1 (cos (* 1/2 (PI))))) 1/2)))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (* (cos phi2) (cos (- lambda1 lambda2)))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (* phi1 (cos (* 1/2 (PI)))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (* phi1 (+ (cos (* 1/2 (PI))) (* -1/6 (* (pow phi1 2) (cos (* 1/2 (PI))))))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (* phi1 (+ (cos (* 1/2 (PI))) (* (pow phi1 2) (+ (* -1/6 (cos (* 1/2 (PI)))) (* 1/120 (* (pow phi1 2) (cos (* 1/2 (PI))))))))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi1)) #s(hole binary64 (* phi1 (cos (* 1/2 (PI))))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi1)) #s(hole binary64 (* phi1 (+ (cos (* 1/2 (PI))) (* -1/6 (* (pow phi1 2) (cos (* 1/2 (PI)))))))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi1)) #s(hole binary64 (* phi1 (+ (cos (* 1/2 (PI))) (* (pow phi1 2) (+ (* -1/6 (cos (* 1/2 (PI)))) (* 1/120 (* (pow phi1 2) (cos (* 1/2 (PI)))))))))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi1)) #s(hole binary64 (* phi1 (+ (cos (* 1/2 (PI))) (* (pow phi1 2) (+ (* -1/6 (cos (* 1/2 (PI)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (cos (* 1/2 (PI))))) (* 1/120 (cos (* 1/2 (PI))))))))))))
#s(approx (sin phi1) #s(hole binary64 phi1))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* -1/6 (pow phi1 2))))))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* (pow phi1 2) (- (* 1/120 (pow phi1 2)) 1/6))))))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/120 (* -1/5040 (pow phi1 2)))) 1/6))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos (- lambda1 lambda2)) (+ (* (cos phi2) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi2)))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ 1 (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ 1 (+ (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ 1 (+ (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* -1/2 (pow phi1 2)) #s(hole binary64 (* -1/2 (pow phi1 2))))
#s(approx (pow phi1 2) #s(hole binary64 (pow phi1 2)))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (* (cos phi2) (cos (- lambda1 lambda2)))))
#s(approx (* phi1 phi1) #s(hole binary64 (pow phi1 2)))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (* (cos lambda2) (cos phi2)))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos lambda2) (cos phi2))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos lambda2) (cos phi2)) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos lambda2) (cos phi2)) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos phi1) (cos phi2)) #s(hole binary64 (+ 1 (cos phi2))))
#s(approx (+ (cos phi1) (cos phi2)) #s(hole binary64 (+ 1 (+ (cos phi2) (* -1/2 (pow phi1 2))))))
#s(approx (+ (cos phi1) (cos phi2)) #s(hole binary64 (+ 1 (+ (cos phi2) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (cos phi2)) #s(hole binary64 (+ 1 (+ (cos phi2) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (/ 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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 1/2 (/ 1 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* (pow phi1 2) (- (+ (* -1/4 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 1/24 (/ 1 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* (pow phi1 2) (- (+ (* -1/4 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* (pow phi1 2) (- (+ (* -1/720 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/720 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/48 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (* 1/2 (/ (+ (* -1/4 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))) (+ (* -1/2 (/ (- (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 1/24 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* 1/24 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 2/45 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 1/24 (/ 1 (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 (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (- 1 (cos (- lambda1 lambda2))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* -1/2 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2))))))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* 1/3 (/ 1 (- 1 (cos (- lambda1 lambda2))))) (+ (* 1/24 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (+ (* -1/2 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (- 1 (cos (- lambda1 lambda2)))))))) (+ (* -1/2 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2))))))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* -1 (* (pow phi1 2) (+ (* -1/2 (/ (- (* 1/3 (/ 1 (- 1 (cos (- lambda1 lambda2))))) (+ (* 1/24 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (+ (* -1/2 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (- 1 (cos (- lambda1 lambda2))))))) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (/ (+ (* -1/2 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/720 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* 2/45 (/ 1 (- 1 (cos (- lambda1 lambda2)))))))))) (* 1/3 (/ 1 (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/24 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (+ (* -1/2 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (- 1 (cos (- lambda1 lambda2)))))))) (+ (* -1/2 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2))))))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- 1 (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ 1 (* -1 (pow phi1 2))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1))) (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))) #s(hole binary64 (- 1 (cos (- lambda1 lambda2)))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ 1 (* -1/2 (pow phi1 2))) (cos (- lambda1 lambda2)))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))) (cos (- lambda1 lambda2)))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))) (cos (- lambda1 lambda2)))))
#s(approx (+ 1 (* -1/2 (pow phi1 2))) #s(hole binary64 1))
#s(approx (+ 1 (* -1/2 (pow phi1 2))) #s(hole binary64 (+ 1 (* -1/2 (pow phi1 2)))))
#s(approx (+ (cos lambda2) (cos phi1)) #s(hole binary64 (+ 1 (cos lambda2))))
#s(approx (+ (cos lambda2) (cos phi1)) #s(hole binary64 (+ 1 (+ (cos lambda2) (* -1/2 (pow phi1 2))))))
#s(approx (+ (cos lambda2) (cos phi1)) #s(hole binary64 (+ 1 (+ (cos lambda2) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos lambda2) (cos phi1)) #s(hole binary64 (+ 1 (+ (cos lambda2) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos 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 lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (* (cos lambda1) (cos phi2)))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* phi1 (cos (* 1/2 (PI)))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* phi1 (+ (cos (* 1/2 (PI))) (* -1/2 phi1))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* phi1 (+ (cos (* 1/2 (PI))) (* phi1 (- (* -1/6 (* phi1 (cos (* 1/2 (PI))))) 1/2)))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ 1 (cos (- lambda1 lambda2)))))
#s(approx (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (* phi1 (cos (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (* phi1 (+ (cos (* 1/2 (PI))) (* -1/2 phi1)))))))
#s(approx (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (* phi1 (+ (cos (* 1/2 (PI))) (* phi1 (- (* -1/6 (* phi1 (cos (* 1/2 (PI))))) 1/2))))))))
#s(approx (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (cos (- lambda1 lambda2))))
#s(approx (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (* phi1 (cos (* 1/2 (PI)))))))
#s(approx (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (* phi1 (+ (cos (* 1/2 (PI))) (* -1/6 (* (pow phi1 2) (cos (* 1/2 (PI))))))))))
#s(approx (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (* phi1 (+ (cos (* 1/2 (PI))) (* (pow phi1 2) (+ (* -1/6 (cos (* 1/2 (PI)))) (* 1/120 (* (pow phi1 2) (cos (* 1/2 (PI))))))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* -1 (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))) (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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 (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 4))) (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 11/24 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (/ (* (+ 1/4 (* 1/12 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 4))))))))) (+ (* -1 (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))) (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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 (/ (* (+ 1/4 (* 1/12 (- 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)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* -1 (/ (- (* 1/3 (/ 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)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 4))) (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 11/24 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (/ (* (+ 1/4 (* 1/12 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 4)))))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* -1/720 (/ (* (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)))))) (+ (* 151/720 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ (* (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (- (* -1/360 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) 1/24)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 4))))))))) (* 1/3 (/ 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)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 4))) (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 11/24 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (/ (* (+ 1/4 (* 1/12 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 4))))))))) (+ (* -1 (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))) (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (- 1 (cos (- lambda1 lambda2))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* -1/2 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2))))))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* 1/3 (/ 1 (- 1 (cos (- lambda1 lambda2))))) (+ (* 1/24 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (+ (* -1/2 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (- 1 (cos (- lambda1 lambda2)))))))) (+ (* -1/2 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2))))))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* -1 (* (pow phi1 2) (+ (* -1/2 (/ (- (* 1/3 (/ 1 (- 1 (cos (- lambda1 lambda2))))) (+ (* 1/24 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (+ (* -1/2 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (- 1 (cos (- lambda1 lambda2))))))) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (/ (+ (* -1/2 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/720 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* 2/45 (/ 1 (- 1 (cos (- lambda1 lambda2)))))))))) (* 1/3 (/ 1 (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/24 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (+ (* -1/2 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (- 1 (cos (- lambda1 lambda2)))))))) (+ (* -1/2 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2))))))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- 1 (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ 1 (* -1 (pow phi1 2))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 phi1)))) #s(hole binary64 1))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 phi1)))) #s(hole binary64 (+ 1 (* -1 (pow phi1 2)))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 phi1)))) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 phi1)))) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))))
#s(approx (* 1/2 (cos (* 2 phi1))) #s(hole binary64 1/2))
#s(approx (* 1/2 (cos (* 2 phi1))) #s(hole binary64 (+ 1/2 (* -1 (pow phi1 2)))))
#s(approx (* 1/2 (cos (* 2 phi1))) #s(hole binary64 (+ 1/2 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)))))
#s(approx (* 1/2 (cos (* 2 phi1))) #s(hole binary64 (+ 1/2 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))))
#s(approx (cos (* 2 phi1)) #s(hole binary64 1))
#s(approx (cos (* 2 phi1)) #s(hole binary64 (+ 1 (* -2 (pow phi1 2)))))
#s(approx (cos (* 2 phi1)) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* 2/3 (pow phi1 2)) 2)))))
#s(approx (cos (* 2 phi1)) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/3 (* -4/45 (pow phi1 2)))) 2)))))
#s(approx (* 2 phi1) #s(hole binary64 (* 2 phi1)))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* 4 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (+ (* -1 (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (+ (* 1/24 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ 5/3 (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* -1 (* (pow phi1 2) (+ (* -1 (/ (* (+ (* -1/2 (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (+ (* 1/24 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ 5/3 (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (+ (* 47/15 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- (* 4 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (+ (* -1 (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (+ (* 1/24 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ 5/3 (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (/ (* (+ (* -1/2 (+ 5/3 (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))))) (+ (* -1/720 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/24 (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -2/45 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 34/45))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))))) (* 4 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (+ (* -1 (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (+ (* 1/24 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ 5/3 (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (- (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (/ 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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (+ (* -1 (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 1 (* -1/2 (* (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))))) (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* 1/24 (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 7/8 (/ 1 (- (+ 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) (pow (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* 1/3 (/ 1 (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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))))) (/ (* (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) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 1 (* -1/2 (* (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))))) (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* -1 (* (pow phi1 2) (+ (* -1 (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (- (+ (* 1/24 (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 7/8 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2))))))) (+ (* 1/3 (/ 1 (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (* (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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)))))) (+ (* -1 (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 2/45 (* -1/720 (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* -1 (/ (+ 2/45 (* -1/720 (* (cos phi2) (cos (- lambda1 lambda2))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 61/240 (/ 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 (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (pow (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (/ (* (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))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (- 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)))) 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))) (* 7/8 (/ 1 (- (+ 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) (pow (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (+ (* 1/3 (/ 1 (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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))))) (/ (* (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) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 1 (* -1/2 (* (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))))) (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* 1/24 (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 7/8 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2))))))) (+ (* 1/3 (/ 1 (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* -1 (* (pow phi1 2) (+ (* -1 (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (- (+ (* 1/24 (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 7/8 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2))))))) (+ (* 1/3 (/ 1 (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (* (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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)))))) (+ (* -1 (/ (+ 2/45 (* -1/720 (* (cos phi2) (cos (- lambda1 lambda2))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 61/240 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2))))))))))) (+ (* 1/24 (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* 7/8 (/ 1 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))))))) (+ (* 1/3 (/ 1 (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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 (/ (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (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))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (* (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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (/ (* (pow phi1 2) (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (/ (* (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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* (pow phi1 2) (- (* -1 (* (pow phi1 2) (+ (* -1 (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (pow (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (/ (* (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) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (/ (* (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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* -1 (* (pow phi1 2) (+ (* -1 (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 2/45 (* -1/720 (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (/ (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1 (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (pow (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (/ (* (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))))) (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (* (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) (- 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)))) 3)))))) (+ (* -1 (/ (* (pow (cos phi2) 3) (* (pow (cos (- lambda1 lambda2)) 3) (pow (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))) 2))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (/ (* (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) 3) (* (pow (cos (- lambda1 lambda2)) 3) (+ 1 (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2))))))) (pow (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (/ (* (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 phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi1 2) (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi1 2) (- (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* (pow phi1 2) (- (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 1/24 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi1 2) (- (+ (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (* (pow phi1 2) (- (+ (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* (pow phi1 2) (- (* 1/720 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* -1/2 (/ (- (* 1/3 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 1/24 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* 1/24 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 2/45 (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 1/24 (/ 1 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ 1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi1 2) (- (* -1 (* (pow phi1 2) (+ (* -1/4 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* -1 (* (pow phi1 2) (+ (* -1/720 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (+ (* 1/48 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (* 1/2 (/ (+ (* -1/4 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))) (+ (* -1/4 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 3))) (* 1/24 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (* -1/2 (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#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 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow phi1 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (pow phi1 2) (- (* -1 (* (pow phi1 2) (+ (* -1/4 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 3))) (* 1/24 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (* -1/2 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* -1 (* (pow phi1 2) (+ (* -1/720 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (+ (* 1/48 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 3))) (* 1/2 (/ (+ (* -1/4 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 3))) (* 1/24 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (- 1 (cos (- lambda1 lambda2))))))))) (+ (* -1/4 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 3))) (* 1/24 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (* -1/2 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) #s(hole binary64 (+ 1 (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) #s(hole binary64 (+ 1 (+ (* -3/2 (pow phi1 2)) (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (exp (* (log (cos phi1)) 3)) #s(hole binary64 1))
#s(approx (exp (* (log (cos phi1)) 3)) #s(hole binary64 (+ 1 (* -3/2 (pow phi1 2)))))
#s(approx (exp (* (log (cos phi1)) 3)) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* 7/8 (pow phi1 2)) 3/2)))))
#s(approx (exp (* (log (cos phi1)) 3)) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 7/8 (* -61/240 (pow phi1 2)))) 3/2)))))
#s(approx (* (log (cos phi1)) 3) #s(hole binary64 (* -3/2 (pow phi1 2))))
#s(approx (* (log (cos phi1)) 3) #s(hole binary64 (* (pow phi1 2) (- (* -1/4 (pow phi1 2)) 3/2))))
#s(approx (* (log (cos phi1)) 3) #s(hole binary64 (* (pow phi1 2) (- (* (pow phi1 2) (- (* -1/15 (pow phi1 2)) 1/4)) 3/2))))
#s(approx (* (log (cos phi1)) 3) #s(hole binary64 (* (pow phi1 2) (- (* (pow phi1 2) (- (* (pow phi1 2) (- (* -17/840 (pow phi1 2)) 1/15)) 1/4)) 3/2))))
#s(approx (log (cos phi1)) #s(hole binary64 (* -1/2 (pow phi1 2))))
#s(approx (log (cos phi1)) #s(hole binary64 (* (pow phi1 2) (- (* -1/12 (pow phi1 2)) 1/2))))
#s(approx (log (cos phi1)) #s(hole binary64 (* (pow phi1 2) (- (* (pow phi1 2) (- (* -1/45 (pow phi1 2)) 1/12)) 1/2))))
#s(approx (log (cos phi1)) #s(hole binary64 (* (pow phi1 2) (- (* (pow phi1 2) (- (* (pow phi1 2) (- (* -17/2520 (pow phi1 2)) 1/45)) 1/12)) 1/2))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ 1 (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ 1 (+ (* -3/2 (pow phi1 2)) (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ 1 (+ (* (pow phi1 2) (- (* 7/8 (pow phi1 2)) 3/2)) (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ 1 (+ (* (pow phi1 2) (- (* (pow phi1 2) (+ 7/8 (* -61/240 (pow phi1 2)))) 3/2)) (* (pow (cos phi2) 3) (pow (cos (- 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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- 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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (* -1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ 1/2 (* -1/2 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))))))) (+ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (+ (* -1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow phi1 2) (- (+ 13/24 (* 1/3 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 1/24 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))) (+ 1/2 (* -1/2 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))))))) (+ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (+ (* -1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow phi1 2) (- (+ 13/24 (+ (* 1/3 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow phi1 2) (- (* -2/45 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ 151/720 (* -1/720 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))))) (* 1/24 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))) (+ 1/2 (* -1/2 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))))))) (+ (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (* -1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) 1/2))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (+ (* -1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow phi1 2) (+ 13/24 (* 1/3 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) 1/2))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (+ (* -1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow phi1 2) (+ 13/24 (+ (* 1/3 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow phi1 2) (- (* -2/45 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) 151/720)))))) 1/2))) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* -1/2 (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* (pow phi1 2) (+ (* -1/2 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 1/24 (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* (pow phi1 2) (+ (* -1/2 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (* 1/24 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))))))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi1 2) (+ (* -1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow phi1 2) (+ 1/4 (* 1/12 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi1 2) (+ (* -1 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow phi1 2) (+ 1/4 (+ (* 1/12 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* (pow phi1 2) (- (* -1/360 (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) 1/24))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))
#s(approx (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2) #s(hole binary64 (pow (- 1 (* (cos lambda1) (cos phi2))) 2)))
#s(approx (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (- 1 (* (cos lambda1) (cos phi2))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))
#s(approx (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2) #s(hole binary64 (+ (* (pow phi1 2) (+ (* -1 (- 1 (* (cos lambda1) (cos phi2)))) (* (pow phi1 2) (+ 1/4 (* 1/12 (- 1 (* (cos lambda1) (cos phi2)))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))
#s(approx (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2) #s(hole binary64 (+ (* (pow phi1 2) (+ (* -1 (- 1 (* (cos lambda1) (cos phi2)))) (* (pow phi1 2) (+ 1/4 (+ (* 1/12 (- 1 (* (cos lambda1) (cos phi2)))) (* (pow phi1 2) (- (* -1/360 (- 1 (* (cos lambda1) (cos phi2)))) 1/24))))))) (pow (- 1 (* (cos lambda1) (cos phi2))) 2))))
#s(approx (- (cos phi1) (* (cos lambda1) (cos phi2))) #s(hole binary64 (- 1 (* (cos lambda1) (cos phi2)))))
#s(approx (- (cos phi1) (* (cos lambda1) (cos phi2))) #s(hole binary64 (- (+ 1 (* -1/2 (pow phi1 2))) (* (cos lambda1) (cos phi2)))))
#s(approx (- (cos phi1) (* (cos lambda1) (cos phi2))) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))) (* (cos lambda1) (cos phi2)))))
#s(approx (- (cos phi1) (* (cos lambda1) (cos phi2))) #s(hole binary64 (- (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))) (* (cos lambda1) (cos phi2)))))
#s(approx (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #s(hole binary64 (- 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #s(hole binary64 (- (+ 1 (* -1 (pow phi1 2))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #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 (cos phi1) #s(hole binary64 (cos phi1)))
#s(approx (* (cos (* 1/2 (PI))) (sin phi1)) #s(hole binary64 (* (cos (* 1/2 (PI))) (sin phi1))))
#s(approx (sin phi1) #s(hole binary64 (sin phi1)))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (* -1/2 (pow phi1 2))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (* (pow phi1 2) (- (+ (/ 1 (pow phi1 2)) (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow phi1 2))) 1/2))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (* -1/2 (pow phi1 2))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (* (pow phi1 2) (- (/ (* (cos phi2) (cos (- lambda1 lambda2))) (pow phi1 2)) 1/2))))
#s(approx (+ (cos phi1) (cos phi2)) #s(hole binary64 (+ (cos phi1) (cos phi2))))
#s(approx (pow (cos phi1) 2) #s(hole binary64 (pow (cos phi1) 2)))
#s(approx (+ 1 (* -1/2 (pow phi1 2))) #s(hole binary64 (* -1/2 (pow phi1 2))))
#s(approx (+ 1 (* -1/2 (pow phi1 2))) #s(hole binary64 (* (pow phi1 2) (- (/ 1 (pow phi1 2)) 1/2))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 phi1)))) #s(hole binary64 (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
#s(approx (* 1/2 (cos (* 2 phi1))) #s(hole binary64 (* 1/2 (cos (* 2 phi1)))))
#s(approx (cos (* 2 phi1)) #s(hole binary64 (cos (* 2 phi1))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (* (pow phi1 2) (- (+ (* -1 (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (/ 1 (* (pow phi1 2) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (pow phi1 2) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (* (pow phi1 2) (+ (* -1 (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (/ 1 (* (pow phi1 2) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))))))
#s(approx (exp (* (log (cos phi1)) 3)) #s(hole binary64 (pow (cos phi1) 3)))
#s(approx (* (log (cos phi1)) 3) #s(hole binary64 (* 3 (log (cos phi1)))))
#s(approx (log (cos phi1)) #s(hole binary64 (log (cos phi1))))
#s(approx (pow (cos phi1) 3) #s(hole binary64 (pow (cos phi1) 3)))
#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 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (cos (- lambda1 lambda2)))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* -1/2 (* (pow phi2 2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* (pow phi2 2) (+ (* -1/2 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* 1/24 (* (pow phi2 2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* (pow phi2 2) (+ (* -1/2 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (* 1/24 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ (cos phi1) (cos (- lambda1 lambda2)))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* phi2 (+ (* -1/2 (* phi2 (cos (- lambda1 lambda2)))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* phi2 (+ (* phi2 (+ (* -1/2 (cos (- lambda1 lambda2))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (cos (- lambda1 lambda2))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (* phi2 (+ (* -1/2 (* phi2 (cos (- lambda1 lambda2)))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (* phi2 (+ (* phi2 (+ (* -1/2 (cos (- lambda1 lambda2))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))))
#s(approx (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))) #s(hole binary64 1))
#s(approx (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))) #s(hole binary64 (+ 1 (* phi2 (cos (* 1/2 (PI)))))))
#s(approx (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))) #s(hole binary64 (+ 1 (* phi2 (+ (cos (* 1/2 (PI))) (* -1/2 phi2))))))
#s(approx (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))) #s(hole binary64 (+ 1 (* phi2 (+ (cos (* 1/2 (PI))) (* phi2 (- (* -1/6 (* phi2 (cos (* 1/2 (PI))))) 1/2)))))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi2)) #s(hole binary64 (* phi2 (cos (* 1/2 (PI))))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi2)) #s(hole binary64 (* phi2 (+ (cos (* 1/2 (PI))) (* -1/6 (* (pow phi2 2) (cos (* 1/2 (PI)))))))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi2)) #s(hole binary64 (* phi2 (+ (cos (* 1/2 (PI))) (* (pow phi2 2) (+ (* -1/6 (cos (* 1/2 (PI)))) (* 1/120 (* (pow phi2 2) (cos (* 1/2 (PI)))))))))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi2)) #s(hole binary64 (* phi2 (+ (cos (* 1/2 (PI))) (* (pow phi2 2) (+ (* -1/6 (cos (* 1/2 (PI)))) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (cos (* 1/2 (PI))))) (* 1/120 (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 phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (+ (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (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))) (* (cos (* 1/2 (PI))) (sin phi1)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (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))) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (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) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* phi2 (* (cos (* 1/2 (PI))) (sin (- lambda1 lambda2)))))))
#s(approx (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* phi2 (+ (* -1/2 (* phi2 (sin (- lambda1 lambda2)))) (* (cos (* 1/2 (PI))) (sin (- lambda1 lambda2))))))))
#s(approx (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* phi2 (+ (* phi2 (+ (* -1/2 (sin (- lambda1 lambda2))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (sin (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (sin (- lambda1 lambda2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (+ (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* -1/2 (* (pow phi2 2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (+ (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* (pow phi2 2) (+ (* -1/2 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* 1/24 (* (pow phi2 2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) #s(hole binary64 (+ (cos phi1) (+ (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* (pow phi2 2) (+ (* -1/2 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (* 1/24 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* -1/2 (* (pow phi2 2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* (pow phi2 2) (+ (* -1/2 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* 1/24 (* (pow phi2 2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* (pow phi2 2) (+ (* -1/2 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (* 1/24 (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) #s(hole binary64 (+ 1 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) #s(hole binary64 (+ 1 (+ (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) #s(hole binary64 (+ 1 (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) #s(hole binary64 (+ 1 (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (+ (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (sin (+ phi2 (* 1/2 (PI)))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ phi2 (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi2 (cos (* 1/2 (PI)))))))
#s(approx (sin (+ phi2 (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi2 (+ (cos (* 1/2 (PI))) (* -1/2 (* phi2 (sin (* 1/2 (PI))))))))))
#s(approx (sin (+ phi2 (* 1/2 (PI)))) #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 (+ phi2 (* 1/2 (PI))) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ phi2 (* 1/2 (PI))) #s(hole binary64 (+ phi2 (* 1/2 (PI)))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (* -1/2 (pow phi1 2))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (+ (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* -1/2 (pow phi1 2)))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (+ (* -1/2 (pow phi1 2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2)))))))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (+ (* -1/2 (pow phi1 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 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (* -1/2 (pow phi1 2)))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* -1/2 (pow phi1 2))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (* -1/2 (pow phi1 2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (* -1/2 (pow phi1 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 (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (* (cos lambda1) (sin (* 1/2 (PI))))))
#s(approx (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (+ (* phi2 (* (cos lambda1) (cos (* 1/2 (PI))))) (* (cos lambda1) (sin (* 1/2 (PI)))))))
#s(approx (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos lambda1) (sin (* 1/2 (PI)))))) (* (cos lambda1) (cos (* 1/2 (PI)))))) (* (cos lambda1) (sin (* 1/2 (PI)))))))
#s(approx (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos lambda1) (sin (* 1/2 (PI))))) (* -1/6 (* phi2 (* (cos lambda1) (cos (* 1/2 (PI)))))))) (* (cos lambda1) (cos (* 1/2 (PI)))))) (* (cos lambda1) (sin (* 1/2 (PI)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* -1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI))))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))) (* (cos (- lambda1 lambda2)) (sin (* 1/2 (PI)))))))
#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 (+ 1 (* -1/2 (* phi2 phi2))) #s(hole binary64 1))
#s(approx (+ 1 (* -1/2 (* phi2 phi2))) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (* -1/2 (* phi2 phi2)) #s(hole binary64 (* -1/2 (pow phi2 2))))
#s(approx (* phi2 phi2) #s(hole binary64 (pow phi2 2)))
#s(approx (sin (+ phi2 (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ phi2 (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi2 (cos (* 1/2 (PI)))))))
#s(approx (sin (+ phi2 (/ (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 (/ (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 (+ phi2 (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ phi2 (/ (PI) 2)) #s(hole binary64 (+ phi2 (* 1/2 (PI)))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (* (* phi2 phi2) -1/2) #s(hole binary64 (* -1/2 (pow phi2 2))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (* (sin (* 1/2 (PI))) (sin (- lambda1 lambda2)))))
#s(approx (* (sin (+ phi2 (/ (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 (/ (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 (/ (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 (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (* (sin (neg lambda2)) (sin (* 1/2 (PI))))))
#s(approx (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (+ (* phi2 (* (cos (* 1/2 (PI))) (sin (neg lambda2)))) (* (sin (neg lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (+ (* phi2 (+ (* -1/2 (* phi2 (* (sin (neg lambda2)) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (sin (neg lambda2))))) (* (sin (neg lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (+ (* phi2 (+ (* phi2 (+ (* -1/2 (* (sin (neg lambda2)) (sin (* 1/2 (PI))))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (sin (neg lambda2))))))) (* (cos (* 1/2 (PI))) (sin (neg lambda2))))) (* (sin (neg lambda2)) (sin (* 1/2 (PI)))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda2) (cos phi1))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda2) (+ (cos phi1) (* -1/2 (* (pow phi2 2) (cos lambda2)))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda2) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* 1/24 (* (pow phi2 2) (cos lambda2)))))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda2) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda2))) (* 1/24 (cos lambda2))))))))))
#s(approx (+ (cos phi1) (cos phi2)) #s(hole binary64 (+ 1 (cos phi1))))
#s(approx (+ (cos phi1) (cos phi2)) #s(hole binary64 (+ 1 (+ (cos phi1) (* -1/2 (pow phi2 2))))))
#s(approx (+ (cos phi1) (cos phi2)) #s(hole binary64 (+ 1 (+ (cos phi1) (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2))))))
#s(approx (+ (cos phi1) (cos phi2)) #s(hole binary64 (+ 1 (+ (cos phi1) (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* -1/2 (* (pow phi2 2) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* 1/24 (* (pow phi2 2) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))) (* 1/24 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (/ (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* (pow phi2 2) (- (+ (* -1/24 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (+ (* -1/4 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3))) (+ (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* (pow phi2 2) (- (+ (* -1/24 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))) (* (pow phi2 2) (- (+ (* -1/24 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/720 (/ (pow (cos (- lambda1 lambda2)) 3) (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 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2)))))))) (- (cos phi1) (cos (- lambda1 lambda2))))))) (+ (* -1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -1/4 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3))) (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* -2/45 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/720 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/48 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3)))))))))) (+ (* -1/4 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3))) (+ (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (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 (+ (* (* phi2 phi2) -1/2) 1) #s(hole binary64 1))
#s(approx (+ (* (* phi2 phi2) -1/2) 1) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (* (* phi2 phi2) (- (pow phi2 -2) 1/2)) #s(hole binary64 1))
#s(approx (* (* phi2 phi2) (- (pow phi2 -2) 1/2)) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (- (pow phi2 -2) 1/2) #s(hole binary64 (/ 1 (pow phi2 2))))
#s(approx (- (pow phi2 -2) 1/2) #s(hole binary64 (/ (+ 1 (* -1/2 (pow phi2 2))) (pow phi2 2))))
#s(approx (pow phi2 -2) #s(hole binary64 (/ 1 (pow phi2 2))))
#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 (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) #s(hole binary64 1))
#s(approx (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))))
#s(approx (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2)) #s(hole binary64 (* -1/2 (pow phi2 2))))
#s(approx (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2)) #s(hole binary64 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2))))
#s(approx (- (* 1/24 (* phi2 phi2)) 1/2) #s(hole binary64 -1/2))
#s(approx (- (* 1/24 (* phi2 phi2)) 1/2) #s(hole binary64 (- (* 1/24 (pow phi2 2)) 1/2)))
#s(approx (* 1/24 (* phi2 phi2)) #s(hole binary64 (* 1/24 (pow phi2 2))))
#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 (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (+ (cos lambda2) (+ (* lambda1 (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* -1/2 (* lambda1 (sin lambda2)))))))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (+ (cos lambda2) (+ (* lambda1 (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (+ (* -1/2 (* lambda1 (sin lambda2))) (* (pow phi2 2) (+ (* 1/24 (cos lambda2)) (* 1/24 (* lambda1 (sin lambda2))))))))))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) #s(hole binary64 (+ (cos lambda2) (+ (* lambda1 (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (+ (* -1/2 (* lambda1 (sin lambda2))) (* (pow phi2 2) (+ (* 1/24 (cos lambda2)) (+ (* 1/24 (* lambda1 (sin lambda2))) (* (pow phi2 2) (+ (* -1/720 (cos lambda2)) (* -1/720 (* lambda1 (sin lambda2)))))))))))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* -1/2 (* (pow phi2 2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* (pow phi2 2) (+ (* -1/2 (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* 1/24 (* (pow phi2 2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) #s(hole binary64 (+ (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (* (pow phi2 2) (+ (* -1/2 (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (* 1/24 (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (cos (- lambda1 lambda2)))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (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)) 1) #s(hole binary64 (+ 1 (+ (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 (+ 1 (* (cos lambda2) (cos phi2))) #s(hole binary64 (+ 1 (cos lambda2))))
#s(approx (+ 1 (* (cos lambda2) (cos phi2))) #s(hole binary64 (+ 1 (+ (cos lambda2) (* -1/2 (* (pow phi2 2) (cos lambda2)))))))
#s(approx (+ 1 (* (cos lambda2) (cos phi2))) #s(hole binary64 (+ 1 (+ (cos lambda2) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* 1/24 (* (pow phi2 2) (cos lambda2)))))))))
#s(approx (+ 1 (* (cos lambda2) (cos phi2))) #s(hole binary64 (+ 1 (+ (cos lambda2) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda2))) (* 1/24 (cos lambda2))))))))))
#s(approx (* (cos lambda2) (cos phi2)) #s(hole binary64 (cos lambda2)))
#s(approx (* (cos lambda2) (cos phi2)) #s(hole binary64 (+ (cos lambda2) (* -1/2 (* (pow phi2 2) (cos lambda2))))))
#s(approx (* (cos lambda2) (cos phi2)) #s(hole binary64 (+ (cos lambda2) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* 1/24 (* (pow phi2 2) (cos lambda2))))))))
#s(approx (* (cos lambda2) (cos phi2)) #s(hole binary64 (+ (cos lambda2) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda2))) (* 1/24 (cos lambda2)))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (cos phi1))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* -1/2 (* (pow phi2 2) (cos lambda1)))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* 1/24 (* (pow phi2 2) (cos lambda1)))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda1))) (* 1/24 (cos lambda1))))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (cos (- lambda1 lambda2)))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* phi2 (+ (* -1/2 (* phi2 (cos (- lambda1 lambda2)))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* phi2 (+ (* phi2 (+ (* -1/2 (cos (- lambda1 lambda2))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (cos (- lambda1 lambda2)))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (* phi2 (+ (* -1/2 (* phi2 (cos (- lambda1 lambda2)))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) #s(hole binary64 (+ 1 (+ (cos (- lambda1 lambda2)) (* phi2 (+ (* phi2 (+ (* -1/2 (cos (- lambda1 lambda2))) (* -1/6 (* phi2 (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2))))))) (* (cos (* 1/2 (PI))) (cos (- lambda1 lambda2)))))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (+ (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2)))))))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (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 (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (/ (- 1 (pow (cos (- lambda1 lambda2)) 2)) (- 1 (cos (- lambda1 lambda2))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- 1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* (pow phi2 2) (- (* -1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (/ (* (cos (- lambda1 lambda2)) (- 1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- 1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (- 1 (cos (- lambda1 lambda2)))))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- 1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* (pow phi2 2) (- (+ (* -1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (* (pow phi2 2) (- (* 2/45 (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (/ (* (cos (- lambda1 lambda2)) (- (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- 1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (- 1 (cos (- lambda1 lambda2))))) (+ (* 1/720 (/ (* (cos (- lambda1 lambda2)) (- 1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (/ (* (cos (- lambda1 lambda2)) (- 1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- 1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (- 1 (cos (- lambda1 lambda2)))))))) (- 1 (cos (- lambda1 lambda2)))))))))) (+ (* -1/24 (/ (* (cos (- lambda1 lambda2)) (- 1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- 1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (- 1 (cos (- lambda1 lambda2)))))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- 1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ 1 (- 1 (cos (- lambda1 lambda2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- 1 (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- (+ 1 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- (+ 1 (* (pow phi2 2) (- (* -1/3 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (- (+ 1 (* (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 (- lambda1 lambda2)) 2))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) #s(hole binary64 (pow (cos (- lambda1 lambda2)) 2)))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) #s(hole binary64 (+ (* -1 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) #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 (* (cos phi2) (cos (- lambda1 lambda2))) 2) #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 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- 1 (cos (- lambda1 lambda2)))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* 1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))) (cos (- lambda1 lambda2)))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* (pow phi2 2) (- (* -1/24 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* -1/2 (cos (- lambda1 lambda2)))))) (cos (- lambda1 lambda2)))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (* (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 (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (/ (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* (pow phi2 2) (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))) (/ (* (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2)))) (+ (/ 1 (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* (pow phi2 2) (- (+ (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))) (* (pow phi2 2) (- (* 7/8 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))) (+ (/ (* (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 1/24 (cos (- lambda1 lambda2))))) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2)) (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))) (/ (* (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))))))) (/ (* (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2)))) (+ (/ 1 (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* (pow phi2 2) (- (+ (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))) (* (pow phi2 2) (- (+ (* 7/8 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))) (* (pow phi2 2) (- (* -61/240 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))) (+ (/ (* (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (* -2/45 (pow (cos (- lambda1 lambda2)) 2)) (* -1/720 (cos (- lambda1 lambda2))))) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2)) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))) (/ (* (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (- (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 1/24 (cos (- lambda1 lambda2))))) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) (/ (* (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2)))) (- (* 7/8 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))) (+ (/ (* (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 1/24 (cos (- lambda1 lambda2))))) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2)) (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))) (/ (* (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))))) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))))))) (+ (/ (* (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 1/24 (cos (- lambda1 lambda2))))) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2)) (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))) (/ (* (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))))))) (/ (* (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2)))) (+ (/ 1 (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (* (cos (- lambda1 lambda2)) (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3)))))) (/ (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* (pow phi2 2) (- (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1/24 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (* (cos (- lambda1 lambda2)) (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3)))))) (- (cos phi1) (cos (- lambda1 lambda2)))) (/ (* (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2))) (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 4))))))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (* (cos (- lambda1 lambda2)) (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3)))))) (/ (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* (pow phi2 2) (- (+ (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* (pow phi2 2) (- (* 1/720 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -2/45 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/720 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* 1/24 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* 1/6 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (/ (* (cos (- lambda1 lambda2)) (- (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1/24 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (* (cos (- lambda1 lambda2)) (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3)))))) (- (cos phi1) (cos (- lambda1 lambda2)))) (/ (* (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2))) (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 4)))))))) (- (cos phi1) (cos (- lambda1 lambda2)))) (+ (/ (* (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2))) (- (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (* (cos (- lambda1 lambda2)) (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2)) (/ (* (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 2)) (* 1/360 (* (cos (- lambda1 lambda2)) (- (cos phi1) (cos (- lambda1 lambda2)))))) (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 4))))))))))) (+ (* -1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1/24 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (/ (* (cos (- lambda1 lambda2)) (- (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (* (cos (- lambda1 lambda2)) (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3)))))) (- (cos phi1) (cos (- lambda1 lambda2)))) (/ (* (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2))) (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 4))))))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (* (cos (- lambda1 lambda2)) (- (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3)))))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (/ (- 1 (+ (cos (- lambda1 lambda2)) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))
#s(approx (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (- (+ (* (pow phi2 2) (- (* -1 (/ (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3)))) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ (* (cos (- lambda1 lambda2)) (- 1 (+ (cos (- lambda1 lambda2)) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (pow (- 1 (cos (- lambda1 lambda2))) 3)))) (/ 1 (pow (- 1 (cos (- lambda1 lambda2))) 2))) (+ (/ (cos (- lambda1 lambda2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))
#s(approx (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* -1 (/ (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3)))) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* (pow phi2 2) (- (* -1 (/ (+ (* -1/2 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/24 (cos (- lambda1 lambda2))) (* 1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (+ (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3)))) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ (* (cos (- lambda1 lambda2)) (- 1 (+ (cos (- lambda1 lambda2)) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (pow (- 1 (cos (- lambda1 lambda2))) 3)))) (- 1 (cos (- lambda1 lambda2)))) (/ (* (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (+ (cos (- lambda1 lambda2)) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (pow (- 1 (cos (- lambda1 lambda2))) 4)))))) (/ (* (cos (- lambda1 lambda2)) (- 1 (+ (cos (- lambda1 lambda2)) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (pow (- 1 (cos (- lambda1 lambda2))) 3)))) (/ 1 (pow (- 1 (cos (- lambda1 lambda2))) 2))) (+ (/ (cos (- lambda1 lambda2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))
#s(approx (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* -1 (/ (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3)))) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* (pow phi2 2) (- (+ (* -1 (/ (+ (* -1/2 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/24 (cos (- lambda1 lambda2))) (* 1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* (pow phi2 2) (- (* -1 (/ (+ (* -2/45 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/720 (cos (- lambda1 lambda2))) (+ (* 1/720 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/24 (pow (cos (- lambda1 lambda2)) 3)) (* 1/6 (pow (cos (- lambda1 lambda2)) 3)))))) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (+ (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (+ (* -1/2 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/24 (cos (- lambda1 lambda2))) (* 1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (+ (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3)))) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ (* (cos (- lambda1 lambda2)) (- 1 (+ (cos (- lambda1 lambda2)) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (pow (- 1 (cos (- lambda1 lambda2))) 3)))) (- 1 (cos (- lambda1 lambda2)))) (/ (* (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (+ (cos (- lambda1 lambda2)) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (- 1 (cos (- lambda1 lambda2)))) (+ (/ (* (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2))) (- (* -1 (/ (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3)))) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ (* (cos (- lambda1 lambda2)) (- 1 (+ (cos (- lambda1 lambda2)) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (pow (- 1 (cos (- lambda1 lambda2))) 3)))) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (/ (* (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 2)) (* 1/360 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (+ (cos (- lambda1 lambda2)) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (pow (- 1 (cos (- lambda1 lambda2))) 4))))))) (+ (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3)))) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ (* (cos (- lambda1 lambda2)) (- 1 (+ (cos (- lambda1 lambda2)) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (pow (- 1 (cos (- lambda1 lambda2))) 3)))) (- 1 (cos (- lambda1 lambda2)))) (/ (* (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (+ (cos (- lambda1 lambda2)) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (pow (- 1 (cos (- lambda1 lambda2))) 4)))))) (/ (* (cos (- lambda1 lambda2)) (- 1 (+ (cos (- lambda1 lambda2)) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (pow (- 1 (cos (- lambda1 lambda2))) 3)))) (/ 1 (pow (- 1 (cos (- lambda1 lambda2))) 2))) (+ (/ (cos (- lambda1 lambda2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (/ (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))
#s(approx (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) #s(hole binary64 (- 1 (+ (cos (- lambda1 lambda2)) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))
#s(approx (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) #s(hole binary64 (- (+ 1 (* -1 (* (pow phi2 2) (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))))) (+ (cos (- lambda1 lambda2)) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))
#s(approx (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) #s(hole binary64 (- (+ 1 (* (pow phi2 2) (- (* -1 (* (pow phi2 2) (+ (* -1/2 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/24 (cos (- lambda1 lambda2))) (* 1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))))) (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))))) (+ (cos (- lambda1 lambda2)) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))
#s(approx (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) #s(hole binary64 (- (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (- (* -1 (* (pow phi2 2) (+ (* -2/45 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/720 (cos (- lambda1 lambda2))) (+ (* 1/720 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/24 (pow (cos (- lambda1 lambda2)) 3)) (* 1/6 (pow (cos (- lambda1 lambda2)) 3)))))))) (+ (* -1/2 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/24 (cos (- lambda1 lambda2))) (* 1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))))) (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))))) (+ (cos (- lambda1 lambda2)) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (* (pow phi2 2) (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (* (pow phi2 2) (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/2 (cos (- lambda1 lambda2))) (+ (* 1/2 (pow (cos (- lambda1 lambda2)) 3)) (* (pow phi2 2) (+ (* -1/2 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/24 (cos (- lambda1 lambda2))) (* 1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))))))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (cos (- lambda1 lambda2)) (+ (* (pow phi2 2) (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/2 (cos (- lambda1 lambda2))) (+ (* 1/2 (pow (cos (- lambda1 lambda2)) 3)) (* (pow phi2 2) (+ (* -1/2 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/24 (cos (- lambda1 lambda2))) (+ (* 1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (* (pow phi2 2) (+ (* -2/45 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/720 (cos (- lambda1 lambda2))) (+ (* 1/720 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/24 (pow (cos (- lambda1 lambda2)) 3)) (* 1/6 (pow (cos (- lambda1 lambda2)) 3)))))))))))))))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))
#s(approx (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))
#s(approx (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3)))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* 1/2 (pow (cos (- lambda1 lambda2)) 3)) (* (pow phi2 2) (+ (* -1/2 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (* 1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* 1/2 (pow (cos (- lambda1 lambda2)) 3)) (* (pow phi2 2) (+ (* -1/2 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (* (pow phi2 2) (+ (* -2/45 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* 1/720 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/24 (pow (cos (- lambda1 lambda2)) 3)) (* 1/6 (pow (cos (- lambda1 lambda2)) 3))))))))))))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 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 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))
#s(approx (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* 1/2 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 3))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -1/24 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 3))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3)))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* (pow phi2 2) (+ (* 1/2 (pow (cos (- lambda1 lambda2)) 3)) (* (pow phi2 2) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (* 1/720 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 3))))))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) #s(hole binary64 (pow (- 1 (cos (- lambda1 lambda2))) 2)))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) #s(hole binary64 (+ (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) #s(hole binary64 (+ (* (pow phi2 2) (+ (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) #s(hole binary64 (+ (* (pow phi2 2) (+ (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (+ (* 1/4 (pow (cos (- lambda1 lambda2)) 2)) (* (pow phi2 2) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 2)) (* 1/360 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2)))))))))))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* (pow phi2 2) (- (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda1 lambda2))))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* (pow phi2 2) (- (+ (* (pow phi2 2) (- (* -1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* -1/24 (/ (* (cos (- lambda1 lambda2)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda1 lambda2))))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* 1/2 (/ (cos (* 2 phi1)) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/720 (/ (* (cos (- lambda1 lambda2)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (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)) (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (* 1/2 (/ 1 (- (cos phi1) (cos (- lambda1 lambda2))))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (* 3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos phi1) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* 3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (* (pow phi2 2) (- (* -4 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (+ (/ (* (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))))) (* (+ (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))) (- (* 3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2))))))))) (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos phi1) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* 3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (* (pow phi2 2) (- (+ (* -4 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (* (pow phi2 2) (- (* 47/15 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (+ (/ (* (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))))) (+ (* 1/720 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (+ (/ (* (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))))) (* (+ (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (- (* 3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2))))) (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))) (- (* -4 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (+ (/ (* (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))))) (* (+ (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))) (- (* 3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))))) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))))))) (+ (/ (* (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))))) (* (+ (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))) (- (* 3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2))))))))) (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (- (cos phi1) (cos (- lambda1 lambda2))))) (- (pow (cos phi1) 6) (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos phi1) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2)))))) (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (+ (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4))) (- (cos phi1) (cos (- lambda1 lambda2))))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* (pow phi2 2) (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4)))))) (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* -3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))))) (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))) (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* (pow phi2 2) (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4)))))) (+ (* (pow phi2 2) (- (+ (* -1 (* (pow phi1 2) (- (+ (* -4 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* -3 (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 5/3 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2))))))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))) (/ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (+ (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))) (- (* -3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))) (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (* (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 5/3 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 4 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))))))))) (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (+ (* -3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))))) (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))) (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* (pow phi2 2) (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4)))))) (+ (* (pow phi2 2) (- (+ (* -1 (* (pow phi1 2) (- (+ (* -4 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* -3 (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 5/3 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2))))))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))) (/ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (+ (* (pow phi2 2) (- (+ (* -1 (* (pow phi1 2) (- (+ (* -4 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* -3 (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (* (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 5/3 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -34/45 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -2/45 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/720 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 47/15 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* -1/6 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/720 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 2/45 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (+ (* (cos (- lambda1 lambda2)) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (- 1 (cos (- lambda1 lambda2))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (pow (cos (- lambda1 lambda2)) 2))))) (* 2 (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))))) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 2)) (* 1/360 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2)))))))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))) (+ (/ (* (+ (* 2 (* (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- (+ (* -4 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))) (/ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))))) (+ (/ (* (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (* (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (- (* -3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))) (+ (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))) (- (* 4 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))) (- (* -3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))) (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (* (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))) (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (+ (* 1/720 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* -47/15 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (* (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 5/3 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -34/45 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -2/45 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/720 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))))))))) (+ (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))) (- (* -3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))) (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (* (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 5/3 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 4 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))))))))) (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (+ (* -3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))))) (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))) (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* (pow phi2 2) (- (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4)))))) (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))))) (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* (pow phi2 2) (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4)))))) (* (pow phi2 2) (- (* -1 (* (pow phi1 2) (- (+ (* -4 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* -3 (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 5/3 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2))))))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))) (/ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 5/3 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2))))))))))))) (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))))) (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) #s(hole binary64 (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* (pow phi2 2) (- (+ (* -1 (* (pow phi1 2) (- (+ (* -3 (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4)))))) (* (pow phi2 2) (- (+ (* -1 (* (pow phi1 2) (- (+ (* -4 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* -3 (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 5/3 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2))))))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))) (/ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (* (pow phi2 2) (- (* -1 (* (pow phi1 2) (- (+ (* -4 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* -3 (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (* (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 5/3 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -34/45 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -2/45 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/720 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 47/15 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* -1/6 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/720 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 2/45 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (+ (* (cos (- lambda1 lambda2)) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (- 1 (cos (- lambda1 lambda2))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (pow (cos (- lambda1 lambda2)) 2))))) (* 2 (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))))) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 2)) (* 1/360 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2)))))))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))) (+ (/ (* (+ (* 2 (* (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- (+ (* -4 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))) (/ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))))) (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (* (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 5/3 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -34/45 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -2/45 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/720 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))))))))) (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 5/3 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2))))))))))))) (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))))) (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))))))
#s(approx (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) #s(hole binary64 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))))
#s(approx (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) #s(hole binary64 (+ (* (pow phi1 2) (* (pow phi2 2) (- (+ (* -3 (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4)))))) (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))))
#s(approx (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) #s(hole binary64 (+ (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (* (pow phi2 2) (+ (* (pow phi1 2) (* (pow phi2 2) (- (+ (* -4 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* -3 (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 5/3 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2))))))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))) (/ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (* (pow phi1 2) (- (+ (* -3 (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))))))))
#s(approx (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) #s(hole binary64 (+ (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (* (pow phi2 2) (+ (* (pow phi1 2) (- (+ (* -3 (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (* (pow phi2 2) (+ (* (pow phi1 2) (* (pow phi2 2) (- (+ (* -4 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* -3 (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (* (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 5/3 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -34/45 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -2/45 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/720 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 47/15 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* -1/6 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/720 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 2/45 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (+ (* (cos (- lambda1 lambda2)) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (- 1 (cos (- lambda1 lambda2))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (pow (cos (- lambda1 lambda2)) 2))))) (* 2 (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))))) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 2)) (* 1/360 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2)))))))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))) (+ (/ (* (+ (* 2 (* (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- (+ (* -4 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))) (/ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))))) (* (pow phi1 2) (- (+ (* -4 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* -3 (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 5/3 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2))))))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))) (/ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))))))))))
#s(approx (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) #s(hole binary64 (+ (* 3 (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))
#s(approx (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) #s(hole binary64 (+ (* 3 (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* (pow phi2 2) (- (+ (* -3 (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))))
#s(approx (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) #s(hole binary64 (+ (* 3 (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* (pow phi2 2) (- (+ (* -3 (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* (pow phi2 2) (- (+ (* -4 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* -3 (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 5/3 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2))))))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))) (/ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))))
#s(approx (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) #s(hole binary64 (+ (* 3 (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* (pow phi2 2) (- (+ (* -3 (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* (pow phi2 2) (- (+ (* -4 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* -3 (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 5/3 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2))))))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* (pow phi2 2) (- (+ (* -4 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* -3 (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (* (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 5/3 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -34/45 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -2/45 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/720 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))))))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 47/15 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* -1/6 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/720 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 2/45 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (+ (* (cos (- lambda1 lambda2)) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (- 1 (cos (- lambda1 lambda2))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (pow (cos (- lambda1 lambda2)) 2))))) (* 2 (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))))) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 2)) (* 1/360 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2)))))))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))) (+ (/ (* (+ (* 2 (* (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- (+ (* -4 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))) (/ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (/ (* (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))) (/ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))))
#s(approx (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* -1 (* (pow phi2 2) (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))))) (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))))
#s(approx (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* (pow phi2 2) (- (* -1 (* (pow phi2 2) (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 5/3 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))))))))) (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))))) (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))))
#s(approx (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* (pow phi2 2) (- (* (pow phi2 2) (- (* -1 (* (pow phi2 2) (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (* (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 5/3 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -34/45 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -2/45 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/720 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))))))))) (+ (* -1 (/ (* (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1/24 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* 1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* 5/3 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))))))))) (+ (* -2 (/ (pow (cos (- lambda1 lambda2)) 4) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))))) (/ 1 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))))
#s(approx (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))
#s(approx (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))))))
#s(approx (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (* (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))))))))))
#s(approx (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (+ (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (+ (* (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (+ (* 1/720 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))))))))))))))
#s(approx (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) #s(hole binary64 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))))
#s(approx (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) #s(hole binary64 (+ 1 (+ (* (pow phi2 2) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))))
#s(approx (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) #s(hole binary64 (+ 1 (+ (* (pow phi2 2) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (+ (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* (pow phi2 2) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))))) (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))))
#s(approx (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) #s(hole binary64 (+ 1 (+ (* (pow phi2 2) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (+ (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* (pow phi2 2) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (+ (* 5/3 (pow (cos (- lambda1 lambda2)) 4)) (* (pow phi2 2) (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (pow (cos (- lambda1 lambda2)) 2)))))))))) (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))))
#s(approx (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) #s(hole binary64 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))
#s(approx (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))))
#s(approx (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (+ (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* (pow phi2 2) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))))) (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))))
#s(approx (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (+ (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* (pow phi2 2) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (+ (* 5/3 (pow (cos (- lambda1 lambda2)) 4)) (* (pow phi2 2) (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (pow (cos (- lambda1 lambda2)) 2)))))))))) (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))))
#s(approx (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) #s(hole binary64 (pow (cos (- lambda1 lambda2)) 4)))
#s(approx (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) #s(hole binary64 (+ (* -2 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 4))) (pow (cos (- lambda1 lambda2)) 4))))
#s(approx (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* 5/3 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 4))))) (pow (cos (- lambda1 lambda2)) 4))))
#s(approx (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* (pow phi2 2) (+ (* -34/45 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 4))) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))))) (pow (cos (- lambda1 lambda2)) 4))))
#s(approx (pow (cos phi2) 4) #s(hole binary64 1))
#s(approx (pow (cos phi2) 4) #s(hole binary64 (+ 1 (* -2 (pow phi2 2)))))
#s(approx (pow (cos phi2) 4) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* 5/3 (pow phi2 2)) 2)))))
#s(approx (pow (cos phi2) 4) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 5/3 (* -34/45 (pow phi2 2)))) 2)))))
#s(approx (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) #s(hole binary64 (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))
#s(approx (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) #s(hole binary64 (+ (* (pow phi2 2) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))
#s(approx (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) #s(hole binary64 (+ (* (pow phi2 2) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* (pow phi2 2) (- (+ (* -4 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))) (/ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))
#s(approx (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) #s(hole binary64 (+ (* (pow phi2 2) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* (pow phi2 2) (- (+ (* -4 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* (pow phi2 2) (- (+ (* -4 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 47/15 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* -1/6 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/720 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 2/45 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (+ (* (cos (- lambda1 lambda2)) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (- 1 (cos (- lambda1 lambda2))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (pow (cos (- lambda1 lambda2)) 2))))) (* 2 (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))))) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 2)) (* 1/360 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2)))))))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))) (+ (/ (* (+ (* 2 (* (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- (+ (* -4 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))) (/ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (/ (* (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (+ (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))) (/ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- (+ (* 3 (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (/ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 4) (pow (- 1 (cos (- lambda1 lambda2))) 4))))) (/ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))
#s(approx (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) #s(hole binary64 (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))))
#s(approx (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) #s(hole binary64 (+ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow phi2 2) (+ (* 3 (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))))) (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))))))))
#s(approx (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) #s(hole binary64 (+ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow phi2 2) (+ (* 3 (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))))) (+ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow phi2 2) (+ (* -4 (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))))) (+ (* 3 (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))) (* (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))))))))))))
#s(approx (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) #s(hole binary64 (+ (* (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow phi2 2) (+ (* 3 (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))))) (+ (* (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow phi2 2) (+ (* -4 (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))))) (+ (* 3 (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))) (+ (* (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (- 1 (pow (cos (- lambda1 lambda2)) 6))) (* (pow phi2 2) (+ (* -4 (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))) (+ (* 3 (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))))) (+ (* 47/15 (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))))) (* (+ (* -1/2 (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* -1/6 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/720 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 2/45 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))) (- 1 (pow (cos (- lambda1 lambda2)) 6)))))))))))))))))
#s(approx (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) #s(hole binary64 (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))))
#s(approx (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) #s(hole binary64 (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (+ (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)) (* (pow phi2 2) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))))))
#s(approx (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) #s(hole binary64 (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (+ (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)) (* (pow phi2 2) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (+ (* (pow phi2 2) (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3)))))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))))))
#s(approx (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) #s(hole binary64 (+ (* -1/2 (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4)))) (+ (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)) (* (pow phi2 2) (+ (* -1/2 (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (+ (* (pow phi2 2) (+ (* -1/2 (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (+ (* 1/2 (pow (cos (- lambda1 lambda2)) 3)) (* (pow phi2 2) (+ (* -1/2 (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (pow (cos (- lambda1 lambda2)) 2)))) (+ (* -1/6 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/720 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 2/45 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))))))))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))))))
#s(approx (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) #s(hole binary64 (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))))
#s(approx (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) #s(hole binary64 (+ (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)) (* (pow phi2 2) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2)))))))))
#s(approx (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) #s(hole binary64 (+ (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)) (* (pow phi2 2) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (+ (* (pow phi2 2) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))))
#s(approx (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) #s(hole binary64 (+ (* (- 1 (cos (- lambda1 lambda2))) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)) (* (pow phi2 2) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (+ (* (pow phi2 2) (+ (* -1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (+ (* 1/2 (pow (cos (- lambda1 lambda2)) 3)) (* (pow phi2 2) (+ (* -1/6 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/720 (* (cos (- lambda1 lambda2)) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2))) (* 2/45 (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))))))) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (cos (- lambda1 lambda2))))))))))
#s(approx (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) #s(hole binary64 (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) 2)))
#s(approx (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) #s(hole binary64 (- (+ (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))) 2)))
#s(approx (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) #s(hole binary64 (- (+ (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* (pow phi2 2) (+ (* -1/3 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))) (pow (cos (- lambda1 lambda2)) 2)))) 2)))
#s(approx (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) #s(hole binary64 (- (+ (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* (pow phi2 2) (+ (* (pow phi2 2) (+ (* -1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 2/45 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))))) (pow (cos (- lambda1 lambda2)) 2)))) 2)))
#s(approx (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (* -1 (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* (pow phi2 2) (+ (* -1/3 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))) (pow (cos (- lambda1 lambda2)) 2))))))
#s(approx (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* (pow phi2 2) (+ (* (pow phi2 2) (+ (* -1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 2/45 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))))) (pow (cos (- lambda1 lambda2)) 2))))))
#s(approx (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (pow (cos (- lambda1 lambda2)) 2)))
#s(approx (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) #s(hole binary64 (+ (* -1 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) #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 (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) #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 (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) #s(hole binary64 (- 1 (pow (cos (- lambda1 lambda2)) 6))))
#s(approx (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) #s(hole binary64 (- (+ 1 (* 3 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 6)))) (pow (cos (- lambda1 lambda2)) 6))))
#s(approx (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) #s(hole binary64 (- (+ 1 (* (pow phi2 2) (- (* -4 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 6))) (* -3 (pow (cos (- lambda1 lambda2)) 6))))) (pow (cos (- lambda1 lambda2)) 6))))
#s(approx (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) #s(hole binary64 (- (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (- (* 47/15 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 6))) (* 4 (pow (cos (- lambda1 lambda2)) 6)))) (* -3 (pow (cos (- lambda1 lambda2)) 6))))) (pow (cos (- lambda1 lambda2)) 6))))
#s(approx (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) #s(hole binary64 (pow (cos (- lambda1 lambda2)) 6)))
#s(approx (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) #s(hole binary64 (+ (* -3 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 6))) (pow (cos (- lambda1 lambda2)) 6))))
#s(approx (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -3 (pow (cos (- lambda1 lambda2)) 6)) (* 4 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 6))))) (pow (cos (- lambda1 lambda2)) 6))))
#s(approx (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -3 (pow (cos (- lambda1 lambda2)) 6)) (* (pow phi2 2) (+ (* -47/15 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 6))) (* 4 (pow (cos (- lambda1 lambda2)) 6)))))) (pow (cos (- lambda1 lambda2)) 6))))
#s(approx (pow (cos phi2) 6) #s(hole binary64 1))
#s(approx (pow (cos phi2) 6) #s(hole binary64 (+ 1 (* -3 (pow phi2 2)))))
#s(approx (pow (cos phi2) 6) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* 4 (pow phi2 2)) 3)))))
#s(approx (pow (cos phi2) 6) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 4 (* -47/15 (pow phi2 2)))) 3)))))
#s(approx (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))
#s(approx (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (* (pow phi2 2) (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))
#s(approx (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (* (pow phi2 2) (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2))))) (* (pow phi2 2) (+ (* 2 (* (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))
#s(approx (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) #s(hole binary64 (+ (* (pow phi2 2) (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (pow (- 1 (cos (- lambda1 lambda2))) 2)))) (+ (* (cos (- lambda1 lambda2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (- 1 (cos (- lambda1 lambda2))))) (* (pow phi2 2) (+ (* 2 (* (cos (- lambda1 lambda2)) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (+ (* (pow phi2 2) (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (+ (* (cos (- lambda1 lambda2)) (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)) (- 1 (cos (- lambda1 lambda2))))) (+ (* (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (pow (cos (- lambda1 lambda2)) 2))))) (* 2 (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4)))))) (pow (- 1 (cos (- lambda1 lambda2))) 2)) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 2)) (* 1/360 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2))))))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))
#s(approx (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) #s(hole binary64 (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2)))
#s(approx (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) #s(hole binary64 (+ (* 2 (* (pow phi2 2) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2)))))) (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2))))
#s(approx (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) #s(hole binary64 (+ (* (pow phi2 2) (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (* (pow phi2 2) (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2))))) (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2))))
#s(approx (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) #s(hole binary64 (+ (* (pow phi2 2) (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (* (pow phi2 2) (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (+ (* (pow phi2 2) (+ (* 2 (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (pow (cos (- lambda1 lambda2)) 2))))) (* 2 (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))))) (pow (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) 2)))))) (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2))))
#s(approx (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* (pow phi2 2) (- (* -3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))))
#s(approx (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* (pow phi2 2) (- (+ (* -3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (* (pow phi2 2) (- (* 4 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))) (- (* -3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))) (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (* (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))))
#s(approx (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ (* (pow phi2 2) (- (+ (* -3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (* (pow phi2 2) (- (+ (* 4 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (* (pow phi2 2) (- (* -47/15 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (/ (* (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (* (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (- (* -3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))) (+ (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))) (- (* 4 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (+ (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))) (- (* -3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))) (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (* (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))) (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (+ (* 1/720 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -34/45 (pow (cos (- lambda1 lambda2)) 4)) (* -2/45 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))))) (+ (/ (* (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2))))) (- (* -3 (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2)))))) (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))) (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* -1/24 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))))) (* (+ (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 5/3 (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))))) (/ (* (pow (cos (- lambda1 lambda2)) 6) (+ (* 1/2 (* (cos (- lambda1 lambda2)) (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))))) (* (+ (* -2 (pow (cos (- lambda1 lambda2)) 4)) (* -1 (pow (cos (- lambda1 lambda2)) 2))) (- 1 (cos (- lambda1 lambda2)))))) (* (pow (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) 2) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos (- lambda1 lambda2)) 6) (* (+ 1 (+ (pow (cos (- lambda1 lambda2)) 2) (pow (cos (- lambda1 lambda2)) 4))) (- 1 (cos (- lambda1 lambda2))))))))
#s(approx (* (cos phi2) (cos lambda2)) #s(hole binary64 (cos lambda2)))
#s(approx (* (cos phi2) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* -1/2 (* (pow phi2 2) (cos lambda2))))))
#s(approx (* (cos phi2) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* 1/24 (* (pow phi2 2) (cos lambda2))))))))
#s(approx (* (cos phi2) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda2))) (* 1/24 (cos lambda2)))))))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #s(hole binary64 (+ (/ (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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) (- (* -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 (- 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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) 2)) (pow (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))) 3))) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (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) (- (* 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)) (/ (* (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)))))))) (+ (/ (* (pow (cos phi1) 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 (- 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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) #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)))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) 2)) (pow (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))) 3))) (/ (* (pow (cos phi1) 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))) (- (* -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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (* (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) (- (* 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)))) 3))) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (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)))))) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (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 (- 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))))) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2))))) (+ (/ (* (pow (cos phi1) 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)) (/ (* (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)))))))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) 2)) (pow (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))) 3))) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (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) (- (* 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)) (/ (* (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)))))))) (+ (/ (* (pow (cos phi1) 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 (- 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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (pow (cos phi1) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* -1 (/ (* (pow phi2 2) (* (pow (cos phi1) 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))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* (pow phi2 2) (- (* -1 (* (pow phi2 2) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) 2)) (pow (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))) 3))) (/ (* (pow (cos phi1) 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))))) (/ (* (pow (cos phi1) 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))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (+ (* (pow phi2 2) (- (* (pow phi2 2) (- (* -1 (* (pow phi2 2) (+ (* -1 (/ (* (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) 2)) (pow (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))) 3))) (/ (* (pow (cos phi1) 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))) (- (* -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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (* (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) (- (* 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)))) 3))) (/ (* (pow (cos phi1) 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)))))) (+ (* -1 (/ (* (pow (cos phi1) 3) (pow (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) 2)) (pow (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))) 3))) (/ (* (pow (cos phi1) 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))))) (/ (* (pow (cos phi1) 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))))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* (pow phi2 2) (- (* -1/2 (/ (cos (- lambda1 lambda2)) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))))) (/ 1 (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* (pow phi2 2) (- (+ (* -1/2 (/ (cos (- lambda1 lambda2)) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (* (pow phi2 2) (- (* 1/24 (/ (cos (- lambda1 lambda2)) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (/ (* (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2)))) (- (* -1/2 (/ (cos (- lambda1 lambda2)) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))))) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))))))) (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))))) (/ 1 (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* (pow phi2 2) (- (+ (* -1/2 (/ (cos (- lambda1 lambda2)) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (* (pow phi2 2) (- (+ (* 1/24 (/ (cos (- lambda1 lambda2)) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (* (pow phi2 2) (- (* -1/720 (/ (cos (- lambda1 lambda2)) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (+ (* -2/45 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (+ (/ (* (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2)))) (- (* 1/24 (/ (cos (- lambda1 lambda2)) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (/ (* (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2)))) (- (* -1/2 (/ (cos (- lambda1 lambda2)) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))))) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))))) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) (/ (* (- (* -1/2 (/ (cos (- lambda1 lambda2)) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2)))) (- (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 1/24 (cos (- lambda1 lambda2))))) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))))))))) (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (/ (* (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2)))) (- (* -1/2 (/ (cos (- lambda1 lambda2)) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))) (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))))) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))))))) (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) 2))))) (/ 1 (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* (pow phi2 2) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (pow (cos (- lambda1 lambda2)) 2))) (cos (- lambda1 lambda2)))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* (pow phi2 2) (- (+ (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* (pow phi2 2) (- (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 1/24 (cos (- lambda1 lambda2)))))) (* -1/2 (cos (- lambda1 lambda2))))) (pow (cos (- lambda1 lambda2)) 2))) (cos (- lambda1 lambda2)))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* (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 (- lambda1 lambda2)))))) (* 1/24 (cos (- lambda1 lambda2)))))) (* -1/2 (cos (- lambda1 lambda2))))) (pow (cos (- lambda1 lambda2)) 2))) (cos (- lambda1 lambda2)))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (+ (* -1 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (+ (* (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 (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) #s(hole binary64 (+ 1 (+ (* (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #s(hole binary64 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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 (- 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 (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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)))))) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (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 (- 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)))))) (/ (* (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 (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) #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)))))) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (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)))))) (+ (/ (* (- (* -3/2 (/ (pow (cos (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2)))))) (/ (* (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 (- 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))))) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2))))) (/ (* (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 (- 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 (- 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)))))) (/ (* (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 (- lambda1 lambda2)) 3) (- (+ (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (cos phi1) (cos (- lambda1 lambda2))))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) #s(hole binary64 (pow (cos (- lambda1 lambda2)) 3)))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) #s(hole binary64 (+ (* -3/2 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 3))) (pow (cos (- lambda1 lambda2)) 3))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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 (- lambda1 lambda2)) 3))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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 (- lambda1 lambda2)) 3))))
#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 phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #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 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))))
#s(approx (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* (pow phi2 2) (- (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* -1/2 (cos (- lambda1 lambda2))))) (pow (cos (- lambda1 lambda2)) 2))) (cos (- lambda1 lambda2)))))
#s(approx (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* (pow phi2 2) (- (+ (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* (pow phi2 2) (- (* 1/3 (pow (cos (- lambda1 lambda2)) 2)) (* 1/24 (cos (- lambda1 lambda2)))))) (* -1/2 (cos (- lambda1 lambda2))))) (pow (cos (- lambda1 lambda2)) 2))) (cos (- lambda1 lambda2)))))
#s(approx (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ 1 (+ (* (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 (- lambda1 lambda2)))))) (* 1/24 (cos (- lambda1 lambda2)))))) (* -1/2 (cos (- lambda1 lambda2))))) (pow (cos (- lambda1 lambda2)) 2))) (cos (- lambda1 lambda2)))))
#s(approx (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ 1 (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ 1 (+ (* -1 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))) (pow (cos (- lambda1 lambda2)) 2)))))
#s(approx (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ 1 (+ (* (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 (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) #s(hole binary64 (+ 1 (+ (* (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 (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow phi2 2) (* (pow (cos phi1) 2) (cos (- lambda1 lambda2)))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (- (* -1 (* (pow phi2 2) (+ (* -1/4 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3))) (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2)))))) (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (- (* (pow phi2 2) (- (* -1 (* (pow phi2 2) (+ (* -1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -1/4 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3))) (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/720 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/48 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3))))))) (+ (* -1/4 (/ (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 3))) (* -1/24 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2)))))) (* 1/2 (/ (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (/ 1 (- 1 (cos (- lambda1 lambda2))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* -1/2 (/ (* (pow phi2 2) (cos (- lambda1 lambda2))) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (/ 1 (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* (pow phi2 2) (- (* -1 (* (pow phi2 2) (+ (* -1/4 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 3))) (* -1/24 (/ (cos (- lambda1 lambda2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ 1 (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) #s(hole binary64 (+ (* (pow phi2 2) (- (* (pow phi2 2) (- (* -1 (* (pow phi2 2) (+ (* -1/2 (/ (* (cos (- lambda1 lambda2)) (+ (* -1/4 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 3))) (* -1/24 (/ (cos (- lambda1 lambda2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (- 1 (cos (- lambda1 lambda2))))) (+ (* 1/720 (/ (cos (- lambda1 lambda2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))) (* 1/48 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 3))))))) (+ (* -1/4 (/ (pow (cos (- lambda1 lambda2)) 2) (pow (- 1 (cos (- lambda1 lambda2))) 3))) (* -1/24 (/ (cos (- lambda1 lambda2)) (pow (- 1 (cos (- lambda1 lambda2))) 2)))))) (* 1/2 (/ (cos (- lambda1 lambda2)) (pow (- 1 (cos (- lambda1 lambda2))) 2))))) (/ 1 (- 1 (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (- (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* (pow phi2 2) (- (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* -1/24 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (- (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* (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)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/720 (/ (pow (cos (- lambda1 lambda2)) 3) (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 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2)))))))) (- (cos phi1) (cos (- lambda1 lambda2)))))))))) (+ (* -1/24 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))) (* 1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (- (cos phi1) (cos (- lambda1 lambda2))))))))) (* 1/2 (/ (pow (cos (- lambda1 lambda2)) 3) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #s(hole binary64 (pow (cos (- lambda1 lambda2)) 2)))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #s(hole binary64 (+ (* -1 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2) #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 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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) #s(hole binary64 (+ (pow (cos phi1) 3) (pow (cos (- lambda1 lambda2)) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) #s(hole binary64 (+ (pow (cos phi1) 3) (pow (cos (- lambda1 lambda2)) 3))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (* 1/2 (* (pow (cos phi1) 2) (cos (- lambda1 lambda2)))) (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* 1/2 (* (pow (cos phi1) 2) (cos (- lambda1 lambda2)))) (* (pow phi2 2) (- (* -1/24 (* (pow (cos phi1) 2) (cos (- lambda1 lambda2)))) (+ (* -1/2 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (* 1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))))) (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* 1/2 (* (pow (cos phi1) 2) (cos (- lambda1 lambda2)))) (* (pow phi2 2) (- (+ (* -1/24 (* (pow (cos phi1) 2) (cos (- lambda1 lambda2)))) (* (pow phi2 2) (- (* 1/720 (* (pow (cos phi1) 2) (cos (- lambda1 lambda2)))) (+ (* -2/45 (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/720 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/24 (pow (cos (- lambda1 lambda2)) 3)) (* 1/6 (pow (cos (- lambda1 lambda2)) 3)))))))) (+ (* -1/2 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (* 1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))))) (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3))))) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* 1/2 (* (pow phi2 2) (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))))) (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -1/24 (* (pow phi2 2) (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))))) (* 1/2 (* (pow (cos phi1) 2) (cos (- lambda1 lambda2)))))) (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (+ (* 1/2 (* (pow (cos phi1) 2) (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/24 (* (pow (cos phi1) 2) (cos (- lambda1 lambda2)))) (* 1/720 (* (pow phi2 2) (* (pow (cos phi1) 2) (cos (- lambda1 lambda2))))))))) (* (pow (cos phi1) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (pow (cos (- lambda1 lambda2)) 3)))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/2 (pow (cos (- lambda1 lambda2)) 3)) (* (pow phi2 2) (+ (* -1/2 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (* 1/3 (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))))))))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) #s(hole binary64 (+ (* (pow phi2 2) (+ (* -1 (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/2 (pow (cos (- lambda1 lambda2)) 3)) (* (pow phi2 2) (+ (* -1/2 (pow (cos (- lambda1 lambda2)) 3)) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 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/720 (pow (cos (- lambda1 lambda2)) 3)) (+ (* 1/24 (pow (cos (- lambda1 lambda2)) 3)) (* 1/6 (pow (cos (- lambda1 lambda2)) 3))))))))))))) (* (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2)))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (- (cos phi1) (cos (- lambda1 lambda2))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (+ (* (cos (- lambda1 lambda2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- (cos phi1) (cos (- lambda1 lambda2))))) (* 1/4 (pow (cos (- lambda1 lambda2)) 2)))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(hole binary64 (+ (* (pow phi2 2) (+ (* (cos (- lambda1 lambda2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/12 (* (cos (- lambda1 lambda2)) (- (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/4 (pow (cos (- lambda1 lambda2)) 2)) (* (pow phi2 2) (+ (* -1/24 (pow (cos (- lambda1 lambda2)) 2)) (* 1/360 (* (cos (- lambda1 lambda2)) (- (cos phi1) (cos (- lambda1 lambda2)))))))))))) (pow (- (cos phi1) (cos (- lambda1 lambda2))) 2))))
#s(approx (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2) #s(hole binary64 (pow (- (cos phi1) (cos lambda1)) 2)))
#s(approx (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2) #s(hole binary64 (+ (* (pow phi2 2) (* (cos lambda1) (- (cos phi1) (cos lambda1)))) (pow (- (cos phi1) (cos lambda1)) 2))))
#s(approx (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2) #s(hole binary64 (+ (* (pow phi2 2) (+ (* (cos lambda1) (- (cos phi1) (cos lambda1))) (* (pow phi2 2) (+ (* -1/12 (* (cos lambda1) (- (cos phi1) (cos lambda1)))) (* 1/4 (pow (cos lambda1) 2)))))) (pow (- (cos phi1) (cos lambda1)) 2))))
#s(approx (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2) #s(hole binary64 (+ (* (pow phi2 2) (+ (* (cos lambda1) (- (cos phi1) (cos lambda1))) (* (pow phi2 2) (+ (* -1/12 (* (cos lambda1) (- (cos phi1) (cos lambda1)))) (+ (* 1/4 (pow (cos lambda1) 2)) (* (pow phi2 2) (+ (* -1/24 (pow (cos lambda1) 2)) (* 1/360 (* (cos lambda1) (- (cos phi1) (cos lambda1))))))))))) (pow (- (cos phi1) (cos lambda1)) 2))))
#s(approx (- (cos phi1) (* (cos lambda1) (cos phi2))) #s(hole binary64 (- (cos phi1) (cos lambda1))))
#s(approx (- (cos phi1) (* (cos lambda1) (cos phi2))) #s(hole binary64 (- (+ (cos phi1) (* 1/2 (* (pow phi2 2) (cos lambda1)))) (cos lambda1))))
#s(approx (- (cos phi1) (* (cos lambda1) (cos phi2))) #s(hole binary64 (- (+ (cos phi1) (* (pow phi2 2) (- (* -1/24 (* (pow phi2 2) (cos lambda1))) (* -1/2 (cos lambda1))))) (cos lambda1))))
#s(approx (- (cos phi1) (* (cos lambda1) (cos phi2))) #s(hole binary64 (- (+ (cos phi1) (* (pow phi2 2) (- (* (pow phi2 2) (- (* 1/720 (* (pow phi2 2) (cos lambda1))) (* 1/24 (cos lambda1)))) (* -1/2 (cos lambda1))))) (cos lambda1))))
#s(approx (* (cos lambda1) (cos phi2)) #s(hole binary64 (cos lambda1)))
#s(approx (* (cos lambda1) (cos phi2)) #s(hole binary64 (+ (cos lambda1) (* -1/2 (* (pow phi2 2) (cos lambda1))))))
#s(approx (* (cos lambda1) (cos phi2)) #s(hole binary64 (+ (cos lambda1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* 1/24 (* (pow phi2 2) (cos lambda1))))))))
#s(approx (* (cos lambda1) (cos phi2)) #s(hole binary64 (+ (cos lambda1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda1))) (* 1/24 (cos lambda1)))))))))
#s(approx (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #s(hole binary64 (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) #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 (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #s(hole binary64 (pow (cos (- lambda1 lambda2)) 2)))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #s(hole binary64 (+ (* -1 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))) (pow (cos (- lambda1 lambda2)) 2))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #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 (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) #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 (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (* 2 (log (cos (- lambda1 lambda2))))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (+ (* -1 (pow phi2 2)) (* 2 (log (cos (- lambda1 lambda2)))))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (+ (* 2 (log (cos (- lambda1 lambda2)))) (* (pow phi2 2) (- (* -1/6 (pow phi2 2)) 1)))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) #s(hole binary64 (+ (* 2 (log (cos (- lambda1 lambda2)))) (* (pow phi2 2) (- (* (pow phi2 2) (- (* -2/45 (pow phi2 2)) 1/6)) 1)))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (log (cos (- lambda1 lambda2)))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (+ (log (cos (- lambda1 lambda2))) (* -1/2 (pow phi2 2)))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (+ (log (cos (- lambda1 lambda2))) (* (pow phi2 2) (- (* -1/12 (pow phi2 2)) 1/2)))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) #s(hole binary64 (+ (log (cos (- lambda1 lambda2))) (* (pow phi2 2) (- (* (pow phi2 2) (- (* -1/45 (pow phi2 2)) 1/12)) 1/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 (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ 1 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
#s(approx (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ 1 (+ (* (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 (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) #s(hole binary64 (+ 1 (+ (* (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) #s(hole binary64 (cos phi2)))
#s(approx (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))) #s(hole binary64 (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi2)) #s(hole binary64 (* (cos (* 1/2 (PI))) (sin phi2))))
#s(approx (sin phi2) #s(hole binary64 (sin phi2)))
#s(approx (sin (+ phi2 (* 1/2 (PI)))) #s(hole binary64 (sin (+ phi2 (* 1/2 (PI))))))
#s(approx (+ phi2 (* 1/2 (PI))) #s(hole binary64 phi2))
#s(approx (+ phi2 (* 1/2 (PI))) #s(hole binary64 (* phi2 (+ 1 (* 1/2 (/ (PI) phi2))))))
#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 (+ 1 (* -1/2 (* phi2 phi2))) #s(hole binary64 (* -1/2 (pow phi2 2))))
#s(approx (+ 1 (* -1/2 (* phi2 phi2))) #s(hole binary64 (* (pow phi2 2) (- (/ 1 (pow phi2 2)) 1/2))))
#s(approx (sin (+ phi2 (/ (PI) 2))) #s(hole binary64 (sin (+ phi2 (* 1/2 (PI))))))
#s(approx (+ phi2 (/ (PI) 2)) #s(hole binary64 phi2))
#s(approx (+ phi2 (/ (PI) 2)) #s(hole binary64 (* phi2 (+ 1 (* 1/2 (/ (PI) phi2))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) #s(hole binary64 (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (/ (sin (- lambda1 lambda2)) (pow phi2 2))))))
#s(approx (+ (* (* phi2 phi2) -1/2) 1) #s(hole binary64 (* -1/2 (pow phi2 2))))
#s(approx (+ (* (* phi2 phi2) -1/2) 1) #s(hole binary64 (* (pow phi2 2) (- (/ 1 (pow phi2 2)) 1/2))))
#s(approx (* (* phi2 phi2) (- (pow phi2 -2) 1/2)) #s(hole binary64 (* -1/2 (pow phi2 2))))
#s(approx (* (* phi2 phi2) (- (pow phi2 -2) 1/2)) #s(hole binary64 (* (pow phi2 2) (- (/ 1 (pow phi2 2)) 1/2))))
#s(approx (- (pow phi2 -2) 1/2) #s(hole binary64 -1/2))
#s(approx (- (pow phi2 -2) 1/2) #s(hole binary64 (- (/ 1 (pow phi2 2)) 1/2)))
#s(approx (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) #s(hole binary64 (* 1/24 (pow phi2 4))))
#s(approx (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) #s(hole binary64 (* (pow phi2 4) (- 1/24 (* 1/2 (/ 1 (pow phi2 2)))))))
#s(approx (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) #s(hole binary64 (* (pow phi2 4) (- (+ 1/24 (/ 1 (pow phi2 4))) (* 1/2 (/ 1 (pow phi2 2)))))))
#s(approx (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2)) #s(hole binary64 (* 1/24 (pow phi2 4))))
#s(approx (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2)) #s(hole binary64 (* (pow phi2 4) (- 1/24 (* 1/2 (/ 1 (pow phi2 2)))))))
#s(approx (- (* 1/24 (* phi2 phi2)) 1/2) #s(hole binary64 (* 1/24 (pow phi2 2))))
#s(approx (- (* 1/24 (* phi2 phi2)) 1/2) #s(hole binary64 (* (pow phi2 2) (- 1/24 (* 1/2 (/ 1 (pow phi2 2)))))))
#s(approx (pow (cos phi2) 2) #s(hole binary64 (pow (cos phi2) 2)))
#s(approx (pow (cos phi2) 4) #s(hole binary64 (pow (cos phi2) 4)))
#s(approx (pow (cos phi2) 6) #s(hole binary64 (pow (cos phi2) 6)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2)))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) #s(hole binary64 (+ 1 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2)))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2))))))
#s(approx (sin (+ phi2 (* 1/2 (PI)))) #s(hole binary64 (sin (- (* 1/2 (PI)) (* -1 phi2)))))
#s(approx (+ phi2 (* 1/2 (PI))) #s(hole binary64 (* -1 (* phi2 (- (* -1/2 (/ (PI) phi2)) 1)))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2))))))
#s(approx (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (* (cos lambda1) (sin (- (* 1/2 (PI)) (* -1 phi2))))))
#s(approx (sin (+ phi2 (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (* -1 phi2)))))
#s(approx (+ phi2 (/ (PI) 2)) #s(hole binary64 (* -1 (* phi2 (- (* -1/2 (/ (PI) phi2)) 1)))))
#s(approx (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (sin (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (sin (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) #s(hole binary64 (* (sin (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2))))))
#s(approx (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))) #s(hole binary64 (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) (* -1 phi2))))))

Outputs
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 #s(approx (+ (/ (atan2 ( (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/.f64 (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) lambda1)) lambda1))
(.f64 #s(approx (+ (/ (atan2 ( (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/.f64 (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) lambda1)) lambda1)
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/.f64 (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) lambda1))
(/.f64 (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
lambda1
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.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
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.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))))
#s(literal 1 binary64)
(*.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)))))) (.f64 (+.f64 (/.f64 (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1))
(.f64 (+.f64 (/.f64 (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1)
(+.f64 (/.f64 (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64))
(/.f64 (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
(fma.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+.f64 (*.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (cos.f64 phi1))
(cos.f64 #s(approx (- lambda1 lambda2) lambda1))
#s(approx (- lambda1 lambda2) lambda1)
(cos.f64 phi1)
phi1
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (+.f64 (/.f64 (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(literal 1 binary64)) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1))
(.f64 (+.f64 (/.f64 (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(literal 1 binary64)) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1)
(+.f64 (/.f64 (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(literal 1 binary64)) (cos.f64 phi1))) lambda1) #s(literal 1 binary64))
(/.f64 (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(literal 1 binary64)) (cos.f64 phi1))) lambda1)
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(literal 1 binary64)) (cos.f64 phi1)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(literal 1 binary64)) (cos.f64 phi1))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(literal 1 binary64))) (cos.f64 phi1))
#s(approx (cos phi2) #s(literal 1 binary64))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (fma.f64 (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1))
(.f64 (+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (fma.f64 (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1)
(+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (fma.f64 (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64))
(/.f64 (atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (fma.f64 (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (fma.f64 (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2))
(sin.f64 #s(approx (- lambda1 lambda2) lambda1))
(fma.f64 (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+.f64 (.f64 (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)) (cos.f64 phi2)) (cos.f64 phi1))
(cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))) lambda1) #s(literal 1 binary64)) lambda1))
(.f64 (+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))) lambda1) #s(literal 1 binary64)) lambda1)
(+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ ( (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))) lambda1) #s(literal 1 binary64))
(/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ ( (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))) lambda1)
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ ( (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 #s(approx (- lambda1 lambda2) lambda1))))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))
(+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 #s(approx (- lambda1 lambda2) lambda1))))
(*.f64 (cos.f64 phi2) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) lambda1) #s(literal 1 binary64)) lambda1))
(.f64 (+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) lambda1) #s(literal 1 binary64)) lambda1)
(+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ ( (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) lambda1) #s(literal 1 binary64))
(/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ ( (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) lambda1)
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ ( (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))
(+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))
(cos.f64 (neg.f64 lambda2))
(neg.f64 lambda2)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
(+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
(.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))
(+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
#s(literal 1/2 binary64)
(PI.f64)
(sin.f64 phi2)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
(+.f64 (cos.f64 phi1) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))
(+.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))
(sin.f64 phi1)
#s(approx (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 (sin.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2)))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2)))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2)))
(sin.f64 (neg.f64 lambda2))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (.f64 lambda1 (cos.f64 (neg.f64 lambda2)))))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (.f64 lambda1 (cos.f64 (neg.f64 lambda2)))))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))))
#s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))))
(+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))
(*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 #s(approx (- lambda1 lambda2) lambda1)))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)))))
(+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1))))
(.f64 (cos.f64 phi2) (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (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)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
(.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))
(*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))
#s(literal -1/2 binary64)
(pow.f64 phi1 #s(literal 2 binary64))
#s(literal 2 binary64)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) #s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) #s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) #s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))
(+.f64 #s(literal 1 binary64) #s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))
(*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 #s(approx (- lambda1 lambda2) lambda1))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1)) (*.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 phi1 phi1)
(*.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))
(+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))
(+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))
(.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2))))
#s(literal -1 binary64)
(*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) lambda1))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) lambda1))))
(+.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))
(+.f64 (cos.f64 phi1) #s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
(.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(cos.f64 lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #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 (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #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 (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(+.f64 (cos.f64 phi1) (.f64 #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 (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))
(.f64 #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 (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))
#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))))
(+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2)))
(.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2))
(*.f64 phi2 phi2)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (sin.f64 #s(approx (+ phi2 (/ (PI) 2)) phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (sin.f64 #s(approx (+ phi2 (/ (PI) 2)) phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (cos.f64 phi1) (*.f64 (sin.f64 #s(approx (+ phi2 (/ (PI) 2)) phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (sin.f64 #s(approx (+ phi2 (/ (PI) 2)) phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(sin.f64 #s(approx (+ phi2 (/ (PI) 2)) phi2))
#s(approx (+ phi2 (/ (PI) 2)) phi2)
(+.f64 lambda1 (atan2.f64 #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)))) (+.f64 (cos.f64 phi1) (.f64 #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 (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))))
(atan2.f64 #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)))) (+.f64 (cos.f64 phi1) (.f64 #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 (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 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))))
(fma.f64 (.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
(+.f64 (.f64 (.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64))
(+.f64 lambda1 (atan2.f64 #s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (+.f64 (cos.f64 phi1) #s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 #s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (+.f64 (cos.f64 phi1) #s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
(.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (cos.f64 phi1) #s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (cos lambda2) lambda1) (neg (sin lambda2))) lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (cos lambda2) lambda1) (neg (sin lambda2))) lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 #s(approx (cos phi2) #s(literal 1 binary64)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (cos lambda2) lambda1) (neg (sin lambda2))) lambda1)))
#s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) lambda1))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(atan2.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(*.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))
(+.f64 (cos.f64 phi1) (cos.f64 phi2))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2) #s(literal 1 binary64)))))
(atan2.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2) #s(literal 1 binary64))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2) #s(literal 1 binary64)))
(fma.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2) #s(literal 1 binary64))
(+.f64 (*.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2)) #s(literal 1 binary64))
(sin.f64 (+.f64 (-.f64 lambda1 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (-.f64 lambda1 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) ( (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) ( (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))
(-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
(atan2.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(+.f64 (cos.f64 phi1) #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 (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 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(cos.f64 lambda2)
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(sin.f64 lambda1)
(sin.f64 lambda2)
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) #s(approx (+ ( (* phi2 phi2) -1/2) 1) (.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 #s(approx (cos phi2) #s(approx (+ ( (* phi2 phi2) -1/2) 1) (.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))
#s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64)))))
#s(approx (+ (* (* phi2 phi2) -1/2) 1) (.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64))))
(.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64)))
(-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64))
(pow.f64 phi2 #s(literal -2 binary64))
#s(literal -2 binary64)
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) #s(approx (+ ( (* phi2 phi2) -1/2) 1) (.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64))))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 #s(approx (cos phi2) #s(approx (+ ( (* phi2 phi2) -1/2) 1) (.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64))))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 #s(approx (cos phi2) #s(approx (+ ( (* phi2 phi2) -1/2) 1) (.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64))))) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))
(fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))
(+.f64 (.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))))
(atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))
(+.f64 lambda1 (atan2.f64 (.f64 #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)))) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 #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)))) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 #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)))) (sin.f64 #s(approx (- lambda1 lambda2) lambda1)))
(+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 lambda1 (atan2.f64 (.f64 #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)))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))))
(atan2.f64 (.f64 #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)))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(.f64 #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)))) (sin.f64 (-.f64 lambda1 lambda2)))
(+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))
(.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))
(+.f64 lambda1 (atan2.f64 (.f64 #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))))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(approx ( (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 #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))))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(approx ( (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 #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))))) (sin.f64 (-.f64 lambda1 lambda2)))
#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)))))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64))))
(.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)))
(-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64))
(.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2))
#s(literal 1/24 binary64)
(+.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(approx ( (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (cos lambda2) lambda1) (neg (sin lambda2))) lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (cos lambda2) lambda1) (neg (sin lambda2))) lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (cos lambda2) lambda1) (neg (sin lambda2))) lambda1)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (cos lambda2) lambda1) (neg (sin lambda2))) lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 #s(approx (- lambda1 lambda2) lambda1))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (cos lambda2) lambda1) (neg (sin lambda2))) lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 #s(approx (- lambda1 lambda2) lambda1))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2)))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda2) (cos.f64 phi1))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2)))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda2) (cos.f64 phi1)))))
(*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda2) (cos.f64 phi1))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(+.f64 (cos.f64 lambda2) (cos.f64 phi1))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2)))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2)))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 #s(approx (cos lambda2) #s(literal 1 binary64)) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 #s(approx (cos lambda2) #s(literal 1 binary64)) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 #s(approx (cos lambda2) #s(literal 1 binary64)) lambda1 (neg.f64 (sin.f64 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 #s(approx (cos lambda2) #s(literal 1 binary64)) lambda1 (neg.f64 (sin.f64 lambda2))))
(fma.f64 #s(approx (cos lambda2) #s(literal 1 binary64)) lambda1 (neg.f64 (sin.f64 lambda2)))
(+.f64 (*.f64 #s(approx (cos lambda2) #s(literal 1 binary64)) lambda1) (neg.f64 (sin.f64 lambda2)))
#s(approx (cos lambda2) #s(literal 1 binary64))
(neg.f64 (sin.f64 lambda2))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2))))))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2)))))))))
(*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 lambda2) lambda1) (neg.f64 (sin.f64 lambda2)))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2))))))))
(+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2))))))
(+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2)))))
(.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2))))
(-.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2)))
(.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 (neg.f64 lambda2))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 lambda1 (-.f64 (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 (neg.f64 lambda2))))))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 lambda1 (-.f64 (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 (neg.f64 lambda2)))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 lambda1 (-.f64 (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 (neg.f64 lambda2))))))))
(+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 lambda1 (-.f64 (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 (neg.f64 lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 lambda1 (-.f64 (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 (neg.f64 lambda2))))))
(+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 lambda1 (-.f64 (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 (neg.f64 lambda2)))))
(.f64 lambda1 (-.f64 (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 (neg.f64 lambda2))))
(-.f64 (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 (neg.f64 lambda2)))
(.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))
(+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2))) (.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))
(.f64 #s(literal 1/6 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2))))
#s(literal 1/6 binary64)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(+.f64 (cos.f64 phi1) #s(approx (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
#s(approx (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) #s(approx ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) #s(approx ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))))
(+.f64 (cos.f64 phi1) #s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
(+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))
(*.f64 lambda1 (sin.f64 lambda2))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (sin.f64 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (sin.f64 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (sin.f64 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) lambda1 (neg.f64 (sin.f64 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (sin.f64 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) lambda1 (neg.f64 (sin.f64 lambda2))))
(fma.f64 (sin.f64 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) lambda1 (neg.f64 (sin.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) lambda1) (neg.f64 (sin.f64 lambda2)))
(sin.f64 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (+.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 #s(literal 1/6 binary64) lambda2))) #s(literal 1 binary64))))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (+.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 #s(literal 1/6 binary64) lambda2))) #s(literal 1 binary64))))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))
(.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (+.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) lambda1 (*.f64 #s(literal 1/6 binary64) lambda2))) #s(literal 1 binary64)))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (+.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) lambda1 (*.f64 #s(literal 1/6 binary64) lambda2))) #s(literal 1 binary64))))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (+.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) lambda1 (*.f64 #s(literal 1/6 binary64) lambda2))) #s(literal 1 binary64)))))
(+.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) lambda1 (*.f64 #s(literal 1/6 binary64) lambda2))) #s(literal 1 binary64))))
(.f64 lambda2 (-.f64 (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) lambda1 (*.f64 #s(literal 1/6 binary64) lambda2))) #s(literal 1 binary64)))
(-.f64 (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 #s(literal 1/6 binary64) lambda2))) #s(literal 1 binary64))
(.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 #s(literal 1/6 binary64) lambda2)))
(fma.f64 #s(literal -1/2 binary64) lambda1 (*.f64 #s(literal 1/6 binary64) lambda2))
(+.f64 (.f64 #s(literal -1/2 binary64) lambda1) (.f64 #s(literal 1/6 binary64) lambda2))
(*.f64 #s(literal 1/6 binary64) lambda2)
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 1 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (-.f64 (.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (-.f64 (.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))
(.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2)))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2)))
(-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2))
(*.f64 lambda1 (cos.f64 lambda2))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 lambda2) (pow.f64 lambda1 #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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)))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 lambda2) (pow.f64 lambda1 #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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))))))
(.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 lambda2) (pow.f64 lambda1 #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 lambda2) (pow.f64 lambda1 #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1))))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 lambda2) (pow.f64 lambda1 #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)))))
(*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 lambda2) (pow.f64 lambda1 #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1))))
(pow.f64 lambda1 #s(literal 2 binary64))
(fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 lambda2) (pow.f64 lambda1 #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)))
(+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 lambda2) (pow.f64 lambda1 #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)))
(/.f64 (sin.f64 lambda2) (pow.f64 lambda1 #s(literal 2 binary64)))
(fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1))
(+.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2)) (/.f64 (cos.f64 lambda2) lambda1))
(/.f64 (cos.f64 lambda2) lambda1)
(+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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)))))
(.f64 (cos.f64 phi2) #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 (.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64)) (neg.f64 (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)))
(fma.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64)) (neg.f64 (sin.f64 lambda2))) lambda1 (cos.f64 lambda2))
(+.f64 (.f64 (-.f64 (.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64)) (neg.f64 (sin.f64 lambda2))) lambda1) (cos.f64 lambda2))
(-.f64 (.f64 (.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64)) (neg.f64 (sin.f64 lambda2)))
(.f64 (.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64))
(*.f64 (cos.f64 lambda2) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))))
(.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (neg.f64 (sin.f64 lambda2))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (neg.f64 (sin.f64 lambda2)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))
(+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))
(*.f64 (cos.f64 lambda2) (cos.f64 phi2))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))) (cos.f64 phi2) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))) (cos.f64 phi2) #s(literal 1 binary64))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))) (cos.f64 phi2) #s(literal 1 binary64)))
(fma.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))) (cos.f64 phi2) #s(literal 1 binary64))
(+.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))) (cos.f64 phi2)) #s(literal 1 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) #s(approx (* lambda1 (cos 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)))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) #s(approx (* lambda1 (cos 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))))
(.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) #s(approx (* lambda1 (cos lambda2)) lambda1))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) #s(approx (* lambda1 (cos lambda2)) lambda1)))
(+.f64 (neg.f64 (sin.f64 lambda2)) #s(approx (* lambda1 (cos lambda2)) lambda1))
#s(approx (* lambda1 (cos lambda2)) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 #s(approx (+ (cos lambda2) ( -1/2 (* lambda1 (neg (sin lambda2))))) (.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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)))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 #s(approx (+ (cos lambda2) ( -1/2 (* lambda1 (neg (sin lambda2))))) (.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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))))))
(.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 #s(approx (+ (cos lambda2) ( -1/2 (* lambda1 (neg (sin lambda2))))) (*.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1))))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 #s(approx (+ (cos lambda2) ( -1/2 (* lambda1 (neg (sin lambda2))))) (*.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)))))))
(+.f64 (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 #s(approx (+ (cos lambda2) ( -1/2 (* lambda1 (neg (sin lambda2))))) (*.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1))))))
(.f64 lambda1 #s(approx (+ (cos lambda2) ( -1/2 (* lambda1 (neg (sin lambda2))))) (*.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)))))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) (*.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1))))
(*.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 (cos.f64 lambda2))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 (cos.f64 lambda2))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2) #s(literal 1 binary64))))
(.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (*.f64 lambda1 (cos.f64 lambda2)))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (*.f64 lambda1 (cos.f64 lambda2))))
(+.f64 (neg.f64 (sin.f64 lambda2)) (*.f64 lambda1 (cos.f64 lambda2)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2) #s(literal 1 binary64)))
(fma.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2) #s(literal 1 binary64))
(+.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2)) #s(literal 1 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 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))))))))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 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))))))))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 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))))))))
(+.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)))))))
(.f64 lambda1 (+.f64 (cos.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (neg.f64 (sin.f64 lambda2))))))
(+.f64 (cos.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (neg.f64 (sin.f64 lambda2)))))
(.f64 #s(literal -1/2 binary64) (.f64 lambda1 (neg.f64 (sin.f64 lambda2))))
(*.f64 lambda1 (neg.f64 (sin.f64 lambda2)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 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))))))))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) #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)))))))
(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 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))))))))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) #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))))))
(+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) #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)))))
(.f64 #s(approx (cos phi2) #s(literal 1 binary64)) #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))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1)))) (cos.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1)))) (cos.f64 phi2) (cos.f64 phi1))))
(*.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) lambda1)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1)))) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1)))) (cos.f64 phi2) (cos.f64 phi1))
(+.f64 (.f64 #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)))) (cos.f64 phi2)) (cos.f64 phi1))
#s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1))))
(+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1)))
(.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1))
(*.f64 lambda1 lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #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))))) (cos.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #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))))) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #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))))) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 #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))))) (cos.f64 phi2) (cos.f64 phi1))
(+.f64 (.f64 #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))))) (cos.f64 phi2)) (cos.f64 phi1))
#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)))))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 lambda1 lambda1) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 lambda1 lambda1)) #s(literal 1/2 binary64))))
(.f64 (.f64 lambda1 lambda1) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 lambda1 lambda1)) #s(literal 1/2 binary64)))
(-.f64 (.f64 #s(literal 1/24 binary64) (.f64 lambda1 lambda1)) #s(literal 1/2 binary64))
(.f64 #s(literal 1/24 binary64) (.f64 lambda1 lambda1))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #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))))) (cos.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #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))))) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #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))))) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 #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))))) (cos.f64 phi2) (cos.f64 phi1))
(+.f64 (.f64 #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))))) (cos.f64 phi2)) (cos.f64 phi1))
#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)))))
(+.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))))
(.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)))
(-.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))
(.f64 (.f64 lambda1 lambda1) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (.f64 lambda1 lambda1))))
(+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (.f64 lambda1 lambda1)))
(.f64 #s(literal -1/720 binary64) (.f64 lambda1 lambda1))
#s(literal -1/720 binary64)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 #s(approx (- (/ lambda1 lambda2) 1) (.f64 lambda1 #s(approx (- (pow lambda2 -1) (pow lambda1 -1)) (/.f64 #s(literal 1 binary64) lambda2)))) lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 #s(approx (- (/ lambda1 lambda2) 1) (.f64 lambda1 #s(approx (- (pow lambda2 -1) (pow lambda1 -1)) (/.f64 #s(literal 1 binary64) lambda2)))) lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 #s(approx (- (/ lambda1 lambda2) 1) (*.f64 lambda1 #s(approx (- (pow lambda2 -1) (pow lambda1 -1)) (/.f64 #s(literal 1 binary64) lambda2)))) lambda2))))
(sin.f64 #s(approx (- lambda1 lambda2) (.f64 #s(approx (- (/ lambda1 lambda2) 1) (.f64 lambda1 #s(approx (- (pow lambda2 -1) (pow lambda1 -1)) (/.f64 #s(literal 1 binary64) lambda2)))) lambda2)))
#s(approx (- lambda1 lambda2) (.f64 #s(approx (- (/ lambda1 lambda2) 1) (.f64 lambda1 #s(approx (- (pow lambda2 -1) (pow lambda1 -1)) (/.f64 #s(literal 1 binary64) lambda2)))) lambda2))
(.f64 #s(approx (- (/ lambda1 lambda2) 1) (.f64 lambda1 #s(approx (- (pow lambda2 -1) (pow lambda1 -1)) (/.f64 #s(literal 1 binary64) lambda2)))) lambda2)
#s(approx (- (/ lambda1 lambda2) 1) (*.f64 lambda1 #s(approx (- (pow lambda2 -1) (pow lambda1 -1)) (/.f64 #s(literal 1 binary64) lambda2))))
(*.f64 lambda1 #s(approx (- (pow lambda2 -1) (pow lambda1 -1)) (/.f64 #s(literal 1 binary64) lambda2)))
#s(approx (- (pow lambda2 -1) (pow lambda1 -1)) (/.f64 #s(literal 1 binary64) lambda2))
(/.f64 #s(literal 1 binary64) lambda2)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 (/.f64 (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2) #s(approx (+ 1 (* (/ lambda1 lambda2) 1)) (.f64 lambda1 (+.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda2)))))) lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 (/.f64 (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2) #s(approx (+ 1 (* (/ lambda1 lambda2) 1)) (.f64 lambda1 (+.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda2)))))) lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 (/.f64 (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2) #s(approx (+ 1 (* (/ lambda1 lambda2) 1)) (*.f64 lambda1 (+.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda2)))))) lambda2))))
(sin.f64 #s(approx (- lambda1 lambda2) (.f64 (/.f64 (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2) #s(approx (+ 1 ( (/ lambda1 lambda2) 1)) (*.f64 lambda1 (+.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda2)))))) lambda2)))
#s(approx (- lambda1 lambda2) (.f64 (/.f64 (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2) #s(approx (+ 1 ( (/ lambda1 lambda2) 1)) (*.f64 lambda1 (+.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda2)))))) lambda2))
(.f64 (/.f64 (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2) #s(approx (+ 1 ( (/ lambda1 lambda2) 1)) (*.f64 lambda1 (+.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda2)))))) lambda2)
(/.f64 (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2) #s(approx (+ 1 (* (/ lambda1 lambda2) 1)) (*.f64 lambda1 (+.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda2))))))
(-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64))
(pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64))
#s(literal 3 binary64)
(fma.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2) #s(approx (+ 1 (* (/ lambda1 lambda2) 1)) (*.f64 lambda1 (+.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda2)))))
(+.f64 (.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2)) #s(approx (+ 1 ( (/ lambda1 lambda2) 1)) (*.f64 lambda1 (+.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda2)))))
#s(approx (+ 1 (* (/ lambda1 lambda2) 1)) (*.f64 lambda1 (+.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda2))))
(*.f64 lambda1 (+.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda2)))
(+.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda2))
(/.f64 #s(literal 1 binary64) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(.f64 (cos.f64 phi2) (sin.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)))
(sin.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) #s(approx (cos phi2) #s(literal 1 binary64)))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) #s(approx (cos phi2) #s(literal 1 binary64))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) #s(approx (cos phi2) #s(literal 1 binary64)))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) #s(approx (cos phi2) #s(literal 1 binary64))))
(+.f64 (cos.f64 phi1) #s(approx (cos phi2) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 #s(approx (- lambda1 lambda2) lambda1))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 #s(approx (- lambda1 lambda2) lambda1))))
(+.f64 #s(literal 1 binary64) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 #s(approx (- lambda1 lambda2) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 lambda2 lambda1)))))))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 #s(approx (- lambda1 lambda2) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 lambda2 lambda1))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 #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)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 #s(approx (- lambda1 lambda2) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 lambda2 lambda1))))))))
(+.f64 #s(literal 1 binary64) (cos.f64 #s(approx (- lambda1 lambda2) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 lambda2 lambda1)))))))
(cos.f64 #s(approx (- lambda1 lambda2) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 lambda2 lambda1))))))
#s(approx (- lambda1 lambda2) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 lambda2 lambda1)))))
(.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 lambda2 lambda1))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 lambda2 lambda1)))
(*.f64 #s(literal -1 binary64) (/.f64 lambda2 lambda1))
(/.f64 lambda2 lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (+.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (+.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (+.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (+.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2))))
(+.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (+.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)))
(sin.f64 (-.f64 (+.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2))
(-.f64 (+.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)
(+.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 #s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 #s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 #s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))
(fma.f64 (sin.f64 #s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) lambda1)) (cos.f64 phi2) #s(literal 1 binary64))
(+.f64 (*.f64 (sin.f64 #s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) lambda1)) (cos.f64 phi2)) #s(literal 1 binary64))
(sin.f64 #s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) lambda1))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 #s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2))) (cos.f64 phi2) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 #s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2))) (cos.f64 phi2) #s(literal 1 binary64))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 #s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2))) (cos.f64 phi2) #s(literal 1 binary64)))
(fma.f64 (sin.f64 #s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2))) (cos.f64 phi2) #s(literal 1 binary64))
(+.f64 (.f64 (sin.f64 #s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2))) (cos.f64 phi2)) #s(literal 1 binary64))
(sin.f64 #s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2))
(-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
(+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (+ ( (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (+ ( (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
(+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) ( (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 #s(approx (- lambda1 lambda2) lambda1))))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) ( (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 #s(approx (- lambda1 lambda2) lambda1)))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 #s(approx (- lambda1 lambda2) lambda1))))))
(/.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 #s(approx (- lambda1 lambda2) lambda1)))))
(-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 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 #s(approx (- lambda1 lambda2) lambda1))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (/ (+ (pow ( (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) #s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (/ (+ (pow ( (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) #s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) #s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))
(pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))
(-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (/ (- ( (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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 2 binary64))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (/ (- ( (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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 2 binary64)))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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 2 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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 2 binary64)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(pow.f64 (cos.f64 phi2) #s(literal 2 binary64))
(.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 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))))
(pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (/ (- (+ 1/2 ( 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (/ (- (+ 1/2 ( 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))
(.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))
(cos.f64 (*.f64 #s(literal 2 binary64) phi1))
(*.f64 #s(literal 2 binary64) phi1)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow ( (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow ( (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))
(fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))
(+.f64 (.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))
(fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))
(+.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))
(*.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))
(pow.f64 (cos.f64 phi2) #s(literal 4 binary64))
#s(literal 4 binary64)
(pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))
(/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))))
(fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))
(+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))
(.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))
(.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
(*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))
(*.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))
(pow.f64 (cos.f64 phi2) #s(literal 6 binary64))
#s(literal 6 binary64)
(pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))
(.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))
(pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64))
(/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(approx (* (cos phi2) (cos lambda2)) (cos.f64 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(approx (* (cos phi2) (cos lambda2)) (cos.f64 lambda2)))))
(+.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(approx (* (cos phi2) (cos lambda2)) (cos.f64 lambda2))))
#s(approx (cos phi1) #s(literal 1 binary64))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(approx (* (cos phi2) (cos lambda2)) (cos.f64 lambda2)))
#s(approx (* (cos phi2) (cos lambda2)) (cos.f64 lambda2))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(approx (* (cos phi2) (cos lambda2)) (cos.f64 phi2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(approx (* (cos phi2) (cos lambda2)) (cos.f64 phi2)))))
(+.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(approx (* (cos phi2) (cos lambda2)) (cos.f64 phi2))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(approx (* (cos phi2) (cos lambda2)) (cos.f64 phi2)))
#s(approx (* (cos phi2) (cos lambda2)) (cos.f64 phi2))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(approx (/ (pow (cos phi1) 3) (+ ( (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (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 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) #s(approx (+ ( (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(approx (/ (pow (cos phi1) 3) (+ ( (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (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 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) #s(approx (+ ( (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(+.f64 #s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (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 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) #s(approx (+ ( (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (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)))
(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 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 2 binary64)))
(/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) #s(approx (+ ( (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (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 #s(approx (cos phi2) #s(literal 1 binary64)) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
#s(approx (cos lambda1) #s(literal 1 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 (sin.f64 lambda2))))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 (sin.f64 lambda2)))))))
(+.f64 (cos.f64 phi1) (.f64 #s(approx (+ ( (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 (sin.f64 lambda2))))))
(.f64 #s(approx (+ ( (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 (sin.f64 lambda2)))))
#s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) #s(literal 1 binary64))
#s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 (sin.f64 lambda2))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 (sin.f64 lambda2)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (+.f64 #s(literal 1 binary64) (.f64 lambda2 (+.f64 lambda1 (.f64 #s(literal -1/2 binary64) lambda2))))))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (+.f64 #s(literal 1 binary64) (.f64 lambda2 (+.f64 lambda1 (.f64 #s(literal -1/2 binary64) lambda2)))))))))
(+.f64 (cos.f64 phi1) (.f64 #s(approx (+ ( (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (+.f64 #s(literal 1 binary64) (.f64 lambda2 (+.f64 lambda1 (.f64 #s(literal -1/2 binary64) lambda2))))))))
(.f64 #s(approx (+ ( (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (+.f64 #s(literal 1 binary64) (.f64 lambda2 (+.f64 lambda1 (.f64 #s(literal -1/2 binary64) lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (+.f64 #s(literal 1 binary64) (.f64 lambda2 (+.f64 lambda1 (.f64 #s(literal -1/2 binary64) lambda2))))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (+.f64 #s(literal 1 binary64) (.f64 lambda2 (+.f64 lambda1 (.f64 #s(literal -1/2 binary64) lambda2)))))
(+.f64 #s(literal 1 binary64) (.f64 lambda2 (+.f64 lambda1 (.f64 #s(literal -1/2 binary64) lambda2))))
(.f64 lambda2 (+.f64 lambda1 (.f64 #s(literal -1/2 binary64) lambda2)))
(+.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))
(*.f64 #s(literal -1/2 binary64) lambda2)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 #s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) (/.f64 (cos.f64 lambda2) lambda1)))))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 #s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) (/.f64 (cos.f64 lambda2) lambda1))))))))
(+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ ( (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 #s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) (/.f64 (cos.f64 lambda2) lambda1)))))))
(.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ ( (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 #s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) (/.f64 (cos.f64 lambda2) lambda1))))))
#s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 #s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) (/.f64 (cos.f64 lambda2) lambda1)))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 #s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) (/.f64 (cos.f64 lambda2) lambda1))))
(*.f64 lambda1 #s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) (/.f64 (cos.f64 lambda2) lambda1)))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) (/.f64 (cos.f64 lambda2) lambda1))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (.f64 lambda1 lambda1) #s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (.f64 lambda1 lambda1) #s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))))))
(+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ ( (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (.f64 lambda1 lambda1) #s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
(.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ ( (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (.f64 lambda1 lambda1) #s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))))
#s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (.f64 lambda1 lambda1) #s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (.f64 lambda1 lambda1) #s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
(.f64 (.f64 lambda1 lambda1) #s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #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) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1 binary64) (/.f64 #s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1 binary64) (/.f64 #s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))))))))
(+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ ( (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1 binary64) (/.f64 #s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))))
(.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ ( (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1 binary64) (/.f64 #s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1 binary64) (/.f64 #s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1 binary64) (/.f64 #s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))))
(.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1 binary64) (/.f64 #s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))
(fma.f64 #s(literal -1 binary64) (/.f64 #s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))
(+.f64 (.f64 #s(literal -1 binary64) (/.f64 #s(approx (+ ( -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1)) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))
(/.f64 #s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1)
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1)))
(*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))
(*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (/ (pow (cos phi1) 2) (- (cos phi1) ( (cos (- lambda1 lambda2)) (cos phi2)))) (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 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) #s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (/ (pow (cos phi1) 2) (- (cos phi1) ( (cos (- lambda1 lambda2)) (cos phi2)))) (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 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) #s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 #s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (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 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 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 (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (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 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) #s(approx (- (cos phi1) ( (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.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 phi1) ( (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) #s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))
(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 phi1) ( (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) #s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) #s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (pow.f64 (cos.f64 phi1) #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 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (exp.f64 (.f64 (log.f64 (cos.f64 phi1)) #s(literal 3 binary64)))) (+.f64 (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)) (.f64 (.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (exp.f64 (.f64 (log.f64 (cos.f64 phi1)) #s(literal 3 binary64)))) (+.f64 (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)) (.f64 (.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (exp.f64 (.f64 (log.f64 (cos.f64 phi1)) #s(literal 3 binary64)))) (+.f64 (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)) (.f64 (*.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
(+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (exp.f64 (.f64 (log.f64 (cos.f64 phi1)) #s(literal 3 binary64))))
(exp.f64 (*.f64 (log.f64 (cos.f64 phi1)) #s(literal 3 binary64)))
(*.f64 (log.f64 (cos.f64 phi1)) #s(literal 3 binary64))
(log.f64 (cos.f64 phi1))
(+.f64 (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)) (.f64 (*.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(.f64 (.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (cos.f64 phi1))
(*.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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)))))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 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 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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))))))))
(/.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 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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)))))))
(+.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)))
(pow.f64 (cos.f64 phi1) #s(literal 3 binary64))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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))))))
(+.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #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 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)))) #s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)))) #s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))
(/.f64 (-.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 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)))) #s(approx ( (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))
(-.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 (cos.f64 phi1) (.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 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.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)))
(.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))
(pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))
(*.f64 (cos.f64 lambda1) (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)) (exp.f64 (.f64 (log.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (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)) (exp.f64 (.f64 (log.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (exp.f64 (.f64 (log.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2))))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (exp.f64 (.f64 (log.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64))))
(exp.f64 (.f64 (log.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64)))
(.f64 (log.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64))
(log.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.f64 #s(approx (- (pow lambda1 3) (pow lambda2 3)) (.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64)))) (fma.f64 lambda1 lambda1 (fma.f64 lambda2 lambda2 (.f64 lambda1 lambda2)))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.f64 #s(approx (- (pow lambda1 3) (pow lambda2 3)) (.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64)))) (fma.f64 lambda1 lambda1 (fma.f64 lambda2 lambda2 (.f64 lambda1 lambda2)))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 (cos.f64 phi2) (sin.f64 (/.f64 #s(approx (- (pow lambda1 3) (pow lambda2 3)) (.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64)))) (fma.f64 lambda1 lambda1 (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda2))))))
(sin.f64 (/.f64 #s(approx (- (pow lambda1 3) (pow lambda2 3)) (.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64)))) (fma.f64 lambda1 lambda1 (fma.f64 lambda2 lambda2 (.f64 lambda1 lambda2)))))
(/.f64 #s(approx (- (pow lambda1 3) (pow lambda2 3)) (.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64)))) (fma.f64 lambda1 lambda1 (fma.f64 lambda2 lambda2 (.f64 lambda1 lambda2))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) (*.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64))))
(*.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64)))
(pow.f64 lambda2 #s(literal 3 binary64))
(fma.f64 lambda1 lambda1 (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda2)))
(+.f64 (.f64 lambda1 lambda1) (fma.f64 lambda2 lambda2 (.f64 lambda1 lambda2)))
(fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda2))
(+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 lambda2))
(*.f64 lambda1 lambda2)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.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)))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.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)))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))
(.f64 (cos.f64 phi2) (sin.f64 (/.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))))))
(sin.f64 (/.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 (-.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 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))
(pow.f64 lambda1 #s(literal 3 binary64))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))
(fma.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2) #s(literal 1 binary64))
(+.f64 (*.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) #s(literal 1 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.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))))))))
(atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.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)))))))
(.f64 (cos.f64 phi2) (-.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 (cos.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))))))
(+.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 (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) #s(approx ( (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (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) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 #s(approx (+ phi2 (/ (PI) 2)) phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (+ phi2 (/ (PI) 2)) phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (sin.f64 #s(approx (+ phi2 (/ (PI) 2)) phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
(/.f64 (+.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)) (pow.f64 lambda1 #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(literal 1 binary64)) (cos.f64 phi1))) lambda1))))
(+.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)) (pow.f64 lambda1 #s(literal 3 binary64)))
(pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 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)))
(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))
(+.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 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(literal 1 binary64)) (cos.f64 phi1))) 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 2 binary64))
(-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(literal 1 binary64)) (cos.f64 phi1))) lambda1))
(.f64 (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(literal 1 binary64)) (cos.f64 phi1))) lambda1)
(/.f64 (-.f64 (.f64 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 2 binary64))) #s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) lambda1))))))
(-.f64 (.f64 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 2 binary64)))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) lambda1)))))
(.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) lambda1))))
(+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) lambda1)))
(.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) lambda1))
(/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) lambda1)
(/.f64 (-.f64 (.f64 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 2 binary64))) (-.f64 lambda1 (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(literal 1 binary64)) (cos.f64 phi1)))))
(-.f64 lambda1 (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(literal 1 binary64)) (cos.f64 phi1))))
#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))) lambda1) 1) 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))) lambda1) 1) 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))) lambda1) 1) (/.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))) lambda1) 1) (/.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 (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1) (/.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 (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1) (/.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 lambda1 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 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2)))
#s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))
#s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (neg.f64 lambda2)) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (cos.f64 (neg.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)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.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) (sin.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.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) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.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) (sin.f64 (neg.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))
#s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))
#s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2))))))
#s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 lambda1 (-.f64 (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 (neg.f64 lambda2))))))
#s(approx (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (/.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))) (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) (sin.f64 (neg.f64 lambda2))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 (cos.f64 phi2) (sin.f64 (neg.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) (sin.f64 (neg.f64 lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.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) (sin.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.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) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.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) (sin.f64 (neg.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) lambda1) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))))
#s(approx (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) 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 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))))
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))) lambda1))
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) (/.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 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))) lambda1))
#s(approx (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))) lambda1))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) lambda2))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) lambda2)))))) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) lambda2))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) lambda2)))))))) (.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos.f64 (*.f64 #s(literal -1 binary64) lambda2)))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (cos.f64 (.f64 #s(literal -1 binary64) lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (cos.f64 (.f64 #s(literal -1 binary64) lambda2)) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 (.f64 #s(literal -1 binary64) lambda2)))) (sin.f64 (.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (cos.f64 (.f64 #s(literal -1 binary64) lambda2)) (.f64 lambda1 (-.f64 (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal -1 binary64) lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (sin.f64 (.f64 #s(literal -1 binary64) lambda2)))))) (sin.f64 (.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) lambda2))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) (+.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2)))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 lambda1 (-.f64 (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 (neg.f64 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 (cos.f64 phi1) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))))) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))))) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 phi1) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 phi1) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (fma.f64 lambda1 (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) (sin.f64 (neg.f64 lambda2)))
#s(approx (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))))
#s(approx (* lambda1 (cos (neg lambda2))) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) (+.f64 (cos.f64 phi1) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) lambda2))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) lambda2)))))) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) lambda2))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) lambda2)))))))) (.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) lambda2))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) lambda2))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) lambda2)))))) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) lambda2))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) lambda2)))))))) (.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1 binary64) 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 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 lambda2))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2)))))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 lambda1 (-.f64 (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 (neg.f64 lambda2)))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (cos.f64 (neg.f64 lambda2)))
#s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))
#s(approx (* -1 (* lambda1 (sin (neg lambda2)))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))
#s(approx (* lambda1 (sin (neg lambda2))) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))) (+.f64 (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))) (+.f64 (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))) (+.f64 (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal 1/24 binary64) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (cos lambda1) #s(literal 1 binary64))
#s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))
#s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (+.f64 (sin.f64 (neg.f64 lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (+.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (neg.f64 lambda2)))))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (+.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (neg.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (neg.f64 lambda2)) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (+.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (neg.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/6 binary64) (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal 1/12 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (neg.f64 lambda2)))))))))))))))
#s(approx (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2.f64 (.f64 (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (fma.f64 lambda1 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2)))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2)))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2))) (.f64 (cos.f64 phi2) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)))) (.f64 (cos.f64 phi2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2))) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)))))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)))) (.f64 (cos.f64 phi2) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (+.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)) (.f64 lambda1 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (+.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)) (.f64 lambda1 (+.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2))))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (+.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)) (.f64 lambda1 (+.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2))))))))))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) (-.f64 (+.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (neg.f64 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 lambda1 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 3 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 lambda1 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (/.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (/.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))))))) (/.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (/.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))) (.f64 lambda1 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))) (/.f64 (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))))))) (/.f64 (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (/.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 lambda1 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (-.f64 (fma.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (-.f64 (fma.f64 lambda1 (-.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal -2 binary64) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))
#s(approx (pow (cos (- lambda1 lambda2)) 2) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))
#s(approx (pow (cos (- lambda1 lambda2)) 2) (fma.f64 #s(literal -2 binary64) (.f64 lambda1 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))
#s(approx (pow (cos (- lambda1 lambda2)) 2) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))
#s(approx (pow (cos (- lambda1 lambda2)) 2) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 lambda1 (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) (-.f64 (+.f64 (cos.f64 phi1) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))) (cos.f64 (neg.f64 lambda2))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 lambda1 (+.f64 (sin.f64 (neg.f64 lambda2)) (.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))))) (cos.f64 (neg.f64 lambda2))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 lambda1 (+.f64 (sin.f64 (neg.f64 lambda2)) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)))))))) (cos.f64 (neg.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 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 (pow.f64 lambda1 #s(literal 2 binary64)) (sin.f64 lambda2))))))
#s(approx (* (sin lambda1) (sin lambda2)) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 lambda2) (.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (sin.f64 lambda2))))))))
#s(approx (* (sin lambda1) (sin lambda2)) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 lambda2) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (sin.f64 lambda2)) (*.f64 #s(literal 1/120 binary64) (sin.f64 lambda2)))))))))
#s(approx (sin lambda1) lambda1)
#s(approx (sin lambda1) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))))
#s(approx (sin lambda1) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin lambda1) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 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)))))) (+.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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 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))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (fma.f64 lambda1 (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) (cos.f64 (neg.f64 lambda2)))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (sin.f64 (neg.f64 lambda2)) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))))))
#s(approx (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))
#s(approx (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (sin.f64 (neg.f64 lambda2)) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))))))
#s(approx (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 (neg.f64 lambda2))))
#s(approx (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2))))
#s(approx (* -1/2 (* lambda1 (cos (neg lambda2)))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 (neg.f64 lambda2)))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) (cos.f64 (neg.f64 lambda2)))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (sin.f64 (neg.f64 lambda2)) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (sin.f64 (neg.f64 lambda2)) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))))
#s(approx (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))
#s(approx (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (sin.f64 (neg.f64 lambda2)) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))))))
#s(approx (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (sin.f64 (neg.f64 lambda2)) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
#s(approx (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 (neg.f64 lambda2))))
#s(approx (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2))))
#s(approx (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))) (-.f64 (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 (neg.f64 lambda2))))
#s(approx (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 (neg.f64 lambda2)))))
#s(approx (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))
#s(approx (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2))))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2))))
#s(approx (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))
#s(approx (* 1/6 (* lambda1 (sin (neg lambda2)))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 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) (fma.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) (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) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 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) (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 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 (fma.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 (fma.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 (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) (fma.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 phi2))))
#s(approx (+ (cos lambda2) (* lambda1 (sin lambda2))) (cos.f64 lambda2))
#s(approx (+ (cos lambda2) (* lambda1 (sin lambda2))) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
#s(approx (* lambda1 (sin lambda2)) (*.f64 lambda1 (sin.f64 lambda2)))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2)))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) (-.f64 (.f64 lambda1 (sin.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 lambda2)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) lambda2))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (fma.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) lambda2))) (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) lambda2)))) (.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) lambda2))) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) lambda2)))))) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) lambda2)))) (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (sin.f64 (*.f64 #s(literal -1 binary64) lambda2)))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (sin.f64 (.f64 #s(literal -1 binary64) lambda2)) (.f64 lambda1 (cos.f64 (*.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (sin.f64 (.f64 #s(literal -1 binary64) lambda2)) (.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal -1 binary64) lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (sin.f64 (.f64 #s(literal -1 binary64) lambda2))))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (sin.f64 (.f64 #s(literal -1 binary64) lambda2)) (.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal -1 binary64) lambda2)) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal -1 binary64) lambda2)) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (cos.f64 (.f64 #s(literal -1 binary64) lambda2))))))))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2)))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2)))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) (.f64 lambda2 (-.f64 (.f64 #s(literal 1/6 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) (fma.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 lambda2 #s(literal 2 binary64)))) (.f64 lambda2 (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1 binary64)))))
#s(approx (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)) (.f64 lambda2 (-.f64 (.f64 #s(literal 1/6 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(approx (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)) (fma.f64 #s(literal -1/2 binary64) (.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64))) (.f64 lambda2 (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1 binary64)))))
#s(approx (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1) (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1 binary64)))
#s(approx (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1) (-.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda2) (.f64 #s(literal 1/6 binary64) (pow.f64 lambda2 #s(literal 2 binary64)))) #s(literal 1 binary64)))
#s(approx (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) (*.f64 #s(literal 1/6 binary64) (pow.f64 lambda2 #s(literal 2 binary64))))
#s(approx (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) (fma.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda2) (.f64 #s(literal 1/6 binary64) (pow.f64 lambda2 #s(literal 2 binary64)))))
#s(approx (+ (* -1/2 lambda1) (* 1/6 lambda2)) (*.f64 #s(literal 1/6 binary64) lambda2))
#s(approx (+ (* -1/2 lambda1) (* 1/6 lambda2)) (fma.f64 #s(literal -1/2 binary64) lambda1 (*.f64 #s(literal 1/6 binary64) lambda2)))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (- (* lambda1 (cos lambda2)) (sin lambda2)) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2)))
#s(approx (- (* lambda1 (cos lambda2)) (sin lambda2)) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2)))
#s(approx (* lambda1 (cos lambda2)) (*.f64 lambda1 (cos.f64 lambda2)))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2)))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2)))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (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 lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2)))
#s(approx (* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2))))
#s(approx (* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (.f64 lambda1 (+.f64 (cos.f64 lambda2) (.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (sin.f64 lambda2)))))))
#s(approx (pow lambda1 2) (pow.f64 lambda1 #s(literal 2 binary64)))
#s(approx (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 lambda2) (pow.f64 lambda1 #s(literal 2 binary64)))))
#s(approx (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) (/.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2))) (pow.f64 lambda1 #s(literal 2 binary64))))
#s(approx (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) (/.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (.f64 lambda1 (+.f64 (cos.f64 lambda2) (.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (sin.f64 lambda2)))))) (pow.f64 lambda1 #s(literal 2 binary64))))
#s(approx (/ (sin lambda2) (pow lambda1 2)) (/.f64 (sin.f64 lambda2) (pow.f64 lambda1 #s(literal 2 binary64))))
#s(approx (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)) (/.f64 (cos.f64 lambda2) lambda1))
#s(approx (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)) (/.f64 (+.f64 (cos.f64 lambda2) (.f64 #s(literal 1/2 binary64) (.f64 lambda1 (sin.f64 lambda2)))) lambda1))
#s(approx (/ (cos lambda2) lambda1) (/.f64 (cos.f64 lambda2) lambda1))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (cos.f64 lambda2))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos 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 lambda2) lambda1) -1/2) (neg (sin lambda2))) (sin.f64 lambda2))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))
#s(approx (* (* (cos lambda2) lambda1) -1/2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))))
#s(approx (* (cos lambda2) lambda1) (*.f64 lambda1 (cos.f64 lambda2)))
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) (*.f64 lambda1 (cos.f64 lambda2)))
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) (.f64 lambda1 (+.f64 (cos.f64 lambda2) (.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (sin.f64 lambda2))))))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) (cos.f64 lambda2))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) (+.f64 (cos.f64 lambda2) (.f64 #s(literal 1/2 binary64) (.f64 lambda1 (sin.f64 lambda2)))))
#s(approx (* lambda1 (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) (cos.f64 lambda2))
#s(approx (* lambda1 (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) (+.f64 (cos.f64 lambda2) (.f64 #s(literal 1/2 binary64) (.f64 lambda1 (sin.f64 lambda2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.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 (* -1/2 (* lambda1 (neg (sin lambda2)))) (.f64 #s(literal 1/2 binary64) (.f64 lambda1 (sin.f64 lambda2))))
#s(approx (* lambda1 (neg (sin lambda2))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 lambda2))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 phi2) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (cos.f64 phi2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 phi2) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (cos.f64 phi2))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 phi2) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (cos.f64 phi2)) (.f64 #s(literal 1/24 binary64) (cos.f64 phi2)))))))))
#s(approx (+ 1 (* -1/2 (* lambda1 lambda1))) #s(literal 1 binary64))
#s(approx (+ 1 (* -1/2 (* lambda1 lambda1))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))
#s(approx (* -1/2 (* lambda1 lambda1)) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))
#s(approx (* lambda1 lambda1) (pow.f64 lambda1 #s(literal 2 binary64)))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) #s(literal 1 binary64))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2)) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))
#s(approx (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2)) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))
#s(approx (- (* 1/24 (* lambda1 lambda1)) 1/2) #s(literal -1/2 binary64))
#s(approx (- (* 1/24 (* lambda1 lambda1)) 1/2) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))
#s(approx (* 1/24 (* lambda1 lambda1)) (*.f64 #s(literal 1/24 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) #s(literal 1 binary64))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))
#s(approx (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))
#s(approx (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) #s(literal 1/2 binary64))))
#s(approx (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) #s(literal -1/2 binary64))
#s(approx (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))
#s(approx (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) (-.f64 (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))
#s(approx (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) (*.f64 #s(literal 1/24 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))
#s(approx (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))))
#s(approx (+ 1/24 (* -1/720 (* lambda1 lambda1))) #s(literal 1/24 binary64))
#s(approx (+ 1/24 (* -1/720 (* lambda1 lambda1))) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))
#s(approx (* -1/720 (* lambda1 lambda1)) (*.f64 #s(literal -1/720 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) (*.f64 #s(literal -1 binary64) lambda2))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))
#s(approx (* lambda1 (- (pow lambda2 -1) (pow lambda1 -1))) #s(literal -1 binary64))
#s(approx (* lambda1 (- (pow lambda2 -1) (pow lambda1 -1))) (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))
#s(approx (- (pow lambda2 -1) (pow lambda1 -1)) (/.f64 #s(literal -1 binary64) lambda1))
#s(approx (- (pow lambda2 -1) (pow lambda1 -1)) (/.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda1))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) (*.f64 #s(literal -1 binary64) lambda2))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) #s(literal -1 binary64))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))
#s(approx (- (pow (/ lambda1 lambda2) 3) 1) #s(literal -1 binary64))
#s(approx (- (pow (/ lambda1 lambda2) 3) 1) (-.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) #s(literal 1 binary64)))
#s(approx (pow (/ lambda1 lambda2) 3) (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) #s(literal 1 binary64))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) (+.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 (+.f64 (/.f64 #s(literal 1 binary64) lambda2) (/.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64)))))))
#s(approx (+ 1 (* (/ lambda1 lambda2) 1)) #s(literal 1 binary64))
#s(approx (+ 1 (* (/ lambda1 lambda2) 1)) (+.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))
#s(approx (* lambda1 (+ (/ 1 lambda1) (/ 1 lambda2))) #s(literal 1 binary64))
#s(approx (* lambda1 (+ (/ 1 lambda1) (/ 1 lambda2))) (+.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))
#s(approx (+ (/ 1 lambda1) (/ 1 lambda2)) (/.f64 #s(literal 1 binary64) lambda1))
#s(approx (+ (/ 1 lambda1) (/ 1 lambda2)) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)) lambda1))
#s(approx (/ 1 lambda1) (/.f64 #s(literal 1 binary64) lambda1))
#s(approx (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (*.f64 #s(literal -1 binary64) lambda2))
#s(approx (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))
#s(approx (+ 1 (* -1 (/ lambda2 lambda1))) (*.f64 #s(literal -1 binary64) (/.f64 lambda2 lambda1)))
#s(approx (+ 1 (* -1 (/ lambda2 lambda1))) (/.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)) lambda1))
#s(approx (* -1 (/ lambda2 lambda1)) (*.f64 #s(literal -1 binary64) (/.f64 lambda2 lambda1)))
#s(approx (/ lambda2 lambda1) (/.f64 lambda2 lambda1))
#s(approx (+ 1 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (+.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2))))
#s(approx (+ 1 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (+.f64 #s(literal 1 binary64) (+.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)) (.f64 lambda1 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2))))))
#s(approx (+ 1 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (+.f64 #s(literal 1 binary64) (+.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)) (.f64 lambda1 (+.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)))))))))
#s(approx (+ 1 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (+.f64 #s(literal 1 binary64) (+.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)) (.f64 lambda1 (+.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)))))))))))
#s(approx (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)))
#s(approx (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (+.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)) (.f64 lambda1 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)))))
#s(approx (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (+.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)) (.f64 lambda1 (+.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2))))))))
#s(approx (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (+.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)) (.f64 lambda1 (+.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2)) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2))))))))))
#s(approx (- (+ lambda1 (* 1/2 (PI))) lambda2) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2))
#s(approx (- (+ lambda1 (* 1/2 (PI))) lambda2) (-.f64 (+.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2))
#s(approx (+ lambda1 (* 1/2 (PI))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (+ lambda1 (* 1/2 (PI))) (+.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))))) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))))) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 lambda1 (-.f64 (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))
#s(approx (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) (+.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) (+.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) (+.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 lambda1 (-.f64 (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (-.f64 (fma.f64 lambda1 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (-.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (-.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (-.f64 (+.f64 #s(literal 1 binary64) (.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (-.f64 (+.f64 #s(literal 1 binary64) (.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) (fma.f64 #s(literal -2 binary64) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 lambda1 (-.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (pow.f64 (cos.f64 (-.f64 lambda1 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 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (pow.f64 (cos.f64 (-.f64 lambda1 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 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (pow.f64 (cos.f64 (-.f64 lambda1 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 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (neg.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 (neg.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 (neg.f64 lambda2)))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (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 (neg.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 (neg.f64 lambda2)))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (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 (neg.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 (neg.f64 lambda2)))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (fma.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (-.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))) (+.f64 (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (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 (neg.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 (neg.f64 lambda2)))))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (/.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)))) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (fma.f64 lambda1 (-.f64 (fma.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 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)))) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)))) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (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 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (fma.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)))) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (-.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)))) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)))) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)))) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))
#s(approx (/ (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2)))))
#s(approx (/ (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (sin.f64 (neg.f64 lambda2)) (.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2)))) (/.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (/ (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2)))) (.f64 lambda1 (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2)))) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (+.f64 (sin.f64 (neg.f64 lambda2)) (.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (sin.f64 (neg.f64 lambda2)) (.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2))))))))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (sin.f64 (neg.f64 lambda2)) (.f64 #s(literal -2 binary64) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2)))) (/.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (/ (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2)))) (.f64 lambda1 (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2)))) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2)))) (+.f64 (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2)))) (/.f64 (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2))))))) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 #s(literal -1/6 binary64) (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 (+.f64 (sin.f64 (neg.f64 lambda2)) (.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2)))) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (+.f64 (sin.f64 (neg.f64 lambda2)) (.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (sin.f64 (neg.f64 lambda2)) (.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2))))))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2)))) (/.f64 (.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (sin.f64 (neg.f64 lambda2)) (.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2))))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2))))))) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2))))))) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (+.f64 (sin.f64 (neg.f64 lambda2)) (.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (sin.f64 (neg.f64 lambda2)) (.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2))))))))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (sin.f64 (neg.f64 lambda2)) (.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2)))) (/.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (fma.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)))))
#s(approx (pow (cos (- lambda1 lambda2)) 3) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)))
#s(approx (pow (cos (- lambda1 lambda2)) 3) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))))
#s(approx (pow (cos (- lambda1 lambda2)) 3) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))))
#s(approx (pow (cos (- lambda1 lambda2)) 3) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (fma.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))))
#s(approx (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2))))
#s(approx (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (+.f64 (sin.f64 (neg.f64 lambda2)) (.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (cos.f64 (neg.f64 lambda2))))
#s(approx (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (+.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 lambda1 (-.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2))))))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (cos.f64 (neg.f64 lambda2))))
#s(approx (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (+.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 lambda1 (-.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 lambda1 (fma.f64 #s(literal -1/6 binary64) (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2))))))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (cos.f64 (neg.f64 lambda2))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (.f64 lambda1 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 lambda1 (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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 (.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 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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 (.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 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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 (.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 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 lambda1 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 lambda1 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (+.f64 (/.f64 (.f64 (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (+.f64 (/.f64 (.f64 (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (+.f64 (/.f64 (.f64 (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))
#s(approx (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (-.f64 (fma.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 3 binary64))))) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))
#s(approx (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 3 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 3 binary64))))) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))
#s(approx (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (.f64 lambda1 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 3 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64))) (/.f64 (.f64 (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 3 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 3 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 3 binary64))))) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))
#s(approx (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))
#s(approx (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))))))) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))
#s(approx (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))))))) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))
#s(approx (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 lambda1 (-.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))))))) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))))) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))))) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))
#s(approx (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))
#s(approx (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))
#s(approx (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))
#s(approx (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) (fma.f64 #s(literal 2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) (fma.f64 lambda1 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 lambda1 (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) (fma.f64 lambda1 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (fma.f64 lambda1 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))) (fma.f64 lambda1 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))))) (/.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))))))) (/.f64 (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))))) (/.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))) (.f64 lambda1 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))) (/.f64 (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))))))) (/.f64 (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))))) (/.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (.f64 #s(literal 2 binary64) (.f64 lambda1 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (.f64 lambda1 (-.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal -2 binary64) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (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 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (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 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (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 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (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 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (/.f64 (.f64 (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (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 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64)))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (/.f64 (.f64 (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))) (/.f64 (.f64 (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (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 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 lambda1 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64)))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (fma.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (/.f64 (.f64 (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64)))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (/.f64 (.f64 (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (/.f64 (.f64 (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))) (/.f64 (.f64 (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))))) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (pow.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (.f64 (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))))) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (pow.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (fma.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))))) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (pow.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))))) (.f64 #s(literal 2 binary64) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (pow.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (pow.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (fma.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))))))) (+.f64 (/.f64 (.f64 (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64))))))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))))) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (pow.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))))))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))))) (.f64 lambda1 (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (pow.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (fma.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))))) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (pow.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))))) (.f64 #s(literal 2 binary64) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (pow.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (pow.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))))))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))
#s(approx (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))))
#s(approx (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (fma.f64 lambda1 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))))
#s(approx (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (fma.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (pow.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))))
#s(approx (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (fma.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))))) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (pow.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))))) (.f64 #s(literal 2 binary64) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (pow.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (pow.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (pow.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))))
#s(approx (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))
#s(approx (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))))
#s(approx (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (pow.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))))
#s(approx (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (fma.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))))) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (pow.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))))) (.f64 #s(literal 2 binary64) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (pow.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (pow.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (pow.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))))
#s(approx (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))
#s(approx (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))
#s(approx (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 lambda1 (-.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))
#s(approx (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (fma.f64 lambda1 (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))))) (fma.f64 lambda1 (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))))
#s(approx (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))))
#s(approx (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 lambda1 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))))
#s(approx (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 lambda1 (fma.f64 lambda1 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))))
#s(approx (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))
#s(approx (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) (fma.f64 lambda1 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))))
#s(approx (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) (fma.f64 lambda1 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 lambda1 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))))
#s(approx (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) (fma.f64 lambda1 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 lambda1 (fma.f64 lambda1 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))))
#s(approx (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))
#s(approx (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) (fma.f64 #s(literal -4 binary64) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))
#s(approx (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) (fma.f64 lambda1 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))
#s(approx (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) (fma.f64 lambda1 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))
#s(approx (pow (cos (- lambda1 lambda2)) 4) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))
#s(approx (pow (cos (- lambda1 lambda2)) 4) (fma.f64 #s(literal -4 binary64) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))
#s(approx (pow (cos (- lambda1 lambda2)) 4) (fma.f64 lambda1 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))
#s(approx (pow (cos (- lambda1 lambda2)) 4) (fma.f64 lambda1 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 lambda1 (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))))))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))
#s(approx (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))
#s(approx (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))
#s(approx (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (pow.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))
#s(approx (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (fma.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))))) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (pow.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))))) (.f64 #s(literal 2 binary64) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (pow.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (pow.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (pow.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 4 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))
#s(approx (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))))
#s(approx (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))))
#s(approx (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))))
#s(approx (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (fma.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))))) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))))) (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))))
#s(approx (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))
#s(approx (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))
#s(approx (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))))) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))
#s(approx (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (fma.f64 lambda1 (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (fma.f64 lambda1 (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (fma.f64 lambda1 (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))))))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))
#s(approx (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) #s(literal 2 binary64)))
#s(approx (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 lambda1 (fma.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) #s(literal 2 binary64)))
#s(approx (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 lambda1 (fma.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))))) #s(literal 2 binary64)))
#s(approx (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))))
#s(approx (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 lambda1 (fma.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))))
#s(approx (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 lambda1 (fma.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))))))
#s(approx (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))
#s(approx (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (fma.f64 #s(literal -2 binary64) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))
#s(approx (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -2 binary64) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))
#s(approx (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))))))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))
#s(approx (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 lambda1 (-.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (fma.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))
#s(approx (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))
#s(approx (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (fma.f64 #s(literal 2 binary64) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))
#s(approx (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (fma.f64 lambda1 (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))
#s(approx (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (fma.f64 lambda1 (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (fma.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))))
#s(approx (pow (cos (- lambda1 lambda2)) 6) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)))
#s(approx (pow (cos (- lambda1 lambda2)) 6) (fma.f64 #s(literal 2 binary64) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))
#s(approx (pow (cos (- lambda1 lambda2)) 6) (fma.f64 lambda1 (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (.f64 lambda1 (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))
#s(approx (pow (cos (- lambda1 lambda2)) 6) (fma.f64 lambda1 (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (.f64 lambda1 (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (fma.f64 lambda1 (fma.f64 #s(literal 2 binary64) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (fma.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))))
#s(approx (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))
#s(approx (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (fma.f64 lambda1 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))
#s(approx (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (fma.f64 lambda1 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (.f64 lambda1 (fma.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (pow.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))
#s(approx (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (fma.f64 lambda1 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (.f64 lambda1 (fma.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (fma.f64 lambda1 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (pow.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))))) (.f64 #s(literal 2 binary64) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (pow.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))
#s(approx (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)))
#s(approx (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (fma.f64 #s(literal 2 binary64) (.f64 lambda1 (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64))))
#s(approx (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (fma.f64 lambda1 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (.f64 lambda1 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (pow.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) #s(literal 2 binary64))))) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64))))
#s(approx (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (fma.f64 lambda1 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (.f64 lambda1 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (fma.f64 lambda1 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))))) (.f64 #s(literal 2 binary64) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))))) (pow.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64))))
#s(approx (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 lambda1 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))
#s(approx (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 lambda1 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))
#s(approx (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 lambda1 (-.f64 (fma.f64 lambda1 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (fma.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (+.f64 (/.f64 (.f64 (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64)) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 6 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (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 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (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))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (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 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (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))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (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 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (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 (neg.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 (neg.f64 lambda2))))))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (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 (neg.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 (neg.f64 lambda2)))))))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (fma.f64 lambda1 (-.f64 (fma.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 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) #s(literal 2 binary64))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))) (+.f64 (/.f64 (.f64 (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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (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 (neg.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 (neg.f64 lambda2)))))))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (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 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (fma.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) #s(literal 2 binary64))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 3 binary64))) (/.f64 (.f64 (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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) #s(literal 2 binary64))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))) (+.f64 (/.f64 (.f64 (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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (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 (neg.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 (neg.f64 lambda2)))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/.f64 (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 (neg.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 (neg.f64 lambda2)))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 lambda1 (.f64 (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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))) (/.f64 (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 (neg.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 (neg.f64 lambda2))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) #s(literal 2 binary64))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 3 binary64))) (/.f64 (.f64 (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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64)))))) (/.f64 (.f64 (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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64)))) (/.f64 (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 (neg.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 (neg.f64 lambda2))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 lambda1 (-.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) #s(literal 2 binary64))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 3 binary64))) (/.f64 (.f64 (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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 3 binary64))) (/.f64 (.f64 (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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) #s(literal 2 binary64))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 3 binary64))) (/.f64 (.f64 (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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64)))))) (/.f64 (.f64 (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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64)))) (/.f64 (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 (neg.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 (neg.f64 lambda2))))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (fma.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (.f64 lambda1 (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (.f64 lambda1 (-.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (-.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 lambda1 (-.f64 (fma.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 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (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 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (fma.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (fma.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (fma.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 lambda1 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))
#s(approx (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))
#s(approx (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))
#s(approx (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (cos.f64 lambda2))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
#s(approx (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda2 #s(literal 2 binary64)))))
#s(approx (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda2 #s(literal 2 binary64)) (*.f64 lambda1 lambda2))))
#s(approx (* lambda2 (+ lambda1 (* -1/2 lambda2))) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda2 #s(literal 2 binary64))))
#s(approx (* lambda2 (+ lambda1 (* -1/2 lambda2))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda2 #s(literal 2 binary64)) (*.f64 lambda1 lambda2)))
#s(approx (+ lambda1 (* -1/2 lambda2)) (*.f64 #s(literal -1/2 binary64) lambda2))
#s(approx (+ lambda1 (* -1/2 lambda2)) (+.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda2)))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) (cos.f64 lambda2))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) (/.f64 (cos.f64 lambda2) lambda1))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) (/.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))) lambda1))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) (cos.f64 lambda2))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2)))))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (/.f64 (cos.f64 lambda2) (pow.f64 lambda1 #s(literal 2 binary64))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (/.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))) (pow.f64 lambda1 #s(literal 2 binary64))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (/.f64 (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2)))))) (pow.f64 lambda1 #s(literal 2 binary64))))
#s(approx (- (/ 1 (pow lambda1 2)) 1/2) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))
#s(approx (- (/ 1 (pow lambda1 2)) 1/2) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))) (pow.f64 lambda1 #s(literal 2 binary64))))
#s(approx (/ 1 (pow lambda1 2)) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) (pow.f64 lambda1 #s(literal 2 binary64)))))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) (/.f64 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda2) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 lambda2)))) (pow.f64 lambda1 #s(literal 2 binary64))))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1)))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (/.f64 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda2) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 lambda2)))) lambda1))
#s(approx (* -1 (/ (cos lambda2) lambda1)) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1)))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 lambda1 (-.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 3 binary64))) (.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (fma.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (fma.f64 lambda1 (-.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 3 binary64))) (.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 lambda1 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 lambda1 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 lambda1 (-.f64 (fma.f64 lambda1 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (fma.f64 #s(literal -2 binary64) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.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 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.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) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (/.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (fma.f64 lambda1 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))) (.f64 lambda1 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))) (/.f64 (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))) (.f64 lambda1 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))) (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal 1/3 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))) (/.f64 (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))) (/.f64 (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))))) (/.f64 (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (pow.f64 (cos.f64 (-.f64 lambda1 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 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (pow.f64 (cos.f64 (-.f64 lambda1 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 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (pow.f64 (cos.f64 (-.f64 lambda1 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 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (neg.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 (neg.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 (neg.f64 lambda2)))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (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 (neg.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 (neg.f64 lambda2)))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (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 (neg.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 (neg.f64 lambda2)))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (fma.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (-.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))) (+.f64 (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (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 (neg.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 (neg.f64 lambda2)))))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (fma.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (fma.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (neg.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 (neg.f64 lambda2))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (neg.f64 lambda2)) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (neg.f64 lambda2)) (sin.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.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 (neg.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) (sin.f64 (neg.f64 lambda2)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.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 (neg.f64 lambda2)))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.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) (sin.f64 (neg.f64 lambda2)))))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.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) (sin.f64 (neg.f64 lambda2))))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.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) (sin.f64 (neg.f64 lambda2)))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.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) (sin.f64 (neg.f64 lambda2)))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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)) (pow.f64 (cos.f64 (-.f64 lambda1 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 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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)) (pow.f64 (cos.f64 (-.f64 lambda1 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 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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)) (pow.f64 (cos.f64 (-.f64 lambda1 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 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (neg.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 (neg.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 (neg.f64 lambda2)))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (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 (neg.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 (neg.f64 lambda2)))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (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 (neg.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 (neg.f64 lambda2)))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (fma.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (+.f64 (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (-.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))) (+.f64 (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2)))))) (/.f64 (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 (neg.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 (neg.f64 lambda2)))))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (fma.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (fma.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))) (.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.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))) (- (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 (neg.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 (neg.f64 lambda2))))))
#s(approx (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))
#s(approx (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (neg.f64 lambda2)) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))
#s(approx (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (neg.f64 lambda2)) (sin.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.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 (neg.f64 lambda2))))))
#s(approx (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))
#s(approx (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (-.f64 (fma.f64 lambda1 (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))
#s(approx (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 lambda1 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))
#s(approx (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/6 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/6 binary64) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (fma.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))) (fma.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (neg.f64 lambda2)) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 #s(literal 2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 lambda1 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 lambda1 (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 lambda1 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))))
#s(approx (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)))
#s(approx (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2) (fma.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (-.f64 (cos.f64 phi1) (cos.f64 phi2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64))))
#s(approx (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2) (fma.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 (cos.f64 phi2) (-.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 phi2) (-.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64))))
#s(approx (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2) (fma.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 (cos.f64 phi2) (-.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 phi2) (-.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 #s(literal 1/360 binary64) (*.f64 (cos.f64 phi2) (-.f64 (cos.f64 phi1) (cos.f64 phi2)))))))))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64))))
#s(approx (- (cos phi1) (* (cos lambda1) (cos phi2))) (-.f64 (cos.f64 phi1) (cos.f64 phi2)))
#s(approx (- (cos phi1) (* (cos lambda1) (cos phi2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (cos.f64 phi2)))) (cos.f64 phi2)))
#s(approx (- (cos phi1) (* (cos lambda1) (cos phi2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/24 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (cos.f64 phi2))) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))))) (cos.f64 phi2)))
#s(approx (- (cos phi1) (* (cos lambda1) (cos phi2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/720 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (cos.f64 phi2))) (.f64 #s(literal 1/24 binary64) (cos.f64 phi2)))) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))))) (cos.f64 phi2)))
#s(approx (* (cos lambda1) (cos phi2)) (cos.f64 phi2))
#s(approx (* (cos lambda1) (cos phi2)) (+.f64 (cos.f64 phi2) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (cos.f64 phi2)))))
#s(approx (* (cos lambda1) (cos phi2)) (+.f64 (cos.f64 phi2) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (cos.f64 phi2)))))))
#s(approx (* (cos lambda1) (cos phi2)) (+.f64 (cos.f64 phi2) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (cos.f64 phi2)) (.f64 #s(literal 1/24 binary64) (cos.f64 phi2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.f64 lambda2)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (-.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 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (-.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.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 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) (fma.f64 #s(literal -2 binary64) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2)))) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.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 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))) (.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) (.f64 #s(literal 2 binary64) (log.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 lambda1 (sin.f64 (neg.f64 lambda2))) (cos.f64 (neg.f64 lambda2))) (.f64 #s(literal 2 binary64) (log.f64 (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) (fma.f64 #s(literal 2 binary64) (log.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (.f64 lambda1 (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (neg.f64 lambda2)) (cos.f64 (neg.f64 lambda2))) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 1 binary64)))))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) (fma.f64 #s(literal 2 binary64) (log.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (.f64 lambda1 (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (neg.f64 lambda2)) (cos.f64 (neg.f64 lambda2))) (.f64 lambda1 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/3 binary64) (*.f64 lambda1 (fma.f64 #s(literal -3 binary64) (/.f64 (sin.f64 (neg.f64 lambda2)) (cos.f64 (neg.f64 lambda2))) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (/.f64 (sin.f64 (neg.f64 lambda2)) (cos.f64 (neg.f64 lambda2)))))))) #s(literal 1 binary64)))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) (log.f64 (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) (+.f64 (log.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (.f64 #s(literal -1 binary64) (/.f64 (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))) (cos.f64 (neg.f64 lambda2))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) (+.f64 (log.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (neg.f64 lambda2)) (cos.f64 (neg.f64 lambda2))) (.f64 #s(literal 1/2 binary64) (.f64 lambda1 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 1 binary64))))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) (+.f64 (log.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (neg.f64 lambda2)) (cos.f64 (neg.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal 1/6 binary64) (.f64 lambda1 (fma.f64 #s(literal -3 binary64) (/.f64 (sin.f64 (neg.f64 lambda2)) (cos.f64 (neg.f64 lambda2))) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (/.f64 (sin.f64 (neg.f64 lambda2)) (cos.f64 (neg.f64 lambda2)))))) (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 (neg.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 1 binary64)))))))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) (*.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))))
#s(approx (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) (*.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64))))
#s(approx (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (pow.f64 lambda2 #s(literal 2 binary64)))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (fma.f64 lambda1 lambda2 (pow.f64 lambda2 #s(literal 2 binary64))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (pow.f64 lambda2 #s(literal 2 binary64))))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) (pow.f64 lambda2 #s(literal 2 binary64)))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) (fma.f64 lambda1 lambda2 (pow.f64 lambda2 #s(literal 2 binary64))))
#s(approx (* lambda1 lambda2) (*.f64 lambda1 lambda2))
#s(approx (pow lambda1 3) (pow.f64 lambda1 #s(literal 3 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) (fma.f64 (cos.f64 lambda1) (cos.f64 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))))))) (+.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) (- (* (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) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 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)))) (fma.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 (pow.f64 lambda1 #s(literal 2 binary64)) (cos.f64 lambda2))))))
#s(approx (* (sin lambda1) (cos lambda2)) (.f64 lambda1 (+.f64 (cos.f64 lambda2) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 lambda2) (.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (cos.f64 lambda2))))))))
#s(approx (* (sin lambda1) (cos lambda2)) (.f64 lambda1 (+.f64 (cos.f64 lambda2) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 lambda2) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (cos.f64 lambda2)) (*.f64 #s(literal 1/120 binary64) (cos.f64 lambda2)))))))))
#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 (pow.f64 lambda1 #s(literal 2 binary64)) (sin.f64 lambda2)))))
#s(approx (* (cos lambda1) (sin lambda2)) (+.f64 (sin.f64 lambda2) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda2) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (sin.f64 lambda2)))))))
#s(approx (* (cos lambda1) (sin lambda2)) (+.f64 (sin.f64 lambda2) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda2) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (sin.f64 lambda2)) (.f64 #s(literal 1/24 binary64) (sin.f64 lambda2))))))))
#s(approx (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))
#s(approx (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 phi2)))))
#s(approx (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 #s(literal 1 binary64) (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 (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 lambda1 (fma.f64 lambda1 (fma.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 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 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 (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 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 (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (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)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+.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))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (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)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 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 2 binary64)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) (fma.f64 #s(literal -1 binary64) (.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)))))) (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 2 binary64))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) (fma.f64 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)))))) (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 2 binary64))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (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 2 binary64)))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) (.f64 #s(literal -1 binary64) (.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 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) (.f64 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))) 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 (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (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 (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+.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 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (.f64 #s(literal -1 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 2 binary64))))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (-.f64 (pow.f64 lambda1 #s(literal 2 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 2 binary64))))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (.f64 #s(literal -1 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 (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.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 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) (.f64 #s(literal -1 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 (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) (+.f64 lambda1 (.f64 #s(literal -1 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 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 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 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (/.f64 (+.f64 lambda1 (.f64 #s(literal -1 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 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 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 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (/.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 (+ 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))) lambda1) 1) lambda1) lambda1)
#s(approx (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) 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))) lambda1) 1) #s(literal 1 binary64))
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (+.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 (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1) #s(literal 1 binary64))
#s(approx (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) 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 (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))))
#s(approx (sin (- lambda1 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 phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.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 (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (cos.f64 phi2) (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 (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) lambda1) lambda1)
#s(approx (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) 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 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))) lambda1))))
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) #s(literal 1 binary64))
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) (+.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 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))) lambda1)))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 lambda2 lambda1)))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (.f64 lambda1 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))) (pow.f64 lambda1 #s(literal 2 binary64))))) (/.f64 lambda2 lambda1))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (.f64 lambda1 (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))) (pow.f64 lambda1 #s(literal 3 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64))) (+.f64 (/.f64 lambda2 lambda1) (/.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64))))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (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 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))) lambda1))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (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) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))) lambda1))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 phi1) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))
#s(approx (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) lambda1))))
#s(approx (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))) lambda1))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))
#s(approx (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (/.f64 (sin.f64 (neg.f64 lambda2)) lambda1))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))) lambda1))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (*.f64 (cos.f64 phi2) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))
#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 (/.f64 #s(literal 1 binary64) lambda2) (/.f64 #s(literal 1 binary64) lambda1))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (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 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) lambda1))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))
#s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (*.f64 lambda1 (fma.f64 #s(literal -1 binary64) (sin.f64 (neg.f64 lambda2)) (/.f64 (cos.f64 (neg.f64 lambda2)) lambda1))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (cos lambda1) (cos.f64 lambda1))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) lambda1))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (.f64 (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (*.f64 lambda1 (cos.f64 lambda2)))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (.f64 lambda1 (+.f64 (cos.f64 lambda2) (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 lambda2) lambda1)))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (sin.f64 (-.f64 (+.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) lambda1)
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) (.f64 lambda1 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) lambda1))) (/.f64 lambda2 lambda1))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (pow (cos (- lambda1 lambda2)) 2) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (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 (sin lambda1) (sin.f64 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)))))) 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)))))) (.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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) lambda1))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (cos.f64 (neg.f64 lambda2)))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (neg.f64 lambda2)) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)) (/.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 #s(literal 2 binary64)))) (/.f64 (sin.f64 (neg.f64 lambda2)) lambda1))))
#s(approx (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (cos.f64 (neg.f64 lambda2)))))
#s(approx (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (neg.f64 lambda2)) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2))))))
#s(approx (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 (neg.f64 lambda2)))))
#s(approx (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (neg.f64 lambda2)) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) (.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) (.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (neg.f64 lambda2)) lambda1) (.f64 #s(literal 1/6 binary64) (sin.f64 (neg.f64 lambda2))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) (.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (neg.f64 lambda2)) (pow.f64 lambda1 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (neg.f64 lambda2)) lambda1) (.f64 #s(literal 1/6 binary64) (sin.f64 (neg.f64 lambda2)))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) (*.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (neg.f64 lambda2)) lambda1) (fma.f64 #s(literal 1/6 binary64) (sin.f64 (neg.f64 lambda2)) (/.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 #s(literal 3 binary64))))) (/.f64 (sin.f64 (neg.f64 lambda2)) (pow.f64 lambda1 #s(literal 2 binary64))))))
#s(approx (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) (.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (sin.f64 (neg.f64 lambda2)))))
#s(approx (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) (.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (neg.f64 lambda2)) lambda1) (.f64 #s(literal 1/6 binary64) (sin.f64 (neg.f64 lambda2))))))
#s(approx (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) (.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (neg.f64 lambda2)) (pow.f64 lambda1 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (neg.f64 lambda2)) lambda1) (.f64 #s(literal 1/6 binary64) (sin.f64 (neg.f64 lambda2)))))))
#s(approx (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))) (.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))
#s(approx (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (neg.f64 lambda2)) lambda1) (.f64 #s(literal 1/6 binary64) (sin.f64 (neg.f64 lambda2))))))
#s(approx (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (neg.f64 lambda2)) (pow.f64 lambda1 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (neg.f64 lambda2)) lambda1) (.f64 #s(literal 1/6 binary64) (sin.f64 (neg.f64 lambda2)))))))
#s(approx (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (sin.f64 (neg.f64 lambda2)))))
#s(approx (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (neg.f64 lambda2)) lambda1) (.f64 #s(literal 1/6 binary64) (sin.f64 (neg.f64 lambda2))))))
#s(approx (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2))))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))
#s(approx (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2))))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (neg.f64 lambda2)) lambda1) (.f64 #s(literal 1/6 binary64) (sin.f64 (neg.f64 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 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) (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) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 lambda2))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) (.f64 lambda1 (fma.f64 (cos.f64 phi2) (sin.f64 lambda2) (/.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) lambda1))))
#s(approx (+ (cos lambda2) (* lambda1 (sin lambda2))) (*.f64 lambda1 (sin.f64 lambda2)))
#s(approx (+ (cos lambda2) (* lambda1 (sin lambda2))) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) (.f64 lambda1 (sin.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) (.f64 lambda1 (+.f64 (sin.f64 (+.f64 lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 lambda2) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) lambda1))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (*.f64 (cos.f64 phi2) (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (*.f64 lambda1 (cos.f64 lambda2)))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (.f64 lambda1 (+.f64 (cos.f64 lambda2) (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 lambda2) lambda1)))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 lambda2 #s(literal 2 binary64))))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda2 #s(literal 2 binary64)) (/.f64 (.f64 lambda2 (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1 binary64))) lambda1)))))
#s(approx (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64)))))
#s(approx (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda2 #s(literal 2 binary64)) (/.f64 (.f64 lambda2 (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1 binary64))) lambda1))))
#s(approx (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda2)))
#s(approx (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1) (.f64 lambda1 (-.f64 (fma.f64 #s(literal -1/2 binary64) lambda2 (.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 lambda2 #s(literal 2 binary64)) lambda1))) (/.f64 #s(literal 1 binary64) lambda1))))
#s(approx (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda2)))
#s(approx (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) lambda2 (.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 lambda2 #s(literal 2 binary64)) lambda1)))))
#s(approx (+ (* -1/2 lambda1) (* 1/6 lambda2)) (*.f64 #s(literal -1/2 binary64) lambda1))
#s(approx (+ (* -1/2 lambda1) (* 1/6 lambda2)) (.f64 lambda1 (-.f64 (.f64 #s(literal 1/6 binary64) (/.f64 lambda2 lambda1)) #s(literal 1/2 binary64))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (- (* lambda1 (cos lambda2)) (sin lambda2)) (*.f64 lambda1 (cos.f64 lambda2)))
#s(approx (- (* lambda1 (cos lambda2)) (sin lambda2)) (.f64 lambda1 (+.f64 (cos.f64 lambda2) (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 lambda2) lambda1)))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (sin.f64 lambda2))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 lambda2) (pow.f64 lambda1 #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)))))
#s(approx (* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (sin.f64 lambda2))))
#s(approx (* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1))))
#s(approx (* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 lambda2) (pow.f64 lambda1 #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)))))
#s(approx (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2)))
#s(approx (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)))
#s(approx (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 lambda2) (pow.f64 lambda1 #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1))))
#s(approx (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2)))
#s(approx (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)) (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (cos.f64 lambda2))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (/.f64 (sin.f64 lambda2) lambda1))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (+.f64 (/.f64 (cos.f64 lambda2) (pow.f64 lambda1 #s(literal 2 binary64))) (/.f64 (sin.f64 lambda2) lambda1)))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) (*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (/.f64 (sin.f64 lambda2) lambda1))))
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (sin.f64 lambda2))))
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1))))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) (.f64 #s(literal 1/2 binary64) (.f64 lambda1 (sin.f64 lambda2))))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) (*.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1))))
#s(approx (* lambda1 (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) (.f64 #s(literal 1/2 binary64) (.f64 lambda1 (sin.f64 lambda2))))
#s(approx (* lambda1 (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) (*.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 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 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.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 (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (+ 1 (* -1/2 (* lambda1 lambda1))) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))
#s(approx (+ 1 (* -1/2 (* lambda1 lambda1))) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) (*.f64 #s(literal 1/24 binary64) (pow.f64 lambda1 #s(literal 4 binary64))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) (.f64 (pow.f64 lambda1 #s(literal 4 binary64)) (-.f64 #s(literal 1/24 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2))) (.f64 (pow.f64 lambda1 #s(literal 4 binary64)) (-.f64 (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))))
#s(approx (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2)) (*.f64 #s(literal 1/24 binary64) (pow.f64 lambda1 #s(literal 4 binary64))))
#s(approx (* (* lambda1 lambda1) (- (* 1/24 (* lambda1 lambda1)) 1/2)) (.f64 (pow.f64 lambda1 #s(literal 4 binary64)) (-.f64 #s(literal 1/24 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))))
#s(approx (- (* 1/24 (* lambda1 lambda1)) 1/2) (*.f64 #s(literal 1/24 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))
#s(approx (- (* 1/24 (* lambda1 lambda1)) 1/2) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 #s(literal 1/24 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) (*.f64 #s(literal -1/720 binary64) (pow.f64 lambda1 #s(literal 6 binary64))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) (.f64 (pow.f64 lambda1 #s(literal 6 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))) #s(literal 1/720 binary64))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) (.f64 (pow.f64 lambda1 #s(literal 6 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))) (+.f64 #s(literal 1/720 binary64) (/.f64 #s(literal 1/2 binary64) (pow.f64 lambda1 #s(literal 4 binary64)))))))
#s(approx (+ 1 (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2))) (*.f64 (pow.f64 lambda1 #s(literal 6 binary64)) (-.f64 (fma.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 6 binary64)))) (+.f64 #s(literal 1/720 binary64) (/.f64 #s(literal 1/2 binary64) (pow.f64 lambda1 #s(literal 4 binary64)))))))
#s(approx (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) (*.f64 #s(literal -1/720 binary64) (pow.f64 lambda1 #s(literal 6 binary64))))
#s(approx (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) (.f64 (pow.f64 lambda1 #s(literal 6 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))) #s(literal 1/720 binary64))))
#s(approx (* (* lambda1 lambda1) (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2)) (.f64 (pow.f64 lambda1 #s(literal 6 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))) (+.f64 #s(literal 1/720 binary64) (/.f64 #s(literal 1/2 binary64) (pow.f64 lambda1 #s(literal 4 binary64)))))))
#s(approx (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) (*.f64 #s(literal -1/720 binary64) (pow.f64 lambda1 #s(literal 4 binary64))))
#s(approx (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) (.f64 (pow.f64 lambda1 #s(literal 4 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))) #s(literal 1/720 binary64))))
#s(approx (- (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) 1/2) (.f64 (pow.f64 lambda1 #s(literal 4 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))) (+.f64 #s(literal 1/720 binary64) (/.f64 #s(literal 1/2 binary64) (pow.f64 lambda1 #s(literal 4 binary64)))))))
#s(approx (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) (*.f64 #s(literal -1/720 binary64) (pow.f64 lambda1 #s(literal 4 binary64))))
#s(approx (* (* lambda1 lambda1) (+ 1/24 (* -1/720 (* lambda1 lambda1)))) (.f64 (pow.f64 lambda1 #s(literal 4 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))) #s(literal 1/720 binary64))))
#s(approx (+ 1/24 (* -1/720 (* lambda1 lambda1))) (*.f64 #s(literal -1/720 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))
#s(approx (+ 1/24 (* -1/720 (* lambda1 lambda1))) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))) #s(literal 1/720 binary64))))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) lambda1)
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 lambda2 lambda1)))))
#s(approx (* lambda1 (- (pow lambda2 -1) (pow lambda1 -1))) (/.f64 lambda1 lambda2))
#s(approx (* lambda1 (- (pow lambda2 -1) (pow lambda1 -1))) (*.f64 lambda1 (-.f64 (/.f64 #s(literal 1 binary64) lambda2) (/.f64 #s(literal 1 binary64) lambda1))))
#s(approx (- (pow lambda2 -1) (pow lambda1 -1)) (/.f64 #s(literal 1 binary64) lambda2))
#s(approx (- (pow lambda2 -1) (pow lambda1 -1)) (-.f64 (/.f64 #s(literal 1 binary64) lambda2) (/.f64 #s(literal 1 binary64) lambda1)))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) lambda1)
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 lambda2 lambda1)))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) (.f64 lambda1 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))) (pow.f64 lambda1 #s(literal 2 binary64))))) (/.f64 lambda2 lambda1))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) (.f64 lambda1 (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))) (pow.f64 lambda1 #s(literal 3 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64))) (+.f64 (/.f64 lambda2 lambda1) (/.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64))))))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) (/.f64 lambda1 lambda2))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) (*.f64 lambda1 (-.f64 (/.f64 #s(literal 1 binary64) lambda2) (/.f64 #s(literal 1 binary64) lambda1))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) (.f64 lambda1 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda2)) (pow.f64 lambda1 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) lambda2)) (/.f64 #s(literal 1 binary64) lambda1))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) (.f64 lambda1 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) lambda2) (/.f64 (.f64 lambda2 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda2))) (pow.f64 lambda1 #s(literal 3 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 lambda2 (pow.f64 lambda1 #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 lambda2 (pow.f64 lambda1 #s(literal 2 binary64))))))))
#s(approx (- (pow (/ lambda1 lambda2) 3) 1) (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))))
#s(approx (- (pow (/ lambda1 lambda2) 3) 1) (*.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda2 #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 3 binary64))))))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) (/.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (pow.f64 lambda2 #s(literal 2 binary64))))))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 lambda1 lambda2)) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 lambda2 #s(literal 2 binary64)))))))
#s(approx (+ 1 (* (/ lambda1 lambda2) 1)) (/.f64 lambda1 lambda2))
#s(approx (+ 1 (* (/ lambda1 lambda2) 1)) (*.f64 lambda1 (+.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda2))))
#s(approx (* lambda1 (+ (/ 1 lambda1) (/ 1 lambda2))) (/.f64 lambda1 lambda2))
#s(approx (* lambda1 (+ (/ 1 lambda1) (/ 1 lambda2))) (*.f64 lambda1 (+.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda2))))
#s(approx (+ (/ 1 lambda1) (/ 1 lambda2)) (/.f64 #s(literal 1 binary64) lambda2))
#s(approx (+ (/ 1 lambda1) (/ 1 lambda2)) (+.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda2)))
#s(approx (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) lambda1)
#s(approx (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 lambda2 lambda1)))))
#s(approx (+ 1 (* -1 (/ lambda2 lambda1))) #s(literal 1 binary64))
#s(approx (+ 1 (* -1 (/ lambda2 lambda1))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 lambda2 lambda1))))
#s(approx (+ 1 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (+.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (+.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2))))
#s(approx (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (sin.f64 (-.f64 (+.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)))
#s(approx (- (+ lambda1 (* 1/2 (PI))) lambda2) lambda1)
#s(approx (- (+ lambda1 (* 1/2 (PI))) lambda2) (.f64 lambda1 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) lambda1))) (/.f64 lambda2 lambda1))))
#s(approx (+ lambda1 (* 1/2 (PI))) lambda1)
#s(approx (+ lambda1 (* 1/2 (PI))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) lambda1)))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (pow.f64 (cos.f64 (-.f64 lambda1 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 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (-.f64 lambda1 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 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (/.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))
#s(approx (pow (cos (- lambda1 lambda2)) 3) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))
#s(approx (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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 (.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 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) lambda1))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.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 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))
#s(approx (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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 2 binary64))))
#s(approx (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (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 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (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 phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (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 (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (.f64 (pow.f64 (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 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (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 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) lambda1))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))))
#s(approx (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))
#s(approx (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))))
#s(approx (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))
#s(approx (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))
#s(approx (pow (cos (- lambda1 lambda2)) 4) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))
#s(approx (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))
#s(approx (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))))
#s(approx (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))
#s(approx (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))
#s(approx (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))))
#s(approx (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))
#s(approx (pow (cos (- lambda1 lambda2)) 6) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))
#s(approx (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))
#s(approx (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)))
#s(approx (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (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 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (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 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (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 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/.f64 (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 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 (sin.f64 lambda2)))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1))))
#s(approx (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2)))) (*.f64 lambda1 lambda2))
#s(approx (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2)))) (*.f64 lambda1 (+.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 lambda2 #s(literal 2 binary64)) lambda1) (/.f64 #s(literal 1 binary64) lambda1)))))
#s(approx (* lambda2 (+ lambda1 (* -1/2 lambda2))) (*.f64 lambda1 lambda2))
#s(approx (* lambda2 (+ lambda1 (* -1/2 lambda2))) (.f64 lambda1 (+.f64 lambda2 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 lambda2 #s(literal 2 binary64)) lambda1)))))
#s(approx (+ lambda1 (* -1/2 lambda2)) lambda1)
#s(approx (+ lambda1 (* -1/2 lambda2)) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 lambda2 lambda1)))))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) (*.f64 lambda1 (sin.f64 lambda2)))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1))))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) (sin.f64 lambda2))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (cos.f64 lambda2))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (/.f64 (sin.f64 lambda2) lambda1))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (+.f64 (/.f64 (cos.f64 lambda2) (pow.f64 lambda1 #s(literal 2 binary64))) (/.f64 (sin.f64 lambda2) lambda1)))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (/.f64 (sin.f64 lambda2) lambda1)))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (+.f64 (/.f64 (cos.f64 lambda2) (pow.f64 lambda1 #s(literal 2 binary64))) (/.f64 (sin.f64 lambda2) lambda1))))
#s(approx (- (/ 1 (pow lambda1 2)) 1/2) #s(literal -1/2 binary64))
#s(approx (- (/ 1 (pow lambda1 2)) 1/2) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 lambda2) lambda1)))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) (/.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2)))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.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 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 (- lambda1 lambda2)) (cos phi2)) 2) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 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 lambda2)))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (pow.f64 (cos.f64 (-.f64 lambda1 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 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (-.f64 lambda1 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 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #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 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 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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)) (pow.f64 (cos.f64 (-.f64 lambda1 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 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (-.f64 lambda1 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 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 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))) (- (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 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (-.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 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (.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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))
#s(approx (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))
#s(approx (- (cos phi1) (* (cos lambda1) (cos phi2))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (cos lambda1) (cos phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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 (-.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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) (.f64 #s(literal 2 binary64) (log.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) (log.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) (pow.f64 lambda1 #s(literal 3 binary64)))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) (.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))))))
#s(approx (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) (pow.f64 lambda1 #s(literal 3 binary64)))
#s(approx (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) (.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (pow.f64 lambda1 #s(literal 2 binary64)))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 lambda2 lambda1) (/.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64)))))))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) (*.f64 lambda1 lambda2))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) (*.f64 lambda1 (+.f64 lambda2 (/.f64 (pow.f64 lambda2 #s(literal 2 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))))))) 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) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 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 (* (cos lambda1) (sin lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
#s(approx (+ 1 (* (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 (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) lambda1)
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 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 (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) (.f64 lambda1 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 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 2 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 2 binary64))) (pow.f64 lambda1 #s(literal 2 binary64))))) (.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 (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) (.f64 lambda1 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 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 2 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 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)))))) (pow.f64 lambda1 #s(literal 3 binary64))))) (fma.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) (fma.f64 #s(literal -1 binary64) (/.f64 (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 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64))) (/.f64 (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 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64))))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (pow.f64 lambda1 #s(literal 3 binary64)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (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)) (pow.f64 lambda1 #s(literal 3 binary64))))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) (pow.f64 lambda1 #s(literal 2 binary64)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.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 (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (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 2 binary64)) (pow.f64 lambda1 #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 (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 lambda1 #s(literal 2 binary64)))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.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 (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) lambda1)
#s(approx (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) lambda1))))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (pow.f64 lambda1 #s(literal 2 binary64)))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (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 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64)))))))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) lambda1)
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.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 (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) lambda1)
#s(approx (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.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 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) #s(literal 1 binary64))
#s(approx (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (+.f64 #s(literal 1 binary64) (.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 (+ 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) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.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))) lambda1) 1) lambda1) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.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))) lambda1) 1) (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) lambda1)))
#s(approx (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1) (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) lambda1)))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.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 phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))
#s(approx (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.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))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))
#s(approx (* (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) lambda1) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))) lambda1)))
#s(approx (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))) lambda1))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos.f64 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) lambda2 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))) lambda1))) lambda1)) #s(literal 1 binary64)))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) lambda2 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))) lambda1) (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))) lambda1))) lambda1)) #s(literal 1 binary64)))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) (+.f64 (cos.f64 phi1) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (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) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 phi1) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))
#s(approx (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (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 (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (.f64 (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (neg.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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (neg.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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (neg.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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (neg.f64 lambda2)) lambda1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 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 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))
#s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 (neg.f64 lambda2)) lambda1))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (neg.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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (+.f64 (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (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 (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (.f64 (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda2) (/.f64 (sin.f64 lambda2) lambda1)))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2) lambda1)) #s(literal 1 binary64)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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) (sin.f64 (neg.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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64))))
#s(approx (pow (cos (- lambda1 lambda2)) 2) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 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)))))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (sin.f64 (neg.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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (neg.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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (.f64 (sin.f64 (neg.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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sin.f64 (neg.f64 lambda2)) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 (neg.f64 lambda2)) lambda1))) lambda1) (*.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2))))))
#s(approx (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 lambda2)) (/.f64 (sin.f64 (neg.f64 lambda2)) lambda1)))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 (neg.f64 lambda2)) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (neg.f64 lambda2)) lambda1))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (neg.f64 lambda2)) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)))) lambda1) (.f64 #s(literal -1/6 binary64) (sin.f64 (neg.f64 lambda2)))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sin.f64 (neg.f64 lambda2)) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 (neg.f64 lambda2)) lambda1))) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)))) lambda1) (*.f64 #s(literal -1/6 binary64) (sin.f64 (neg.f64 lambda2)))))))
#s(approx (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 (neg.f64 lambda2)) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (neg.f64 lambda2)) lambda1))))))
#s(approx (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (neg.f64 lambda2)) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)))) lambda1) (.f64 #s(literal -1/6 binary64) (sin.f64 (neg.f64 lambda2)))))))
#s(approx (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 lambda2)) (/.f64 (sin.f64 (neg.f64 lambda2)) lambda1)) lambda1) (.f64 #s(literal 1/6 binary64) (sin.f64 (neg.f64 lambda2))))))
#s(approx (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2))))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1/6 binary64) (sin.f64 (neg.f64 lambda2)) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (neg.f64 lambda2)) lambda1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 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) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.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 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.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 (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) lambda1))))))
#s(approx (+ (cos lambda2) (* lambda1 (sin lambda2))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (sin.f64 lambda2) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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) (sin.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (sin.f64 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda2) (/.f64 (sin.f64 lambda2) lambda1)))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1 binary64)))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 lambda2 (-.f64 (.f64 #s(literal 1/6 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1 binary64))) lambda1) (*.f64 #s(literal 1/2 binary64) (pow.f64 lambda2 #s(literal 2 binary64)))) #s(literal 1 binary64)))))
#s(approx (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 lambda2 (-.f64 (.f64 #s(literal 1/6 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1 binary64))) lambda1) (*.f64 #s(literal 1/2 binary64) (pow.f64 lambda2 #s(literal 2 binary64)))))))
#s(approx (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1) (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/6 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1 binary64)) lambda1) (.f64 #s(literal 1/2 binary64) lambda2)))))
#s(approx (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 lambda2 #s(literal 2 binary64)) lambda1) (*.f64 #s(literal 1/2 binary64) lambda2)))))
#s(approx (+ (* -1/2 lambda1) (* 1/6 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/6 binary64) (/.f64 lambda2 lambda1))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))
#s(approx (- (* lambda1 (cos lambda2)) (sin lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda2) (/.f64 (sin.f64 lambda2) lambda1)))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda2) (/.f64 (sin.f64 lambda2) lambda1)) lambda1) (.f64 #s(literal 1/2 binary64) (sin.f64 lambda2)))))
#s(approx (* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda2) (/.f64 (sin.f64 lambda2) lambda1)) lambda1) (.f64 #s(literal 1/2 binary64) (sin.f64 lambda2)))))
#s(approx (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda2) (/.f64 (sin.f64 lambda2) lambda1)) lambda1) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 lambda2) lambda1) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2))))))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda2))))))
#s(approx (* lambda1 (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 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) (sin.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.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(literal 1 binary64)))))
#s(approx (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.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 lambda2) 1) lambda2) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))
#s(approx (* lambda1 (- (pow lambda2 -1) (pow lambda1 -1))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda2)))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) lambda2 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))) lambda1))) lambda1)) #s(literal 1 binary64)))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) lambda2 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))) lambda1) (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))) lambda1))) lambda1)) #s(literal 1 binary64)))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda2)))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda2)) lambda1)) #s(literal 1 binary64)) lambda1)) (/.f64 #s(literal 1 binary64) lambda2)))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 lambda2 (fma.f64 #s(literal -1 binary64) lambda2 (.f64 #s(literal -1 binary64) (/.f64 (.f64 lambda2 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda2))) lambda1)))) lambda1)) #s(literal 1 binary64)) lambda1)) (/.f64 #s(literal 1 binary64) lambda2)))))
#s(approx (- (pow (/ lambda1 lambda2) 3) 1) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)))))))
#s(approx (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))
#s(approx (+ 1 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (+.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))
#s(approx (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))
#s(approx (- (+ lambda1 (* 1/2 (PI))) lambda2) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2) lambda1)) #s(literal 1 binary64)))))
#s(approx (+ lambda1 (* 1/2 (PI))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) (+.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (/.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 3 binary64)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (/ (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64))) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) #s(literal 3 binary64))))
#s(approx (pow (cos (- lambda1 lambda2)) 3) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) #s(literal 3 binary64)))
#s(approx (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64))) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))) #s(literal 2 binary64)))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))) #s(literal 2 binary64)))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))) #s(literal 2 binary64))))
#s(approx (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))) #s(literal 2 binary64))))
#s(approx (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))))
#s(approx (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))))))
#s(approx (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (.f64 (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))) #s(literal 2 binary64)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (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) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 6 binary64)))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 6 binary64)))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 6 binary64)))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 6 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))))))
#s(approx (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))) #s(literal 2 binary64)))))))
#s(approx (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))) #s(literal 2 binary64))))))
#s(approx (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))))
#s(approx (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) #s(literal 4 binary64))))))
#s(approx (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) #s(literal 4 binary64)))))
#s(approx (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 4 binary64))))
#s(approx (pow (cos (- lambda1 lambda2)) 4) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) #s(literal 4 binary64)))
#s(approx (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))) #s(literal 2 binary64)))))
#s(approx (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 6 binary64))))))
#s(approx (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))
#s(approx (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)))))
#s(approx (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64))))
#s(approx (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 6 binary64)))))
#s(approx (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 6 binary64))))
#s(approx (pow (cos (- lambda1 lambda2)) 6) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) #s(literal 6 binary64)))
#s(approx (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))) #s(literal 2 binary64))))
#s(approx (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) #s(literal 4 binary64))))) #s(literal 2 binary64)))
#s(approx (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 6 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (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) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))) (/.f64 (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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.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) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))) (/.f64 (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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))) (/.f64 (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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/.f64 (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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 3 binary64))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))
#s(approx (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))))))
#s(approx (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2)))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) lambda2 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 lambda2 #s(literal 2 binary64)))) lambda1))))))
#s(approx (* lambda2 (+ lambda1 (* -1/2 lambda2))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) lambda2 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 lambda2 #s(literal 2 binary64)) lambda1))))))
#s(approx (+ lambda1 (* -1/2 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 lambda2 lambda1)) #s(literal 1 binary64)))))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)) lambda1)))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (/.f64 (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.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 (neg.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 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) #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))) (- (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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))) #s(literal 2 binary64)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (/.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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (/.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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))))
#s(approx (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) (.f64 #s(literal 2 binary64) (log.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) (log.f64 (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (-.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) #s(literal 1 binary64)))))
#s(approx (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (-.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) #s(literal 1 binary64)))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) lambda2 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 lambda2 #s(literal 2 binary64)) lambda1))) lambda1)))))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) lambda2 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 lambda2 #s(literal 2 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 (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 (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) #s(literal 2 binary64)) lambda1) (/.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) #s(literal 2 binary64)) lambda1)) (.f64 #s(literal -1 binary64) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) #s(literal 2 binary64))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))) lambda1)) (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) #s(literal 2 binary64)))) lambda1)) (.f64 #s(literal -1 binary64) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))) #s(literal 1 binary64)))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) #s(literal 3 binary64)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) lambda1)))))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) #s(literal 2 binary64)) lambda1)) (.f64 #s(literal -1 binary64) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))) lambda1)))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) #s(literal 2 binary64)))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.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))) lambda1) (.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))))))
#s(approx (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (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) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) #s(literal 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64)))))))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) lambda1) #s(literal 1 binary64)))))
#s(approx (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) lambda1) #s(literal 1 binary64)))))
#s(approx (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))) lambda1))))
#s(approx (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))) lambda1)))
#s(approx (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))) lambda1))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))
#s(approx (* (cos phi2) (sin (- lambda1 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 lambda2))) (fma.f64 lambda2 (fma.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 lambda2))) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (.f64 lambda2 (fma.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 lambda2)) (sin.f64 lambda1))
#s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 lambda1) (.f64 #s(literal -1 binary64) (.f64 lambda2 (cos.f64 lambda1)))))
#s(approx (sin (- lambda1 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 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 lambda2 lambda2)
#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 (fma.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 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (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 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 lambda2 (fma.f64 lambda2 (fma.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 (fma.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 (* (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 (fma.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 (fma.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 (+ (* (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 (fma.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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 lambda2 (fma.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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos.f64 lambda1))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (+ (cos phi1) (cos (- lambda1 lambda2))) (+.f64 (cos.f64 lambda1) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) (+.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi1) (*.f64 lambda2 (sin.f64 lambda1)))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) (+.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi1) (.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 phi1) (cos (- lambda1 lambda2))) (+.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi1) (.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 (neg lambda2)) #s(literal 1 binary64))
#s(approx (cos (neg lambda2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda2 #s(literal 2 binary64)))))
#s(approx (cos (neg lambda2)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos (neg lambda2)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 lambda2 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (neg lambda2) (*.f64 #s(literal -1 binary64) lambda2))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (.f64 (sin.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (sin.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (.f64 (sin.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))) (.f64 (sin.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (fma.f64 lambda2 (.f64 (sin.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (sin.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (.f64 (sin.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))) (.f64 (sin.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin 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))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 lambda2 (fma.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))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) (fma.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin 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))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.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))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (.f64 (sin.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (fma.f64 #s(literal -1 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (sin.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (sin.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))) (.f64 (sin.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal 1/6 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))))) (.f64 (sin.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (sin (neg lambda2)) (*.f64 #s(literal -1 binary64) lambda2))
#s(approx (sin (neg lambda2)) (.f64 lambda2 (-.f64 (.f64 #s(literal 1/6 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(approx (sin (neg lambda2)) (.f64 lambda2 (-.f64 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/120 binary64) (pow.f64 lambda2 #s(literal 2 binary64))))) #s(literal 1 binary64))))
#s(approx (sin (neg lambda2)) (.f64 lambda2 (-.f64 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (+.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/5040 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/120 binary64))))) #s(literal 1 binary64))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))) (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) lambda1)
#s(approx (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))
#s(approx (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) (+.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda2)) #s(literal 1 binary64)))))
#s(approx (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) (+.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) lambda1 (*.f64 #s(literal 1/6 binary64) lambda2))) #s(literal 1 binary64)))))
#s(approx (* lambda1 (cos (neg lambda2))) lambda1)
#s(approx (* lambda1 (cos (neg lambda2))) (+.f64 lambda1 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64))))))
#s(approx (* lambda1 (cos (neg lambda2))) (+.f64 lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 #s(literal 1/24 binary64) (*.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64))))))))
#s(approx (* lambda1 (cos (neg lambda2))) (+.f64 lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) lambda1)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 lambda2 (fma.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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (fma.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.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 (- (/ lambda1 lambda2) 1) (/.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)) lambda2))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (.f64 (sin.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (sin.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (.f64 (sin.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (sin.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (+.f64 #s(literal 1 binary64) (fma.f64 lambda2 (.f64 (sin.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (+.f64 #s(literal 1 binary64) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (sin.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (+.f64 #s(literal 1 binary64) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (.f64 (sin.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (sin.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (fma.f64 lambda2 (.f64 (sin.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (sin.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (.f64 (sin.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (sin.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (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 (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 lambda2 (fma.f64 lambda2 (fma.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 (+ 1 (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1)))
#s(approx (+ 1 (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (+.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 (+ 1 (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (+.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 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (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 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 lambda2 (fma.f64 lambda2 (fma.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 (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) #s(literal 1 binary64))
#s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2)))
#s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (.f64 lambda2 (+.f64 lambda1 (.f64 #s(literal -1/2 binary64) lambda2)))))
#s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (.f64 lambda2 (+.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))
#s(approx (* -1 (* lambda1 (sin (neg lambda2)))) (*.f64 lambda1 lambda2))
#s(approx (* -1 (* lambda1 (sin (neg lambda2)))) (.f64 lambda2 (+.f64 lambda1 (.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64)))))))
#s(approx (* -1 (* lambda1 (sin (neg lambda2)))) (.f64 lambda2 (+.f64 lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) lambda1 (.f64 #s(literal 1/120 binary64) (.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64)))))))))
#s(approx (* -1 (* lambda1 (sin (neg lambda2)))) (.f64 lambda2 (+.f64 lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64))) (*.f64 #s(literal 1/120 binary64) lambda1))))))))
#s(approx (* lambda1 (sin (neg lambda2))) (.f64 #s(literal -1 binary64) (.f64 lambda1 lambda2)))
#s(approx (* lambda1 (sin (neg lambda2))) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) lambda1 (.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64)))))))
#s(approx (* lambda1 (sin (neg lambda2))) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/120 binary64) (.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) lambda1))))))
#s(approx (* lambda1 (sin (neg lambda2))) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/120 binary64) lambda1 (.f64 #s(literal 1/5040 binary64) (*.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64)))))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (.f64 (sin.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (sin.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (.f64 (sin.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (sin.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))) (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (+.f64 (sin.f64 lambda1) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 lambda1)))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (+.f64 (sin.f64 lambda1) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 lambda1)) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda1))))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (+.f64 (sin.f64 lambda1) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 lambda1)) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda1)) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 lambda1)))))))))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (+.f64 (sin.f64 lambda1) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 lambda1)) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda1)) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (fma.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 lambda1)) (.f64 lambda2 (fma.f64 #s(literal -1/12 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda1)) (.f64 #s(literal 1/6 binary64) (cos.f64 lambda1)))))))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (.f64 (sin.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (fma.f64 #s(literal -1 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (sin.f64 lambda1) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (sin.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (sin.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal 1/6 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (.f64 (sin.f64 lambda1) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (.f64 #s(literal -1 binary64) (.f64 lambda2 (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/120 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal 1/6 binary64) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/120 binary64) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal 1/5040 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) lambda1)
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (+.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda2)) #s(literal 1 binary64)))))
#s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (+.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) lambda1 (*.f64 #s(literal 1/6 binary64) lambda2))) #s(literal 1 binary64)))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 phi2) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 phi2))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 phi2) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 phi2))))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 phi2) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 phi2)) (.f64 #s(literal 1/24 binary64) (cos.f64 phi2)))))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (.f64 lambda2 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal 1/6 binary64) (.f64 lambda2 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (sin.f64 (+.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (+.f64 (sin.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1 binary64) (.f64 lambda2 (cos.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (+.f64 (sin.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (sin.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (+.f64 (sin.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal 1/6 binary64) (.f64 lambda2 (cos.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) (+.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) (+.f64 lambda1 (fma.f64 #s(literal -1 binary64) lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.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 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.f64 lambda2 (-.f64 (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 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi2))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 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 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.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 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.f64 lambda2 (-.f64 (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 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.f64 lambda2 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.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 (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 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.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 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi2))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (/.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 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi2))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 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 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.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 (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 (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 lambda2 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))) (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (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) (cos.f64 lambda1)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))) (.f64 lambda2 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (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) (cos.f64 lambda1))) (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (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) (cos.f64 lambda1)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (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) (cos.f64 lambda1)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (-.f64 (fma.f64 #s(literal -2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (sin.f64 lambda1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (-.f64 (fma.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (.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))))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (-.f64 (fma.f64 lambda2 (-.f64 (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (.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)))))) (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) (sin.f64 lambda1)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))))
#s(approx (pow (cos (- lambda1 lambda2)) 2) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))
#s(approx (pow (cos (- lambda1 lambda2)) 2) (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 (pow (cos (- lambda1 lambda2)) 2) (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 (pow (cos (- lambda1 lambda2)) 2) (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 phi1) (cos (- lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 #s(literal -1 binary64) (.f64 lambda2 (sin.f64 lambda1)))) (cos.f64 lambda1)))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda1) (.f64 #s(literal 1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)))))) (cos.f64 lambda1)))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda1) (.f64 lambda2 (-.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda2 (sin.f64 lambda1))) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))))))) (cos.f64 lambda1)))
#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 (cos lambda2) #s(literal 1 binary64))
#s(approx (cos lambda2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda2 #s(literal 2 binary64)))))
#s(approx (cos lambda2) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos lambda2) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 lambda2 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#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 (pow.f64 lambda2 #s(literal 2 binary64)) (sin.f64 lambda1))))))
#s(approx (* (sin lambda1) (sin lambda2)) (.f64 lambda2 (+.f64 (sin.f64 lambda1) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 lambda1) (.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (sin.f64 lambda1))))))))
#s(approx (* (sin lambda1) (sin lambda2)) (.f64 lambda2 (+.f64 (sin.f64 lambda1) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 lambda1) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (sin.f64 lambda1)) (*.f64 #s(literal 1/120 binary64) (sin.f64 lambda1)))))))))
#s(approx (sin lambda2) lambda2)
#s(approx (sin lambda2) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 lambda2 #s(literal 2 binary64))))))
#s(approx (sin lambda2) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin lambda2) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (pow.f64 lambda2 #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))) (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 lambda2 (fma.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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))))) (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ (cos lambda2) (cos phi1)) (+.f64 #s(literal 1 binary64) (cos.f64 phi1)))
#s(approx (+ (cos lambda2) (cos phi1)) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda2 #s(literal 2 binary64))))))
#s(approx (+ (cos lambda2) (cos phi1)) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 phi1) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))
#s(approx (+ (cos lambda2) (cos phi1)) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 phi1) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 lambda2 #s(literal 2 binary64))))) #s(literal 1/2 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) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(approx (neg (sin lambda2)) (.f64 lambda2 (-.f64 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/120 binary64) (pow.f64 lambda2 #s(literal 2 binary64))))) #s(literal 1 binary64))))
#s(approx (neg (sin lambda2)) (.f64 lambda2 (-.f64 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (+.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/5040 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/120 binary64))))) #s(literal 1 binary64))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 lambda1 lambda2))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (.f64 lambda2 (+.f64 lambda1 (.f64 lambda2 (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (.f64 lambda2 (+.f64 lambda1 (.f64 lambda2 (-.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 lambda1 lambda2) (.f64 #s(literal 1/4 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))) #s(literal 1/2 binary64))))))))
#s(approx (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))
#s(approx (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 lambda1 lambda2)))
#s(approx (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (.f64 lambda2 (+.f64 lambda1 (.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) lambda2))))))
#s(approx (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (.f64 lambda2 (+.f64 lambda1 (.f64 lambda2 (fma.f64 #s(literal -1/6 binary64) (.f64 lambda1 lambda2) (.f64 #s(literal 1/4 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))))))
#s(approx (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))) (*.f64 #s(literal -1/2 binary64) lambda1))
#s(approx (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))) (+.f64 lambda2 (*.f64 #s(literal -1/2 binary64) lambda1)))
#s(approx (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda2))))))
#s(approx (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 lambda2 (fma.f64 #s(literal -1/6 binary64) lambda2 (*.f64 #s(literal 1/4 binary64) lambda1)))))))
#s(approx (* -1/2 (* lambda1 (cos (neg lambda2)))) (*.f64 #s(literal -1/2 binary64) lambda1))
#s(approx (* -1/2 (* lambda1 (cos (neg lambda2)))) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 #s(literal 1/4 binary64) (.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64))))))
#s(approx (* -1/2 (* lambda1 (cos (neg lambda2)))) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) (.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) lambda1)))))
#s(approx (* -1/2 (* lambda1 (cos (neg lambda2)))) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) lambda1 (.f64 #s(literal 1/1440 binary64) (.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64))))))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (.f64 lambda1 (.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (.f64 lambda2 (fma.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))) (.f64 lambda2 (-.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (.f64 lambda2 (fma.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))) (.f64 lambda2 (-.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 #s(literal 1/36 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/6 binary64))))) #s(literal 1/2 binary64))))))))
#s(approx (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))
#s(approx (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (.f64 lambda1 (.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))))))
#s(approx (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (.f64 lambda2 (fma.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) lambda2) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))))))
#s(approx (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (.f64 lambda2 (fma.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))) (.f64 lambda2 (fma.f64 #s(literal 1/4 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 #s(literal 1/36 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))))
#s(approx (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))) (*.f64 #s(literal -1/2 binary64) lambda1))
#s(approx (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))))
#s(approx (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 lambda2 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda2)))))))
#s(approx (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 lambda2 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (.f64 lambda2 (fma.f64 #s(literal 1/4 binary64) lambda1 (.f64 lambda2 (-.f64 (.f64 #s(literal 1/36 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))))
#s(approx (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (*.f64 #s(literal -1/2 binary64) lambda1))
#s(approx (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 #s(literal -1/6 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) lambda2))))
#s(approx (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 lambda2 (fma.f64 #s(literal -1/6 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda2))))))
#s(approx (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 lambda2 (fma.f64 #s(literal -1/6 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (.f64 lambda2 (fma.f64 #s(literal 1/36 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) lambda2) (.f64 #s(literal 1/4 binary64) lambda1)))))))
#s(approx (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2))))) #s(literal -1/2 binary64))
#s(approx (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2))))) (-.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
#s(approx (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2))))) (-.f64 (.f64 lambda2 (fma.f64 #s(literal -1/6 binary64) lambda1 (.f64 #s(literal 1/4 binary64) lambda2))) #s(literal 1/2 binary64)))
#s(approx (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2))))) (-.f64 (.f64 lambda2 (fma.f64 #s(literal -1/6 binary64) lambda1 (.f64 lambda2 (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/36 binary64) (.f64 lambda1 lambda2)))))) #s(literal 1/2 binary64)))
#s(approx (* 1/6 (* lambda1 (sin (neg lambda2)))) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 lambda2)))
#s(approx (* 1/6 (* lambda1 (sin (neg lambda2)))) (.f64 lambda2 (fma.f64 #s(literal -1/6 binary64) lambda1 (.f64 #s(literal 1/36 binary64) (*.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64)))))))
#s(approx (* 1/6 (* lambda1 (sin (neg lambda2)))) (.f64 lambda2 (fma.f64 #s(literal -1/6 binary64) lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64))) (.f64 #s(literal 1/36 binary64) lambda1))))))
#s(approx (* 1/6 (* lambda1 (sin (neg lambda2)))) (.f64 lambda2 (fma.f64 #s(literal -1/6 binary64) lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/36 binary64) lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) lambda1 (.f64 #s(literal 1/30240 binary64) (*.f64 lambda1 (pow.f64 lambda2 #s(literal 2 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 (fma.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 (fma.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 (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) (cos.f64 phi2))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) (+.f64 (cos.f64 phi2) (.f64 lambda1 (.f64 lambda2 (cos.f64 phi2)))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) (+.f64 (cos.f64 phi2) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda2 (cos.f64 phi2)) (*.f64 lambda1 (cos.f64 phi2))))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) (+.f64 (cos.f64 phi2) (.f64 lambda2 (fma.f64 lambda1 (cos.f64 phi2) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (*.f64 lambda2 (cos.f64 phi2))))))))))
#s(approx (+ (cos lambda2) (* lambda1 (sin lambda2))) #s(literal 1 binary64))
#s(approx (+ (cos lambda2) (* lambda1 (sin lambda2))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2)))
#s(approx (+ (cos lambda2) (* lambda1 (sin lambda2))) (+.f64 #s(literal 1 binary64) (.f64 lambda2 (+.f64 lambda1 (.f64 #s(literal -1/2 binary64) lambda2)))))
#s(approx (+ (cos lambda2) (* lambda1 (sin lambda2))) (+.f64 #s(literal 1 binary64) (.f64 lambda2 (+.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))
#s(approx (* lambda1 (sin lambda2)) (*.f64 lambda1 lambda2))
#s(approx (* lambda1 (sin lambda2)) (.f64 lambda2 (+.f64 lambda1 (.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64)))))))
#s(approx (* lambda1 (sin lambda2)) (.f64 lambda2 (+.f64 lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) lambda1 (.f64 #s(literal 1/120 binary64) (.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64)))))))))
#s(approx (* lambda1 (sin lambda2)) (.f64 lambda2 (+.f64 lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64))) (*.f64 #s(literal 1/120 binary64) lambda1))))))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) (.f64 lambda1 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) (fma.f64 lambda1 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 lambda2 (-.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 1 binary64)))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) (fma.f64 lambda1 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 lambda2 (-.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 lambda2 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 1 binary64)))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) (fma.f64 lambda1 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 lambda2 (-.f64 (fma.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda1 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 lambda2 (+.f64 #s(literal 1/6 binary64) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) #s(literal 1 binary64)))))
#s(approx (sin (+ lambda2 (/ (PI) 2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (sin (+ lambda2 (/ (PI) 2))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (sin (+ lambda2 (/ (PI) 2))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 lambda2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (sin (+ lambda2 (/ (PI) 2))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 lambda2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (+ lambda2 (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (+ lambda2 (/ (PI) 2)) (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (fma.f64 lambda2 (fma.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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (.f64 lambda2 (fma.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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (sin.f64 lambda1))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (sin.f64 lambda1) (.f64 #s(literal -1 binary64) (.f64 lambda2 (cos.f64 lambda1)))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 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 (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) lambda1)
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (+.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda2)) #s(literal 1 binary64)))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (+.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) lambda1 (*.f64 #s(literal 1/6 binary64) lambda2))) #s(literal 1 binary64)))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) lambda1)
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) (+.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda2)) #s(literal 1 binary64)))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) (+.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) lambda1 (*.f64 #s(literal 1/6 binary64) lambda2))) #s(literal 1 binary64)))))
#s(approx (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)) (*.f64 #s(literal -1 binary64) lambda2))
#s(approx (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)) (.f64 lambda2 (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda2)) #s(literal 1 binary64))))
#s(approx (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)) (.f64 lambda2 (-.f64 (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) lambda1 (*.f64 #s(literal 1/6 binary64) lambda2))) #s(literal 1 binary64))))
#s(approx (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1) #s(literal -1 binary64))
#s(approx (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda2)) #s(literal 1 binary64)))
#s(approx (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1) (-.f64 (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 #s(literal 1/6 binary64) lambda2))) #s(literal 1 binary64)))
#s(approx (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 #s(literal 1/6 binary64) lambda2))))
#s(approx (* 1/6 lambda2) (*.f64 #s(literal 1/6 binary64) lambda2))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (fma.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (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)) 1) (+.f64 #s(literal 1 binary64) (fma.f64 lambda2 (fma.f64 lambda2 (fma.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 (- (* lambda1 (cos lambda2)) (sin lambda2)) lambda1)
#s(approx (- (* lambda1 (cos lambda2)) (sin lambda2)) (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))
#s(approx (- (* lambda1 (cos lambda2)) (sin lambda2)) (+.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda2)) #s(literal 1 binary64)))))
#s(approx (- (* lambda1 (cos lambda2)) (sin lambda2)) (+.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) lambda1 (*.f64 #s(literal 1/6 binary64) lambda2))) #s(literal 1 binary64)))))
#s(approx (* lambda1 (cos lambda2)) lambda1)
#s(approx (* lambda1 (cos lambda2)) (+.f64 lambda1 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64))))))
#s(approx (* lambda1 (cos lambda2)) (+.f64 lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 #s(literal 1/24 binary64) (*.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64))))))))
#s(approx (* lambda1 (cos lambda2)) (+.f64 lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) lambda1)))))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) lambda1)
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (+.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1 binary64)))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (+.f64 lambda1 (.f64 lambda2 (-.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda2) (*.f64 #s(literal 1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))) #s(literal 1 binary64)))))
#s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (+.f64 lambda1 (.f64 lambda2 (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 lambda2 (+.f64 #s(literal 1/6 binary64) (.f64 #s(literal -1/12 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))
#s(approx (* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))) lambda1)
#s(approx (* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))) (+.f64 lambda1 (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (.f64 lambda2 (-.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))))))
#s(approx (* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))) (+.f64 lambda1 (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda2) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))))))
#s(approx (* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))) (+.f64 lambda1 (.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (.f64 lambda2 (-.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))) #s(literal 1/12 binary64))))) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))))))
#s(approx (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) (/.f64 #s(literal 1 binary64) lambda1))
#s(approx (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) (fma.f64 lambda2 (-.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) lambda1)))
#s(approx (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) (fma.f64 lambda2 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) lambda1)))
#s(approx (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) (fma.f64 lambda2 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 lambda2 (-.f64 (.f64 lambda2 (-.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))) #s(literal 1/12 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) lambda1))))) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) lambda1)))
#s(approx (/ (sin lambda2) (pow lambda1 2)) (/.f64 lambda2 (pow.f64 lambda1 #s(literal 2 binary64))))
#s(approx (/ (sin lambda2) (pow lambda1 2)) (*.f64 lambda2 (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))))
#s(approx (/ (sin lambda2) (pow lambda1 2)) (.f64 lambda2 (fma.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/120 binary64) (/.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))))
#s(approx (/ (sin lambda2) (pow lambda1 2)) (.f64 lambda2 (fma.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (/.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64))) (.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))) (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))))
#s(approx (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))
#s(approx (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)) (fma.f64 #s(literal 1/2 binary64) lambda2 (/.f64 #s(literal 1 binary64) lambda1)))
#s(approx (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)) (fma.f64 lambda2 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) lambda1)))
#s(approx (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)) (fma.f64 lambda2 (+.f64 #s(literal 1/2 binary64) (.f64 lambda2 (-.f64 (.f64 #s(literal -1/12 binary64) lambda2) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) lambda1))))) (/.f64 #s(literal 1 binary64) lambda1)))
#s(approx (/ (cos lambda2) lambda1) (/.f64 #s(literal 1 binary64) lambda1))
#s(approx (/ (cos lambda2) lambda1) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 lambda2 #s(literal 2 binary64)) lambda1) (/.f64 #s(literal 1 binary64) lambda1)))
#s(approx (/ (cos lambda2) lambda1) (fma.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 lambda2 #s(literal 2 binary64)) lambda1)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) lambda1))) (/.f64 #s(literal 1 binary64) lambda1)))
#s(approx (/ (cos lambda2) lambda1) (fma.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (/.f64 (pow.f64 lambda2 #s(literal 2 binary64)) lambda1) (.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) lambda1)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) lambda1))) (/.f64 #s(literal 1 binary64) lambda1)))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 lambda1 lambda2))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (.f64 lambda2 (+.f64 lambda1 (.f64 lambda2 (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
#s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (.f64 lambda2 (+.f64 lambda1 (.f64 lambda2 (-.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 lambda1 lambda2) (.f64 #s(literal 1/4 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))) #s(literal 1/2 binary64))))))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) (*.f64 #s(literal -1/2 binary64) lambda1))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) (+.f64 lambda2 (*.f64 #s(literal -1/2 binary64) lambda1)))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda2))))))
#s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 lambda2 (fma.f64 #s(literal -1/6 binary64) lambda2 (*.f64 #s(literal 1/4 binary64) lambda1)))))))
#s(approx (* (* (cos lambda2) lambda1) -1/2) (*.f64 #s(literal -1/2 binary64) lambda1))
#s(approx (* (* (cos lambda2) lambda1) -1/2) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 #s(literal 1/4 binary64) (.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64))))))
#s(approx (* (* (cos lambda2) lambda1) -1/2) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) (.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) lambda1)))))
#s(approx (* (* (cos lambda2) lambda1) -1/2) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) lambda1 (.f64 #s(literal 1/1440 binary64) (.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64))))))))))
#s(approx (* (cos lambda2) lambda1) lambda1)
#s(approx (* (cos lambda2) lambda1) (+.f64 lambda1 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64))))))
#s(approx (* (cos lambda2) lambda1) (+.f64 lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 #s(literal 1/24 binary64) (*.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64))))))))
#s(approx (* (cos lambda2) lambda1) (+.f64 lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) lambda1)))))))
#s(approx (+ 1 (* (cos lambda2) (cos phi2))) (+.f64 #s(literal 1 binary64) (cos.f64 phi2)))
#s(approx (+ 1 (* (cos lambda2) (cos phi2))) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 phi2) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 phi2))))))
#s(approx (+ 1 (* (cos lambda2) (cos phi2))) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 phi2) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 phi2))))))))
#s(approx (+ 1 (* (cos lambda2) (cos phi2))) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 phi2) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 phi2)) (.f64 #s(literal 1/24 binary64) (cos.f64 phi2)))))))))
#s(approx (* (cos lambda2) (cos phi2)) (cos.f64 phi2))
#s(approx (* (cos lambda2) (cos phi2)) (+.f64 (cos.f64 phi2) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 phi2)))))
#s(approx (* (cos lambda2) (cos phi2)) (+.f64 (cos.f64 phi2) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 phi2)))))))
#s(approx (* (cos lambda2) (cos phi2)) (+.f64 (cos.f64 phi2) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 phi2)) (.f64 #s(literal 1/24 binary64) (cos.f64 phi2))))))))
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) lambda1)
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) lambda2))))
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) (+.f64 lambda1 (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda2) (*.f64 #s(literal 1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))))
#s(approx (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2)))))) (+.f64 lambda1 (.f64 lambda2 (fma.f64 #s(literal 1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 #s(literal -1/12 binary64) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) lambda2))))))))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) #s(literal 1 binary64))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (.f64 lambda1 lambda2))))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) (+.f64 #s(literal 1 binary64) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) lambda2 (.f64 #s(literal 1/2 binary64) lambda1)))))
#s(approx (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))) (+.f64 #s(literal 1 binary64) (.f64 lambda2 (fma.f64 #s(literal 1/2 binary64) lambda1 (.f64 lambda2 (-.f64 (.f64 #s(literal -1/12 binary64) (.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))
#s(approx (* lambda1 (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) #s(literal 1 binary64))
#s(approx (* lambda1 (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (.f64 lambda1 lambda2))))
#s(approx (* lambda1 (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) (+.f64 #s(literal 1 binary64) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) lambda2 (.f64 #s(literal 1/2 binary64) lambda1)))))
#s(approx (* lambda1 (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) (+.f64 #s(literal 1 binary64) (.f64 lambda2 (fma.f64 #s(literal 1/2 binary64) lambda1 (.f64 lambda2 (-.f64 (.f64 #s(literal -1/12 binary64) (.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))
#s(approx (* -1/2 (* lambda1 (neg (sin lambda2)))) (.f64 #s(literal 1/2 binary64) (.f64 lambda1 lambda2)))
#s(approx (* -1/2 (* lambda1 (neg (sin lambda2)))) (.f64 lambda2 (fma.f64 #s(literal -1/12 binary64) (.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) lambda1))))
#s(approx (* -1/2 (* lambda1 (neg (sin lambda2)))) (.f64 lambda2 (fma.f64 #s(literal 1/2 binary64) lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) lambda1 (.f64 #s(literal 1/240 binary64) (.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64)))))))))
#s(approx (* -1/2 (* lambda1 (neg (sin lambda2)))) (.f64 lambda2 (fma.f64 #s(literal 1/2 binary64) lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/10080 binary64) (.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64))) (*.f64 #s(literal 1/240 binary64) lambda1))))))))
#s(approx (* lambda1 (neg (sin lambda2))) (.f64 #s(literal -1 binary64) (.f64 lambda1 lambda2)))
#s(approx (* lambda1 (neg (sin lambda2))) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) lambda1 (.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64)))))))
#s(approx (* lambda1 (neg (sin lambda2))) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/120 binary64) (.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) lambda1))))))
#s(approx (* lambda1 (neg (sin lambda2))) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) lambda1 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/120 binary64) lambda1 (.f64 #s(literal 1/5040 binary64) (*.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64)))))))))))
#s(approx (* lambda1 (- (pow lambda2 -1) (pow lambda1 -1))) (/.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)) lambda2))
#s(approx (- (pow lambda2 -1) (pow lambda1 -1)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 lambda2 lambda1))) lambda2))
#s(approx (/ 1 lambda2) (/.f64 #s(literal 1 binary64) lambda2))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) (/.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)) lambda2))
#s(approx (- (pow (/ lambda1 lambda2) 3) 1) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (pow.f64 lambda2 #s(literal 3 binary64))))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) (/.f64 (fma.f64 lambda1 lambda2 (pow.f64 lambda1 #s(literal 2 binary64))) (pow.f64 lambda2 #s(literal 2 binary64))))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) (/.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (pow.f64 lambda1 #s(literal 2 binary64))) (pow.f64 lambda2 #s(literal 2 binary64))))
#s(approx (+ 1 (* (/ lambda1 lambda2) 1)) (/.f64 (+.f64 lambda1 lambda2) lambda2))
#s(approx (* lambda1 (+ (/ 1 lambda1) (/ 1 lambda2))) (/.f64 (+.f64 lambda1 lambda2) lambda2))
#s(approx (+ (/ 1 lambda1) (/ 1 lambda2)) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)) lambda2))
#s(approx (+ 1 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (+.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ 1 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (+.f64 #s(literal 1 binary64) (+.f64 (sin.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1 binary64) (.f64 lambda2 (cos.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (+ 1 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (+.f64 #s(literal 1 binary64) (+.f64 (sin.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (sin.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (+ 1 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (+.f64 #s(literal 1 binary64) (+.f64 (sin.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal 1/6 binary64) (.f64 lambda2 (cos.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))
#s(approx (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (sin.f64 (+.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (+.f64 (sin.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1 binary64) (.f64 lambda2 (cos.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (+.f64 (sin.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (sin.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (+.f64 (sin.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal 1/6 binary64) (.f64 lambda2 (cos.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (- (+ lambda1 (* 1/2 (PI))) lambda2) (+.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (- (+ lambda1 (* 1/2 (PI))) lambda2) (+.f64 lambda1 (fma.f64 #s(literal -1 binary64) lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (- (* 1/2 (PI)) lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (- (* 1/2 (PI)) lambda2) (fma.f64 #s(literal -1 binary64) lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (.f64 (sin.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (sin.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (.f64 (sin.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))) (.f64 (sin.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 #s(literal 1 binary64) (fma.f64 lambda2 (.f64 (sin.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 #s(literal 1 binary64) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (sin.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 #s(literal 1 binary64) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (.f64 (sin.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))) (.f64 (sin.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))) (.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (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))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 lambda2 (fma.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))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (sin.f64 lambda1) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (cos.f64 lambda1))) (.f64 #s(literal -1 binary64) (sin.f64 lambda1))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi1) (fma.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))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) (+.f64 (cos.f64 lambda1) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))
#s(approx (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) (+.f64 (cos.f64 lambda1) (fma.f64 lambda2 (sin.f64 lambda1) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) (+.f64 (cos.f64 lambda1) (fma.f64 lambda2 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (cos.f64 lambda1))) (.f64 #s(literal -1 binary64) (sin.f64 lambda1))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) (+.f64 (cos.f64 lambda1) (fma.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))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (-.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 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.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 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (-.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 #s(literal 1 binary64) (.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 #s(literal 1 binary64) (.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 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.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 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (-.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 #s(literal 1 binary64) (.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 #s(literal 1 binary64) (.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 #s(literal 1 binary64) (.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 #s(literal 1 binary64) (.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 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.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 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.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 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.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 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (-.f64 (+.f64 #s(literal 1 binary64) (.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 (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (-.f64 (+.f64 #s(literal 1 binary64) (.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))))))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (-.f64 (+.f64 #s(literal 1 binary64) (.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))))))) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) (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 (* (cos phi2) (cos (- lambda1 lambda2))) 2) (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 (* (cos phi2) (cos (- lambda1 lambda2))) 2) (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 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.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 (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.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 (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))))) (pow.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)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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))))) (/.f64 (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)))))) (pow.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)))) #s(literal 2 binary64))) (/.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))))) (pow.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)))) #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 (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))))) (pow.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)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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))))) (/.f64 (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)))))) (pow.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)))) #s(literal 2 binary64))) (+.f64 (/.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 -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)))))) (pow.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)))) #s(literal 2 binary64))) (/.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))))) (pow.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)))) #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 (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 (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))))) (pow.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)))) #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 (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)))))) (pow.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)))) #s(literal 2 binary64))) (/.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))))) (pow.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)))) #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 (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))))) (pow.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)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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))))) (/.f64 (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 (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (/.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (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 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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 phi2) (sin.f64 lambda1)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (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 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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) (cos.f64 phi2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (/.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 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 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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 phi2) (sin.f64 lambda1)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (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 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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 phi2) (sin.f64 lambda1)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (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 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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 phi2) (sin.f64 lambda1))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (+.f64 (/.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 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 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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) (cos.f64 phi2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (/.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 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 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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 phi2) (sin.f64 lambda1)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (/.f64 (.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) (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 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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 phi2) (sin.f64 lambda1)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (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 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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) (cos.f64 phi2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (/.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 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 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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 phi2) (sin.f64 lambda1)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (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 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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 phi2) (sin.f64 lambda1)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))
#s(approx (/ (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1))))
#s(approx (/ (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1)))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda1) (.f64 #s(literal 2 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda1))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1)) #s(literal 2 binary64)))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1))) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1))))))
#s(approx (/ (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1))) (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1))) (/.f64 (.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 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1))))) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))) (-.f64 (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) (cos.f64 lambda1)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1)) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda1) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1)))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda1) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1)) #s(literal 2 binary64))))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1))))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda1) (.f64 #s(literal 2 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda1))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1)) #s(literal 2 binary64)))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1))) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1))))))
#s(approx (/ (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1))) (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1))) (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1))) (+.f64 (/.f64 (.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 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1))) (/.f64 (.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 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1)))))) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (fma.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (.f64 #s(literal 1/6 binary64) (sin.f64 lambda1))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1)) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda1) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1))) (/.f64 (.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 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1))))) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))) (-.f64 (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) (cos.f64 lambda1)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1)) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda1) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1)))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda1) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1)) #s(literal 2 binary64))))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1)))))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1))) (/.f64 (.f64 (-.f64 (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) (cos.f64 lambda1))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1)))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda1) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1)) #s(literal 2 binary64))))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1)))))) (/.f64 (.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 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1)))))) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))) (-.f64 (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) (cos.f64 lambda1)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1)) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda1) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1)))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda1) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1)) #s(literal 2 binary64))))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1))))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda1) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1)) #s(literal 2 binary64)))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1))) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1))))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (+.f64 #s(literal 1 binary64) (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 (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (+.f64 #s(literal 1 binary64) (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 (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (+.f64 #s(literal 1 binary64) (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)) 3) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))
#s(approx (pow (cos (- lambda1 lambda2)) 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)) 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)) 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 (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 lambda1)))
#s(approx (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda1) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1)))) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (cos.f64 lambda1)))
#s(approx (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (.f64 lambda2 (-.f64 (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) (cos.f64 lambda1)))))) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (cos.f64 lambda1)))
#s(approx (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (.f64 lambda2 (-.f64 (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)) (fma.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (.f64 #s(literal 1/6 binary64) (sin.f64 lambda1)))) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)))))) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (cos.f64 lambda1)))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (+.f64 #s(literal 1 binary64) (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 (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (+.f64 #s(literal 1 binary64) (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 (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (+.f64 #s(literal 1 binary64) (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 (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.f64 lambda2 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi2))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (+.f64 (/.f64 (.f64 (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (cos.f64 phi2)) (.f64 (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))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.f64 lambda2 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi2))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.f64 lambda2 (-.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi2))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (+.f64 (/.f64 (.f64 (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (cos.f64 phi2)) (.f64 (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))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.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))))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (fma.f64 (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))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (+.f64 (/.f64 (.f64 (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (cos.f64 phi2)) (.f64 (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))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.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 (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))
#s(approx (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (-.f64 (fma.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 phi2) (sin.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))))) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))
#s(approx (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (-.f64 (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 phi2) (sin.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (cos.f64 phi2)) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 phi2) (sin.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (/.f64 (.f64 (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))))) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))
#s(approx (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (-.f64 (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 phi2) (sin.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.f64 lambda2 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (cos.f64 phi2)) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.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))))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (fma.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (cos.f64 phi2)) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 phi2) (sin.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (/.f64 (.f64 (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64))) (/.f64 (.f64 (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 phi2) (sin.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 phi2) (sin.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (/.f64 (.f64 (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))))) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))
#s(approx (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))
#s(approx (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 lambda2 (fma.f64 (cos.f64 phi2) (sin.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))))))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))
#s(approx (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (cos.f64 phi2)) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))))) (fma.f64 (cos.f64 phi2) (sin.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))))))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))
#s(approx (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 lambda2 (-.f64 (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda2 (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.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))))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (fma.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))))))))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (cos.f64 phi2)) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))))) (fma.f64 (cos.f64 phi2) (sin.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))))))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (fma.f64 lambda2 (fma.f64 (cos.f64 phi2) (sin.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (cos.f64 phi2)) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (fma.f64 (cos.f64 phi2) (sin.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (fma.f64 lambda2 (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.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))))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (fma.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (cos.f64 phi2)) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (fma.f64 (cos.f64 phi2) (sin.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))
#s(approx (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 lambda2 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))
#s(approx (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 lambda2 (fma.f64 lambda2 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (cos.f64 phi2)) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))
#s(approx (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 lambda2 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.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))))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (fma.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (cos.f64 phi2)) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))
#s(approx (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 lambda2 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (cos.f64 phi2)) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 lambda2 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (cos.f64 phi2)) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.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))))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (fma.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))))) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) (fma.f64 #s(literal -2 binary64) (.f64 lambda2 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) (fma.f64 lambda2 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 lambda2 (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) (fma.f64 lambda2 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.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 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (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 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 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 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (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 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.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 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 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 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (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 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.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 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (-.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 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.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 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #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 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.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 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 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 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))) (fma.f64 lambda2 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))))) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))) (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))) (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (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) (cos.f64 lambda1)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))))) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))) (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))) (.f64 lambda2 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (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) (cos.f64 lambda1))) (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (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) (cos.f64 lambda1)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (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) (cos.f64 lambda1)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))))) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (sin.f64 lambda1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (.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))))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1))))))) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (.f64 lambda2 (-.f64 (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (.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)))))) (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) (sin.f64 lambda1))))))) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))) (.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 lambda2 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))) (.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 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 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64)))) (.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (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 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))) (.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.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 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64)))) (.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 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 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (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)))))) (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 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (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 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64)))) (.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (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 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.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 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (cos.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 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (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 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))) (.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))))) (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1/2 binary64) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (pow.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.f64 (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))))) (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1/2 binary64) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (pow.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.f64 (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.f64 (/.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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (cos.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 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1/2 binary64) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (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)))))) (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 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1/2 binary64) (fma.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 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (cos.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))))))))) (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.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 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (pow.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (pow.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (fma.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 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (cos.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 #s(literal 2 binary64) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1/2 binary64) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (pow.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.f64 (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.f64 (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (.f64 (fma.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 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (cos.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 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.f64 (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.f64 (/.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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (cos.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 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (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)))))) (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 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.f64 (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (fma.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))))) (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1/2 binary64) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (pow.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))))) (.f64 lambda2 (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1/2 binary64) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (pow.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.f64 (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.f64 (/.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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (cos.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 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1/2 binary64) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (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)))))) (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 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1/2 binary64) (fma.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 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (cos.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))))))))) (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.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 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (pow.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (pow.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (fma.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 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (cos.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 #s(literal 2 binary64) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1/2 binary64) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (pow.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.f64 (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.f64 (/.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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (cos.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 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))
#s(approx (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))
#s(approx (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (fma.f64 lambda2 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))))
#s(approx (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (fma.f64 lambda2 (fma.f64 lambda2 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1/2 binary64) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (pow.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64))))))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))))
#s(approx (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 lambda2 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.f64 (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.f64 (/.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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (cos.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 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1/2 binary64) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (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)))))) (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 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1/2 binary64) (fma.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 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (cos.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))))))))) (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.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 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (pow.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (pow.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (fma.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 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (cos.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 #s(literal 2 binary64) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1/2 binary64) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (pow.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1/2 binary64) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (pow.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64))))))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))))
#s(approx (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))
#s(approx (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))
#s(approx (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1/2 binary64) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (pow.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))
#s(approx (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.f64 (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.f64 (/.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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (cos.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 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1/2 binary64) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (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)))))) (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 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1/2 binary64) (fma.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 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (cos.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))))))))) (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.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 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (pow.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (pow.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (fma.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 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (cos.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 #s(literal 2 binary64) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1/2 binary64) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (pow.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1/2 binary64) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (pow.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))
#s(approx (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 #s(literal -1 binary64) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))
#s(approx (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))
#s(approx (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 lambda2 (-.f64 (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.f64 (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.f64 (/.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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (cos.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 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))
#s(approx (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.f64 (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (.f64 (fma.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 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (cos.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 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (.f64 (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))
#s(approx (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (+.f64 #s(literal 1 binary64) (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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))))))
#s(approx (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (+.f64 #s(literal 1 binary64) (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))) (fma.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 lambda2 (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))))))
#s(approx (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (+.f64 #s(literal 1 binary64) (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))) (fma.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 lambda2 (fma.f64 lambda2 (fma.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 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (cos.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))))))))) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))))))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))))))
#s(approx (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))))
#s(approx (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) (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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))
#s(approx (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) (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))) (fma.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 lambda2 (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))
#s(approx (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) (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))) (fma.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 lambda2 (fma.f64 lambda2 (fma.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 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (cos.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))))))))) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))))))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))
#s(approx (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
#s(approx (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) (fma.f64 #s(literal 4 binary64) (.f64 lambda2 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))))
#s(approx (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) (fma.f64 lambda2 (fma.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 lambda2 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (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 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))))
#s(approx (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) (fma.f64 lambda2 (fma.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))) (.f64 lambda2 (fma.f64 lambda2 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (cos.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 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (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 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))))
#s(approx (pow (cos (- lambda1 lambda2)) 4) (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)))
#s(approx (pow (cos (- lambda1 lambda2)) 4) (fma.f64 #s(literal 4 binary64) (.f64 lambda2 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64))))
#s(approx (pow (cos (- lambda1 lambda2)) 4) (fma.f64 lambda2 (fma.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (sin.f64 lambda1)) (.f64 lambda2 (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (*.f64 (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 4 binary64))))
#s(approx (pow (cos (- lambda1 lambda2)) 4) (fma.f64 lambda2 (fma.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (sin.f64 lambda1)) (.f64 lambda2 (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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)))) (fma.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))) (.f64 lambda2 (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (cos.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)))))))))))) (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64))))
#s(approx (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))
#s(approx (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))
#s(approx (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1/2 binary64) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (pow.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))
#s(approx (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1/2 binary64) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (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)))))) (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 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1/2 binary64) (fma.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 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (cos.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))))))))) (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.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 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (pow.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (pow.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (fma.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 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (cos.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 #s(literal 2 binary64) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1/2 binary64) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (pow.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1/2 binary64) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (pow.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 4 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))
#s(approx (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))))
#s(approx (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (fma.f64 lambda2 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 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 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))))
#s(approx (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (fma.f64 lambda2 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 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 lambda2 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (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 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64))))) (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1/2 binary64) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))))) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))))
#s(approx (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (fma.f64 lambda2 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 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 lambda2 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (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 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64))))) (fma.f64 lambda2 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1/2 binary64) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 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 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (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)))))) (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 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1/2 binary64) (fma.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 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (cos.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))))))))) (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.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 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))))) (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1/2 binary64) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))))) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))))
#s(approx (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (fma.f64 lambda2 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64))))))
#s(approx (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (fma.f64 lambda2 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1/2 binary64) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64))))))
#s(approx (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (fma.f64 lambda2 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1/2 binary64) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1/2 binary64) (fma.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 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (cos.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))))))))) (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.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 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64))))))
#s(approx (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (fma.f64 lambda2 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (fma.f64 lambda2 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (fma.f64 lambda2 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (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 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.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 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)))
#s(approx (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) (-.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)))) (.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))) #s(literal 2 binary64)))
#s(approx (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.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 #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))))))))) #s(literal 2 binary64)))
#s(approx (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.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 #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 #s(literal -1 binary64) (.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)))))))))) #s(literal 2 binary64)))
#s(approx (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (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 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))))
#s(approx (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.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 #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))))))))))
#s(approx (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.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 #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 #s(literal -1 binary64) (.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)))))))))))
#s(approx (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))
#s(approx (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (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 (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (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 (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (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 (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))
#s(approx (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -2 binary64) (.f64 lambda2 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))
#s(approx (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda2 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))
#s(approx (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 lambda2 (-.f64 (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda2 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (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)))))) (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 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))
#s(approx (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))))
#s(approx (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (fma.f64 #s(literal 2 binary64) (.f64 lambda2 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))
#s(approx (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (fma.f64 lambda2 (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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 lambda2 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64)))))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))
#s(approx (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (fma.f64 lambda2 (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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 lambda2 (fma.f64 lambda2 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (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)))))) (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 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))))
#s(approx (pow (cos (- lambda1 lambda2)) 6) (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)))
#s(approx (pow (cos (- lambda1 lambda2)) 6) (fma.f64 #s(literal 2 binary64) (.f64 lambda2 (.f64 (pow.f64 (cos.f64 lambda1) #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))))) (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64))))
#s(approx (pow (cos (- lambda1 lambda2)) 6) (fma.f64 lambda2 (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 lambda2 (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64))))) (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64))))
#s(approx (pow (cos (- lambda1 lambda2)) 6) (fma.f64 lambda2 (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 lambda2 (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (fma.f64 lambda2 (fma.f64 #s(literal 2 binary64) (.f64 (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)))))) (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 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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)))))))))) (pow.f64 (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))) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64))))
#s(approx (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))
#s(approx (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (fma.f64 lambda2 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))
#s(approx (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (fma.f64 lambda2 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (.f64 lambda2 (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (pow.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))
#s(approx (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (fma.f64 lambda2 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (.f64 lambda2 (fma.f64 #s(literal -4 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (fma.f64 lambda2 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (pow.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (fma.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 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (cos.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 #s(literal 2 binary64) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (pow.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))
#s(approx (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)))
#s(approx (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (fma.f64 #s(literal 2 binary64) (.f64 lambda2 (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64))))
#s(approx (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (fma.f64 lambda2 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))) (.f64 lambda2 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (pow.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) #s(literal 2 binary64))))) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64))))
#s(approx (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (fma.f64 lambda2 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1)))))) (.f64 lambda2 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (fma.f64 lambda2 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (fma.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 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (cos.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 #s(literal 2 binary64) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))))) (pow.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64))))
#s(approx (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 lambda2 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))
#s(approx (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 lambda2 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.f64 (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))
#s(approx (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 lambda2 (-.f64 (fma.f64 lambda2 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (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)))))) (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 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.f64 (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.f64 (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (.f64 (fma.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 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (cos.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 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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))))))) (pow.f64 (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))) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 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 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.f64 (fma.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 phi2) #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #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 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda1))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))
#s(approx (* (cos phi2) (cos lambda2)) (cos.f64 phi2))
#s(approx (* (cos phi2) (cos lambda2)) (+.f64 (cos.f64 phi2) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 phi2)))))
#s(approx (* (cos phi2) (cos lambda2)) (+.f64 (cos.f64 phi2) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 phi2)))))))
#s(approx (* (cos phi2) (cos lambda2)) (+.f64 (cos.f64 phi2) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 phi2)) (.f64 #s(literal 1/24 binary64) (cos.f64 phi2))))))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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))))) (/.f64 (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (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 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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)))))) (pow.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)))) #s(literal 2 binary64))) (/.f64 (.f64 (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))))) (pow.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)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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))))) (/.f64 (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.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)))) #s(literal 2 binary64))) (pow.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)))) #s(literal 3 binary64))) (+.f64 (/.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 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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)))))) (pow.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)))) #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 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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))))))) (pow.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)))) #s(literal 2 binary64))) (/.f64 (.f64 (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)))))) (pow.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)))) #s(literal 2 binary64))))))) (/.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 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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)))))) (pow.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)))) #s(literal 2 binary64))) (/.f64 (.f64 (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))))) (pow.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)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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))))) (/.f64 (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.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)))) #s(literal 2 binary64))) (pow.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)))) #s(literal 3 binary64))) (/.f64 (.f64 (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)))))) (pow.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)))) #s(literal 2 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 (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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (.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 (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))))))) (pow.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)))) #s(literal 3 binary64))) (+.f64 (/.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 -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 (-.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 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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)))))) (pow.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)))) #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 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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))))))) (pow.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)))) #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 (-.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 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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)))))) (pow.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)))) #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 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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))))))) (pow.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)))) #s(literal 2 binary64))) (/.f64 (.f64 (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)))))) (pow.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)))) #s(literal 2 binary64))))))))) (/.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)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.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)))) #s(literal 2 binary64))) (pow.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)))) #s(literal 3 binary64))) (+.f64 (/.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 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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)))))) (pow.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)))) #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 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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))))))) (pow.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)))) #s(literal 2 binary64))) (/.f64 (.f64 (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)))))) (pow.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)))) #s(literal 2 binary64))))))) (/.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 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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)))))) (pow.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)))) #s(literal 2 binary64))) (/.f64 (.f64 (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))))) (pow.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)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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))))) (/.f64 (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/.f64 (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 lambda2 (.f64 (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)))))) (pow.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)))) #s(literal 2 binary64))) (/.f64 (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.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)))) #s(literal 2 binary64))) (pow.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)))) #s(literal 3 binary64))) (/.f64 (.f64 (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)))))) (pow.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)))) #s(literal 2 binary64)))))) (/.f64 (.f64 (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))))) (pow.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)))) #s(literal 2 binary64)))) (/.f64 (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 lambda2 (-.f64 (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.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)))) #s(literal 2 binary64))) (pow.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)))) #s(literal 3 binary64))) (/.f64 (.f64 (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)))))) (pow.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)))) #s(literal 2 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 (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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (.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 (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))))))) (pow.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)))) #s(literal 3 binary64))) (/.f64 (.f64 (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)))))) (pow.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)))) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.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)))) #s(literal 2 binary64))) (pow.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)))) #s(literal 3 binary64))) (/.f64 (.f64 (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)))))) (pow.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)))) #s(literal 2 binary64)))))) (/.f64 (.f64 (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))))) (pow.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)))) #s(literal 2 binary64)))) (/.f64 (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 (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (fma.f64 lambda2 (-.f64 (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (fma.f64 lambda2 (-.f64 (fma.f64 lambda2 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.f64 (/.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 phi2) (sin.f64 lambda1))) (-.f64 (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (/.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)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (fma.f64 lambda2 (-.f64 (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.f64 lambda2 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (+.f64 (/.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 phi2) (sin.f64 lambda1))) (-.f64 (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (/.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)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 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 phi2) (sin.f64 lambda1)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (+.f64 (/.f64 (.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) (cos.f64 phi2)))) (-.f64 (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (/.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))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (+.f64 (/.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 phi2) (sin.f64 lambda1))) (-.f64 (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (/.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)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (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 phi2) (sin.f64 lambda1))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (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 (.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) (cos.f64 phi2)))))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (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 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) (cos.f64 phi2)))))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (+.f64 #s(literal 1 binary64) (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 (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (+.f64 #s(literal 1 binary64) (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 (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (+.f64 #s(literal 1 binary64) (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (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 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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)))))) (pow.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)))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (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 (-.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 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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)))))) (pow.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)))) #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 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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))))))) (pow.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)))) #s(literal 2 binary64))))) (/.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 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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)))))) (pow.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)))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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 (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (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 (-.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 (-.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 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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)))))) (pow.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)))) #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 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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))))))) (pow.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)))) #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 (-.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 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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)))))) (pow.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)))) #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 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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))))))) (pow.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)))) #s(literal 2 binary64)))))) (/.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 (-.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 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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)))))) (pow.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)))) #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 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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))))))) (pow.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)))) #s(literal 2 binary64))))) (/.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 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #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)))))) (pow.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)))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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 (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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))))) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 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))))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 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 (fma.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 phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos 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)))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.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 (.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 (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.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 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (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 phi2) (sin.f64 lambda1))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (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 (.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) (cos.f64 phi2)))))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (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 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) (cos.f64 phi2)))))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (+.f64 #s(literal 1 binary64) (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 (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (+.f64 #s(literal 1 binary64) (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 (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (+.f64 #s(literal 1 binary64) (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 (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(literal 1 binary64))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2)))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (+.f64 #s(literal 1 binary64) (.f64 lambda2 (+.f64 lambda1 (.f64 #s(literal -1/2 binary64) lambda2)))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (+.f64 #s(literal 1 binary64) (.f64 lambda2 (+.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))
#s(approx (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2)))) #s(literal 1 binary64))
#s(approx (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2)))
#s(approx (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2)))) (+.f64 #s(literal 1 binary64) (.f64 lambda2 (+.f64 lambda1 (.f64 #s(literal -1/2 binary64) lambda2)))))
#s(approx (* lambda2 (+ lambda1 (* -1/2 lambda2))) (.f64 lambda2 (+.f64 lambda1 (.f64 #s(literal -1/2 binary64) lambda2))))
#s(approx (* -1/2 lambda2) (*.f64 #s(literal -1/2 binary64) lambda2))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) #s(literal 1 binary64))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2)))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) (+.f64 #s(literal 1 binary64) (.f64 lambda2 (+.f64 lambda1 (.f64 #s(literal -1/2 binary64) lambda2)))))
#s(approx (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1))) (+.f64 #s(literal 1 binary64) (.f64 lambda2 (+.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) (+.f64 lambda2 (/.f64 #s(literal 1 binary64) lambda1)))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) (fma.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) lambda1)))
#s(approx (+ (sin lambda2) (/ (cos lambda2) lambda1)) (fma.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 lambda2 (-.f64 (.f64 #s(literal -1/6 binary64) lambda2) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) lambda1))))) (/.f64 #s(literal 1 binary64) lambda1)))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) (fma.f64 lambda1 lambda2 (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) (fma.f64 lambda2 (+.f64 lambda1 (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (.f64 lambda2 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))))) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (* (* lambda1 lambda1) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) (fma.f64 lambda2 (+.f64 lambda1 (.f64 lambda2 (fma.f64 #s(literal -1/6 binary64) (.f64 lambda1 lambda2) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))))))) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) (/.f64 lambda2 lambda1)) #s(literal 1/2 binary64)))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (-.f64 (fma.f64 lambda2 (fma.f64 lambda2 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) lambda1)) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
#s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) (-.f64 (fma.f64 lambda2 (fma.f64 lambda2 (-.f64 (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal -1/6 binary64) (/.f64 lambda2 lambda1))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) lambda1)) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) (/.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 lambda2 lambda1)) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) (-.f64 (.f64 lambda2 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 lambda2 (pow.f64 lambda1 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) lambda1))) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))
#s(approx (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1) (-.f64 (.f64 lambda2 (-.f64 (.f64 lambda2 (fma.f64 #s(literal 1/6 binary64) (/.f64 lambda2 lambda1) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) lambda1))) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (/.f64 #s(literal -1 binary64) lambda1))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (-.f64 (*.f64 #s(literal -1 binary64) lambda2) (/.f64 #s(literal 1 binary64) lambda1)))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (-.f64 (.f64 lambda2 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 lambda2 lambda1)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) lambda1)))
#s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (-.f64 (.f64 lambda2 (-.f64 (.f64 lambda2 (fma.f64 #s(literal 1/6 binary64) lambda2 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) lambda1)))) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) lambda1)))
#s(approx (* -1 (/ (cos lambda2) lambda1)) (/.f64 #s(literal -1 binary64) lambda1))
#s(approx (* -1 (/ (cos lambda2) lambda1)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 lambda2 #s(literal 2 binary64)) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)))
#s(approx (* -1 (/ (cos lambda2) lambda1)) (-.f64 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) (/.f64 (pow.f64 lambda2 #s(literal 2 binary64)) lambda1) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) lambda1)))) (/.f64 #s(literal 1 binary64) lambda1)))
#s(approx (* -1 (/ (cos lambda2) lambda1)) (-.f64 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/720 binary64) (/.f64 (pow.f64 lambda2 #s(literal 2 binary64)) lambda1)) (.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) lambda1))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) lambda1)))) (/.f64 #s(literal 1 binary64) lambda1)))
#s(approx (* -1/2 (cos lambda2)) #s(literal -1/2 binary64))
#s(approx (* -1/2 (cos lambda2)) (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))
#s(approx (* -1/2 (cos lambda2)) (-.f64 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal -1/48 binary64) (pow.f64 lambda2 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))
#s(approx (* -1/2 (cos lambda2)) (-.f64 (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (+.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/1440 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/48 binary64))))) #s(literal 1/2 binary64)))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (+.f64 (/.f64 (.f64 lambda2 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi2))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 lambda2 (-.f64 (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda2 (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi2))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi2))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (/.f64 (.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (fma.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (fma.f64 lambda2 (-.f64 (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda2 (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos 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 (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (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 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.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 (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (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 (.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 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.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 (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (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 lambda2 (-.f64 (/.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 (.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 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.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 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (/.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 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (sin.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.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 (- lambda1 lambda2)) (cos phi2)) 2) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (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 (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (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 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 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (fma.f64 lambda2 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))) (.f64 lambda2 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))) (/.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))) (.f64 lambda2 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))) (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))) (.f64 #s(literal -1/3 binary64) (/.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))) (/.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64))))))) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))))))) (/.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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))))) (pow.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)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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))))) (/.f64 (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)))))) (pow.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)))) #s(literal 2 binary64))) (/.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))))) (pow.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)))) #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 (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))))) (pow.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)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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))))) (/.f64 (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)))))) (pow.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)))) #s(literal 2 binary64))) (+.f64 (/.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 -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)))))) (pow.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)))) #s(literal 2 binary64))) (/.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))))) (pow.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)))) #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 (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 (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))))) (pow.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)))) #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 (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)))))) (pow.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)))) #s(literal 2 binary64))) (/.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))))) (pow.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)))) #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 (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))))) (pow.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)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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))))) (/.f64 (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (.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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (- (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 (fma.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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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))))) (pow.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)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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))))) (/.f64 (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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)))))) (pow.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)))) #s(literal 2 binary64))) (/.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))))) (pow.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)))) #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 (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))))) (pow.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)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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))))) (/.f64 (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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)))))) (pow.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)))) #s(literal 2 binary64))) (+.f64 (/.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 -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)))))) (pow.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)))) #s(literal 2 binary64))) (/.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))))) (pow.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)))) #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 (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 (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))))) (pow.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)))) #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 (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)))))) (pow.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)))) #s(literal 2 binary64))) (/.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))))) (pow.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)))) #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 (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))))) (pow.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)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #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))))) (/.f64 (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (.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 (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (-.f64 (fma.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (-.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 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (-.f64 (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 lambda2 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (cos.f64 phi2)) (.f64 (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 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (-.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 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (-.f64 (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 lambda2 (-.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi2))) (.f64 lambda2 (-.f64 (.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.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))))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (fma.f64 (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))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (cos.f64 phi2)) (.f64 (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 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (-.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 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 #s(literal -1 binary64) (.f64 lambda2 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi2)))))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 lambda2 (fma.f64 #s(literal 1/6 binary64) (.f64 lambda2 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi2))))))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (fma.f64 lambda2 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (fma.f64 lambda2 (fma.f64 lambda2 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (cos.f64 phi2)) (.f64 (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 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 lambda2 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (.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))))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (fma.f64 (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))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (cos.f64 phi2)) (.f64 (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 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 #s(literal -2 binary64) (.f64 lambda2 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 lambda2 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 lambda2 (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 lambda2 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))
#s(approx (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.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)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (.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)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.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)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (-.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)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))) (.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)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #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)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))))) (-.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)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))))))) (.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)))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))) (/.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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (-.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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (-.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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (-.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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (-.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 (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) (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 (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) (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 (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) (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 (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) (.f64 #s(literal 2 binary64) (log.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) (fma.f64 #s(literal 2 binary64) (log.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 #s(literal 2 binary64) (/.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) (fma.f64 #s(literal 2 binary64) (log.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 lambda2 (fma.f64 #s(literal 2 binary64) (/.f64 (sin.f64 lambda1) (cos.f64 lambda1)) (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) #s(literal 1 binary64)))))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) (fma.f64 #s(literal 2 binary64) (log.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 lambda2 (fma.f64 #s(literal 2 binary64) (/.f64 (sin.f64 lambda1) (cos.f64 lambda1)) (.f64 lambda2 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (.f64 #s(literal 1/3 binary64) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 lambda1) (cos.f64 lambda1)) (fma.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))) (.f64 #s(literal 3 binary64) (/.f64 (sin.f64 lambda1) (cos.f64 lambda1)))))))) #s(literal 1 binary64)))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) (log.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) (+.f64 (log.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (/.f64 (.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) (+.f64 (log.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 lambda2 (fma.f64 #s(literal 1/2 binary64) (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) #s(literal 1 binary64))) (/.f64 (sin.f64 lambda1) (cos.f64 lambda1))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) (+.f64 (log.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal 1/6 binary64) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 lambda1) (cos.f64 lambda1)) (fma.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))) (.f64 #s(literal 3 binary64) (/.f64 (sin.f64 lambda1) (cos.f64 lambda1)))))) (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) #s(literal 1 binary64)))) (/.f64 (sin.f64 lambda1) (cos.f64 lambda1))))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))))
#s(approx (pow lambda2 3) (pow.f64 lambda2 #s(literal 3 binary64)))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (fma.f64 lambda1 lambda2 (pow.f64 lambda1 #s(literal 2 binary64))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (pow.f64 lambda1 #s(literal 2 binary64))))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) (*.f64 lambda2 (+.f64 lambda1 lambda2)))
#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 (fma.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 (fma.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 (pow.f64 lambda2 #s(literal 2 binary64)) (sin.f64 lambda1)))))
#s(approx (* (sin lambda1) (cos lambda2)) (+.f64 (sin.f64 lambda1) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (sin.f64 lambda1)))))))
#s(approx (* (sin lambda1) (cos lambda2)) (+.f64 (sin.f64 lambda1) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (sin.f64 lambda1)) (.f64 #s(literal 1/24 binary64) (sin.f64 lambda1))))))))
#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 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 lambda1))))))
#s(approx (* (cos lambda1) (sin lambda2)) (.f64 lambda2 (+.f64 (cos.f64 lambda1) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 lambda1) (.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 lambda1))))))))
#s(approx (* (cos lambda1) (sin lambda2)) (.f64 lambda2 (+.f64 (cos.f64 lambda1) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 lambda1) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 lambda1)) (*.f64 #s(literal 1/120 binary64) (cos.f64 lambda1)))))))))
#s(approx (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 #s(literal 1 binary64) (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 (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 lambda2 (fma.f64 lambda2 (fma.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 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) (/.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))) (-.f64 (+.f64 (pow.f64 lambda1 #s(literal 2 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 2 binary64))) (.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 (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) (-.f64 (+.f64 (pow.f64 lambda1 #s(literal 2 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 2 binary64))) (.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 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) (-.f64 (pow.f64 lambda1 #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) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 2 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 2 binary64))) (-.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 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64))) (pow.f64 lambda2 #s(literal 2 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (.f64 lambda2 (-.f64 (/.f64 (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64)))) (pow.f64 lambda2 #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))) (/.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))
#s(approx (cos (neg lambda2)) (cos.f64 (neg.f64 lambda2)))
#s(approx (sin (neg lambda2)) (sin.f64 (neg.f64 lambda2)))
#s(approx (* lambda2 (- (/ lambda1 lambda2) 1)) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))
#s(approx (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) lambda2))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) (*.f64 lambda2 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) lambda2) (/.f64 lambda1 lambda2)) #s(literal 1 binary64))))
#s(approx (cos lambda2) (cos.f64 lambda2))
#s(approx (sin lambda2) (sin.f64 lambda2))
#s(approx (+ (cos lambda2) (cos phi1)) (+.f64 (cos.f64 lambda2) (cos.f64 phi1)))
#s(approx (neg (sin lambda2)) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2)))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2))))))
#s(approx (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2)))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 lambda1 (-.f64 (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 (neg.f64 lambda2))))))
#s(approx (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) (.f64 lambda1 (-.f64 (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 (neg.f64 lambda2)))))
#s(approx (sin (+ lambda2 (/ (PI) 2))) (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (+ lambda2 (/ (PI) 2)) lambda2)
#s(approx (+ lambda2 (/ (PI) 2)) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) lambda2)))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) (*.f64 #s(literal 1/6 binary64) (pow.f64 lambda2 #s(literal 3 binary64))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) (.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (+.f64 #s(literal 1/6 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 lambda1 lambda2)))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) (.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1/6 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (pow.f64 lambda2 #s(literal 2 binary64))))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) (*.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 lambda1 lambda2) (/.f64 lambda1 (pow.f64 lambda2 #s(literal 3 binary64))))) (/.f64 #s(literal 1 binary64) (pow.f64 lambda2 #s(literal 2 binary64))))))
#s(approx (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)) (*.f64 #s(literal 1/6 binary64) (pow.f64 lambda2 #s(literal 3 binary64))))
#s(approx (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)) (.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (+.f64 #s(literal 1/6 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 lambda1 lambda2)))))
#s(approx (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)) (.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1/6 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (pow.f64 lambda2 #s(literal 2 binary64))))))
#s(approx (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1) (*.f64 #s(literal 1/6 binary64) (pow.f64 lambda2 #s(literal 2 binary64))))
#s(approx (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (+.f64 #s(literal 1/6 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 lambda1 lambda2)))))
#s(approx (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/6 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (pow.f64 lambda2 #s(literal 2 binary64))))))
#s(approx (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (+.f64 #s(literal 1/6 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 lambda1 lambda2)))))
#s(approx (+ (* -1/2 lambda1) (* 1/6 lambda2)) (.f64 lambda2 (+.f64 #s(literal 1/6 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 lambda1 lambda2)))))
#s(approx (+ 1 (* (cos lambda2) (cos phi2))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))
#s(approx (* (cos lambda2) (cos phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))
#s(approx (* (- (/ lambda1 lambda2) 1) lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64))) (pow.f64 lambda2 #s(literal 2 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) (.f64 lambda2 (-.f64 (/.f64 (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64)))) (pow.f64 lambda2 #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))) (/.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64))) (pow.f64 lambda2 #s(literal 2 binary64)))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2)))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) (-.f64 (/.f64 (*.f64 lambda1 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64)))) (pow.f64 lambda2 #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))) (/.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 lambda1 lambda2) (/.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))
#s(approx (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))
#s(approx (+ 1 (* -1 (/ lambda2 lambda1))) (*.f64 lambda2 (-.f64 (/.f64 #s(literal 1 binary64) lambda2) (/.f64 #s(literal 1 binary64) lambda1))))
#s(approx (- (+ lambda1 (* 1/2 (PI))) lambda2) (*.f64 #s(literal -1 binary64) lambda2))
#s(approx (- (+ lambda1 (* 1/2 (PI))) lambda2) (*.f64 lambda2 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) lambda2) (/.f64 lambda1 lambda2)) #s(literal 1 binary64))))
#s(approx (- (* 1/2 (PI)) lambda2) (*.f64 #s(literal -1 binary64) lambda2))
#s(approx (- (* 1/2 (PI)) lambda2) (.f64 lambda2 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) lambda2)) #s(literal 1 binary64))))
#s(approx (* (cos phi2) (cos lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))
#s(approx (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2)))) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda2 #s(literal 2 binary64))))
#s(approx (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2)))) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (/.f64 lambda1 lambda2) #s(literal 1/2 binary64))))
#s(approx (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2)))) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) (/.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
#s(approx (* lambda2 (+ lambda1 (* -1/2 lambda2))) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (/.f64 lambda1 lambda2) #s(literal 1/2 binary64))))
#s(approx (+ lambda1 (* -1/2 lambda2)) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1/2 binary64))))
#s(approx (* -1/2 (cos lambda2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) (*.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (-.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) #s(literal 1 binary64))))
#s(approx (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) (*.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (-.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) #s(literal 1 binary64))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 lambda1 lambda2) (/.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))
#s(approx (+ (* lambda2 lambda2) (* lambda1 lambda2)) (*.f64 (pow.f64 lambda2 #s(literal 2 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))) lambda1) 1) 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))) lambda1) 1) (+.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 (/ (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1) (/.f64 (+.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))))))) 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 (.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 lambda2))) (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (sin (- lambda1 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 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 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (.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 (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) (/.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))) (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 (+ (* (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 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) 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 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))) lambda1))))
#s(approx (+ (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) 1) (+.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 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))) lambda1)))
#s(approx (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1))) lambda1) (/.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 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))) lambda1))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))
#s(approx (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (.f64 #s(literal -1 binary64) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (.f64 #s(literal -1 binary64) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 lambda1 #s(literal 2 binary64)) lambda2) (/.f64 (pow.f64 lambda1 #s(literal 2 binary64)) lambda2)) (.f64 #s(literal -1 binary64) lambda1)) lambda2))))))
#s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) (.f64 #s(literal -1 binary64) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64)))) lambda2) (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64)))) lambda2)) (.f64 #s(literal -1 binary64) lambda1)) lambda2))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) (+.f64 (cos.f64 phi1) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (cos (neg lambda2)) (cos.f64 (*.f64 #s(literal -1 binary64) lambda2)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (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) (fma.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 phi1) (fma.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) (fma.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))
#s(approx (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (+.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 (* 1/2 (PI))) (sin phi2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (+.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) (* (cos (* 1/2 (PI))) (sin phi2)))) (.f64 (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (sin (neg lambda2)) (sin.f64 (*.f64 #s(literal -1 binary64) lambda2)))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) (+.f64 (sin.f64 (.f64 #s(literal -1 binary64) lambda2)) (.f64 lambda1 (cos.f64 (*.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (* lambda1 (cos (neg lambda2))) (.f64 lambda1 (cos.f64 (.f64 #s(literal -1 binary64) lambda2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* 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 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (*.f64 (cos.f64 phi2) (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))
#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 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))))
#s(approx (+ 1 (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 (cos.f64 (.f64 #s(literal -1 binary64) lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (* -1 (* lambda1 (sin (neg lambda2)))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (*.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (* lambda1 (sin (neg lambda2))) (.f64 lambda1 (sin.f64 (.f64 #s(literal -1 binary64) lambda2))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (.f64 (cos.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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (+.f64 (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))))))))
#s(approx (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (.f64 (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (.f64 (sin.f64 (.f64 #s(literal -1 binary64) lambda2)) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (fma.f64 #s(literal -1 binary64) lambda2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (sin.f64 (+.f64 lambda1 (fma.f64 #s(literal -1 binary64) lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) (.f64 #s(literal -1 binary64) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64))))
#s(approx (pow (cos (- lambda1 lambda2)) 2) (pow.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) 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)))))) (+.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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))))))))
#s(approx (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) (+.f64 (cos.f64 (.f64 #s(literal -1 binary64) lambda2)) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 (.f64 #s(literal -1 binary64) lambda2)))) (sin.f64 (.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 (.f64 #s(literal -1 binary64) lambda2)))) (sin.f64 (*.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 (.f64 #s(literal -1 binary64) lambda2)))) (sin.f64 (.f64 #s(literal -1 binary64) lambda2))))
#s(approx (* -1/2 (* lambda1 (cos (neg lambda2)))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 (*.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) (+.f64 (cos.f64 (.f64 #s(literal -1 binary64) lambda2)) (.f64 lambda1 (-.f64 (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal -1 binary64) lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (sin.f64 (.f64 #s(literal -1 binary64) lambda2)))))) (sin.f64 (.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))) (.f64 lambda1 (-.f64 (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal -1 binary64) lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (sin.f64 (.f64 #s(literal -1 binary64) lambda2)))))) (sin.f64 (*.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))) (-.f64 (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal -1 binary64) lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (sin.f64 (.f64 #s(literal -1 binary64) lambda2)))))) (sin.f64 (.f64 #s(literal -1 binary64) lambda2))))
#s(approx (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal -1 binary64) lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (sin.f64 (*.f64 #s(literal -1 binary64) lambda2)))))))
#s(approx (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal -1 binary64) lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (sin.f64 (.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (* 1/6 (* lambda1 (sin (neg lambda2)))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (sin.f64 (*.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 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) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin 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 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
#s(approx (+ (* (sin (+ lambda2 (/ (PI) 2))) lambda1) (neg (sin lambda2))) (-.f64 (.f64 lambda1 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) lambda2)))) (sin.f64 lambda2)))
#s(approx (sin (+ lambda2 (/ (PI) 2))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (.f64 #s(literal -1 binary64) lambda2))))
#s(approx (+ lambda2 (/ (PI) 2)) (.f64 #s(literal -1 binary64) (.f64 lambda2 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) lambda2)) #s(literal 1 binary64)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (*.f64 (cos.f64 phi2) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))
#s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 lambda1 lambda2)) #s(literal 1/6 binary64)))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda2)) lambda2)) #s(literal 1/6 binary64)))))
#s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))) lambda2) (*.f64 #s(literal -1/2 binary64) lambda1)) lambda2)) #s(literal 1/6 binary64)))))
#s(approx (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 lambda1 lambda2)) #s(literal 1/6 binary64)))))
#s(approx (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda2)) lambda2)) #s(literal 1/6 binary64)))))
#s(approx (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (+.f64 #s(literal 1/6 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) lambda1 (/.f64 #s(literal 1 binary64) lambda2)) lambda2)))))
#s(approx (+ (* -1/2 lambda1) (* 1/6 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda2 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 lambda1 lambda2)) #s(literal 1/6 binary64)))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.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 lambda2) 1) lambda2) (.f64 #s(literal -1 binary64) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) (.f64 #s(literal -1 binary64) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) (.f64 #s(literal -1 binary64) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64))) lambda2))) lambda2))))))
#s(approx (* (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) lambda2) (.f64 #s(literal -1 binary64) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 lambda1 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64)))) lambda2) (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64)))) lambda2))) lambda2))))))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 lambda1 #s(literal 2 binary64)) lambda2) (/.f64 (pow.f64 lambda1 #s(literal 2 binary64)) lambda2)) lambda1) lambda2)) #s(literal 1 binary64)))
#s(approx (/ (- (pow (/ lambda1 lambda2) 3) 1) (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1)))) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 lambda1 (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64)))) lambda2) (fma.f64 #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda1 #s(literal 2 binary64)))) lambda2)) lambda1) lambda2)) #s(literal 1 binary64)))
#s(approx (+ (* (/ lambda1 lambda2) (/ lambda1 lambda2)) (+ 1 (* (/ lambda1 lambda2) 1))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) lambda1 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 lambda1 #s(literal 2 binary64)) lambda2))) lambda2))))
#s(approx (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (.f64 #s(literal -1 binary64) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))))
#s(approx (+ 1 (* -1 (/ lambda2 lambda1))) (.f64 #s(literal -1 binary64) (.f64 lambda2 (-.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda2)))))
#s(approx (+ 1 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (+.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda1 (fma.f64 #s(literal -1 binary64) lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)) (sin.f64 (+.f64 lambda1 (fma.f64 #s(literal -1 binary64) lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (- (+ lambda1 (* 1/2 (PI))) lambda2) (.f64 #s(literal -1 binary64) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2))))))
#s(approx (- (* 1/2 (PI)) lambda2) (.f64 #s(literal -1 binary64) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) lambda2))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (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) (fma.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) (+.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) 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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) 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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) 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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (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 (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (/.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 3 binary64)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))))
#s(approx (/ (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) #s(literal 3 binary64))))
#s(approx (pow (cos (- lambda1 lambda2)) 3) (pow.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) #s(literal 3 binary64)))
#s(approx (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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 (.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 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (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)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))) #s(literal 2 binary64))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (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 (.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 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (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)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))) #s(literal 2 binary64)))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.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 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (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)))))))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))) #s(literal 2 binary64))))
#s(approx (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))) #s(literal 2 binary64))))
#s(approx (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (fma.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))))))
#s(approx (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))))))))
#s(approx (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (.f64 (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))) #s(literal 2 binary64)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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))) (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (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 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (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 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 6 binary64)))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 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 (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (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 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 6 binary64)))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 6 binary64)))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 6 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))))))))
#s(approx (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))))) #s(literal 2 binary64)))))))
#s(approx (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))) #s(literal 2 binary64))))))
#s(approx (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))))
#s(approx (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))))
#s(approx (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) #s(literal 4 binary64))))))
#s(approx (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) #s(literal 4 binary64)))))
#s(approx (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 4 binary64))))
#s(approx (pow (cos (- lambda1 lambda2)) 4) (pow.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) #s(literal 4 binary64)))
#s(approx (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))) #s(literal 2 binary64)))))
#s(approx (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 6 binary64))))))
#s(approx (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)))) #s(literal 2 binary64)))
#s(approx (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)))))
#s(approx (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64))))
#s(approx (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 6 binary64)))))
#s(approx (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 6 binary64))))
#s(approx (pow (cos (- lambda1 lambda2)) 6) (pow.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) #s(literal 6 binary64)))
#s(approx (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))) #s(literal 2 binary64))))
#s(approx (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) #s(literal 4 binary64))))) #s(literal 2 binary64)))
#s(approx (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 6 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (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 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (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 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (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))) (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (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 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (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 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (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 (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (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 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (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 (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/.f64 (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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (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 (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (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 (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 3 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 phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (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 (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)))))
#s(approx (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2)))) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda2)) lambda2)) #s(literal 1/2 binary64))))
#s(approx (+ lambda1 (* -1/2 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda2 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.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 (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 (- lambda1 lambda2)) (cos phi2)) 2) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (/.f64 (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) 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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) 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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) 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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (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 (- (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 lambda2))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) 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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (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))) (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) 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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (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 (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) 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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (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 (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) 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))) (- (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 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)) (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 (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (-.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 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (.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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))) #s(literal 2 binary64)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (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 (+.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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64)))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) #s(literal 2 binary64))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) (.f64 #s(literal 2 binary64) (log.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) (log.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (- (pow lambda1 3) (pow lambda2 3)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))))))))
#s(approx (* (pow lambda2 3) (- (pow (/ lambda1 lambda2) 3) 1)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))))))))
#s(approx (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))) (.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) lambda1 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 lambda1 #s(literal 2 binary64)) lambda2))) lambda2)))))
#s(approx (/ (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)))) (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.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)))))) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.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)))))) #s(literal 2 binary64))) (.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 (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow lambda1 3)) (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.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)))))) #s(literal 3 binary64))))
#s(approx (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 3) (pow.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)))))) #s(literal 3 binary64)))
#s(approx (+ (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1))) (-.f64 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.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)))))) #s(literal 2 binary64))) (.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 (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (pow.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)))))) #s(literal 2 binary64)))
#s(approx (- (* lambda1 lambda1) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1)) (-.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (.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))) lambda1) (.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 (/ (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.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)))))) #s(literal 2 binary64))) (-.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 (- (* lambda1 lambda1) (pow (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2)) (-.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.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)))))) #s(literal 2 binary64))))
#s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (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 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))))
#s(approx (* lambda1 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.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 (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (+.f64 #s(literal 1 binary64) (.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 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 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 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (/.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 (+ (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) (pow.f64 phi1 #s(literal 2 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 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #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 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/2 binary64))))))
#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) (pow.f64 phi1 #s(literal 2 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 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #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 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #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) (pow.f64 phi1 #s(literal 2 binary64)))))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx phi1 phi1)
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/2 binary64))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))
#s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/2 binary64))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/2 binary64))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 #s(literal 1 binary64) (fma.f64 phi1 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 #s(literal 1 binary64) (fma.f64 phi1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) phi1)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 #s(literal 1 binary64) (fma.f64 phi1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi1 (-.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi1 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 1/2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) (fma.f64 phi1 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) (fma.f64 phi1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/6 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) (fma.f64 phi1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi1)) (.f64 phi1 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi1)) (.f64 phi1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/6 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi1)) (.f64 phi1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi1)) (.f64 phi1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal 1/120 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (sin phi1) phi1)
#s(approx (sin phi1) (.f64 phi1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))
#s(approx (sin phi1) (.f64 phi1 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin phi1) (.f64 phi1 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/2 binary64))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/2 binary64))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/2 binary64))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* -1/2 (pow phi1 2)) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))
#s(approx (pow phi1 2) (pow.f64 phi1 #s(literal 2 binary64)))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (* phi1 phi1) (pow.f64 phi1 #s(literal 2 binary64)))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/2 binary64))))))
#s(approx (+ (cos phi1) (cos phi2)) (+.f64 #s(literal 1 binary64) (cos.f64 phi2)))
#s(approx (+ (cos phi1) (cos phi2)) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 phi2) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))
#s(approx (+ (cos phi1) (cos phi2)) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 phi2) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))
#s(approx (+ (cos phi1) (cos phi2)) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 phi2) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/2 binary64))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 1/3 binary64) (/.f64 #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 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (/.f64 #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))))) (.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/720 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.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))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 #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 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (/.f64 #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))))) (.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.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))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (/.f64 #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))))) (.f64 #s(literal 2/45 binary64) (/.f64 #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 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (/.f64 #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))))) (.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.f64 #s(literal 1 binary64) (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 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/720 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 2/45 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (pow.f64 phi1 #s(literal 2 binary64)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/45 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1 binary64)))) (pow.f64 (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) (pow.f64 phi1 #s(literal 2 binary64)))))
#s(approx (pow (cos phi1) 2) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)))))
#s(approx (pow (cos phi1) 2) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/45 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1 binary64)))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (- (cos phi1) (cos (- lambda1 lambda2))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ 1 (* -1/2 (pow phi1 2))) #s(literal 1 binary64))
#s(approx (+ 1 (* -1/2 (pow phi1 2))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
#s(approx (+ (cos lambda2) (cos phi1)) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)))
#s(approx (+ (cos lambda2) (cos phi1)) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 lambda2) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))
#s(approx (+ (cos lambda2) (cos phi1)) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 lambda2) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))
#s(approx (+ (cos lambda2) (cos phi1)) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 lambda2) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/2 binary64))))))
#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) (pow.f64 phi1 #s(literal 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) (fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #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 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/2 binary64))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/2 binary64))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/2 binary64))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 phi1 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 phi1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) phi1)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 phi1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi1 (-.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi1 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 1/2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 phi1 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 phi1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1/2 binary64) phi1))))))
#s(approx (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 phi1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi1 (-.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi1 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 1/2 binary64))))))))
#s(approx (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) (cos.f64 (-.f64 lambda1 lambda2)))
#s(approx (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 phi1 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 phi1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/6 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (+ (cos (- lambda1 lambda2)) (* (cos (* 1/2 (PI))) (sin phi1))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 phi1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (/.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 7/8 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (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)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (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) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (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)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 61/240 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (.f64 #s(literal 7/8 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (+.f64 (/.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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (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)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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 2 binary64))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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 3 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.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 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 11/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (/.f64 (.f64 (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/12 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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 4 binary64)))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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 3 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.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 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/12 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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 3 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.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 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 11/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (/.f64 (.f64 (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/12 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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 4 binary64))))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/720 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal 151/720 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (.f64 #s(literal -1/360 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/24 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 4 binary64))))))))) (.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 11/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (/.f64 (.f64 (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/12 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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 4 binary64)))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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 3 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.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 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 #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/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 #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)))))))) (-.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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 #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/720 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 2/45 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 #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/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.f64 #s(literal 1 binary64) (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 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/720 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 2/45 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (pow.f64 phi1 #s(literal 2 binary64)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/45 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1 binary64)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 phi1)))) #s(literal 1 binary64))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/45 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1 binary64)))))
#s(approx (* 1/2 (cos (* 2 phi1))) #s(literal 1/2 binary64))
#s(approx (* 1/2 (cos (* 2 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
#s(approx (* 1/2 (cos (* 2 phi1))) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)))))
#s(approx (* 1/2 (cos (* 2 phi1))) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/45 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1 binary64)))))
#s(approx (cos (* 2 phi1)) #s(literal 1 binary64))
#s(approx (cos (* 2 phi1)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
#s(approx (cos (* 2 phi1)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 2/3 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 2 binary64)))))
#s(approx (cos (* 2 phi1)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 2/3 binary64) (*.f64 #s(literal -4/45 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 2 binary64)))))
#s(approx (* 2 phi1) (*.f64 #s(literal 2 binary64) phi1))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/24 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (+.f64 #s(literal 5/3 binary64) (.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/24 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (+.f64 #s(literal 5/3 binary64) (.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 #s(literal 47/15 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/24 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (+.f64 #s(literal 5/3 binary64) (.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 5/3 binary64) (.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/720 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/24 binary64) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -2/45 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 34/45 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/24 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (+.f64 #s(literal 5/3 binary64) (.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 7/8 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (+.f64 (/.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 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (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))))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (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 (fma.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 7/8 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (fma.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.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 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (+.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/720 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/720 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 61/240 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.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 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (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))))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.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/3 binary64) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 7/8 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (+.f64 (/.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 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (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))))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 7/8 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (fma.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.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 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (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 (fma.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 7/8 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (fma.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.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 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 #s(literal 2/45 binary64) (.f64 #s(literal -1/720 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 61/240 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 7/8 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (fma.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.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 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (+.f64 (/.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (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))))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (+.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/720 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (+.f64 (/.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 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (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))))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.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/3 binary64) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (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))))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.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 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.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 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 #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 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (/.f64 #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))))) (.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/720 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 #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 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (/.f64 #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))))) (.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.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))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (/.f64 #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))))) (.f64 #s(literal 2/45 binary64) (/.f64 #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 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (/.f64 #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))))) (.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.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)))))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 (- (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) (pow.f64 phi1 #s(literal 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 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #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 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos phi1) (cos (- lambda1 lambda2)))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (/.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 7/8 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (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)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (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) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (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)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 61/240 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (.f64 #s(literal 7/8 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (+.f64 (/.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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (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)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -3/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 7/8 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 3/2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 7/8 binary64) (.f64 #s(literal -61/240 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 3/2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))))
#s(approx (exp (* (log (cos phi1)) 3)) #s(literal 1 binary64))
#s(approx (exp (* (log (cos phi1)) 3)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -3/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
#s(approx (exp (* (log (cos phi1)) 3)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 7/8 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 3/2 binary64)))))
#s(approx (exp (* (log (cos phi1)) 3)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 7/8 binary64) (*.f64 #s(literal -61/240 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 3/2 binary64)))))
#s(approx (* (log (cos phi1)) 3) (*.f64 #s(literal -3/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))
#s(approx (* (log (cos phi1)) 3) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 3/2 binary64))))
#s(approx (* (log (cos phi1)) 3) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/15 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/4 binary64))) #s(literal 3/2 binary64))))
#s(approx (* (log (cos phi1)) 3) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -17/840 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/15 binary64))) #s(literal 1/4 binary64))) #s(literal 3/2 binary64))))
#s(approx (log (cos phi1)) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))
#s(approx (log (cos phi1)) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/12 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))
#s(approx (log (cos phi1)) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/45 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/12 binary64))) #s(literal 1/2 binary64))))
#s(approx (log (cos phi1)) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -17/2520 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/45 binary64))) #s(literal 1/12 binary64))) #s(literal 1/2 binary64))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.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 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.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 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 (pow.f64 phi1 #s(literal 2 binary64)) (+.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 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.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 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.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 (pow.f64 phi1 #s(literal 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)) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.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 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi1 #s(literal 2 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))))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (/.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 7/8 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (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)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (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) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (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)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 61/240 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (.f64 #s(literal 7/8 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (+.f64 (/.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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (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)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 3/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -3/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 7/8 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 3/2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 7/8 binary64) (.f64 #s(literal -61/240 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 3/2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (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) (pow.f64 phi1 #s(literal 2 binary64)))))
#s(approx (pow (cos phi1) 3) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 7/8 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 3/2 binary64)))))
#s(approx (pow (cos phi1) 3) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 7/8 binary64) (*.f64 #s(literal -61/240 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 3/2 binary64)))))
#s(approx (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.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 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.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 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))))) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 13/24 binary64) (.f64 #s(literal 1/3 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))))) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 13/24 binary64) (fma.f64 #s(literal 1/3 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2/45 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 151/720 binary64) (.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))))))) (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))))) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (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 phi1) (* (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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 13/24 binary64) (.f64 #s(literal 1/3 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) #s(literal 1/2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 13/24 binary64) (fma.f64 #s(literal 1/3 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2/45 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 151/720 binary64))))))) #s(literal 1/2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (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 (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (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 (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (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 (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (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 (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.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 2 binary64))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/12 binary64) (-.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 2 binary64))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/12 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/360 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/24 binary64))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))
#s(approx (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)))
#s(approx (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))
#s(approx (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/12 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))
#s(approx (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/12 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/360 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) #s(literal 1/24 binary64))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64))))
#s(approx (- (cos phi1) (* (cos lambda1) (cos phi2))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (- (cos phi1) (* (cos lambda1) (cos phi2))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (- (cos phi1) (* (cos lambda1) (cos phi2))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (- (cos phi1) (* (cos lambda1) (cos phi2))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 #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/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 #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)))))))) (-.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) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 #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/720 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 2/45 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 #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/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (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) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))
#s(approx (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (pow.f64 phi1 #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))
#s(approx (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))
#s(approx (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal -2/45 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))
#s(approx (cos phi1) (cos.f64 phi1))
#s(approx (* (cos (* 1/2 (PI))) (sin phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))
#s(approx (sin phi1) (sin.f64 phi1))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi1 #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 phi1 #s(literal 2 binary64)))) #s(literal 1/2 binary64))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))
#s(approx (+ (cos phi1) (cos phi2)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))
#s(approx (pow (cos phi1) 2) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
#s(approx (+ 1 (* -1/2 (pow phi1 2))) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))
#s(approx (+ 1 (* -1/2 (pow phi1 2))) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))))
#s(approx (* 1/2 (cos (* 2 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))
#s(approx (cos (* 2 phi1)) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
#s(approx (exp (* (log (cos phi1)) 3)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))
#s(approx (* (log (cos phi1)) 3) (*.f64 #s(literal 3 binary64) (log.f64 (cos.f64 phi1))))
#s(approx (log (cos phi1)) (log.f64 (cos.f64 phi1)))
#s(approx (pow (cos phi1) 3) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (sin.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (cos phi2) #s(literal 1 binary64))
#s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))
#s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #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 (pow.f64 phi2 #s(literal 2 binary64)) (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 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (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 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (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 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (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 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (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 (pow.f64 phi2 #s(literal 2 binary64)) (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 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (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 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))))))
#s(approx (+ (* (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))) (.f64 #s(literal 1/24 binary64) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 phi2 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (+ (cos phi1) (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal -1/6 binary64) (.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (cos.f64 (-.f64 lambda1 lambda2)))
#s(approx (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 phi2 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal -1/6 binary64) (.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))) #s(literal 1 binary64))
#s(approx (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))) (+.f64 #s(literal 1 binary64) (.f64 phi2 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))) (+.f64 #s(literal 1 binary64) (.f64 phi2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1/2 binary64) phi2)))))
#s(approx (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))) (+.f64 #s(literal 1 binary64) (.f64 phi2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi2 (-.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 1/2 binary64)))))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi2)) (.f64 phi2 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi2)) (.f64 phi2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/6 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi2)) (.f64 phi2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi2)) (.f64 phi2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal 1/120 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (sin phi2) phi2)
#s(approx (sin phi2) (.f64 phi2 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))
#s(approx (sin phi2) (.f64 phi2 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin phi2) (.f64 phi2 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))))))
#s(approx (+ (cos phi1) (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1)))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))
#s(approx (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 phi2 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 (sin.f64 (-.f64 lambda1 lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (* (sin (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal -1/6 binary64) (.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/6 binary64) (.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.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 (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) (+.f64 (cos.f64 phi1) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))) (.f64 #s(literal 1/24 binary64) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))))))
#s(approx (* (cos phi2) (cos (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))) (.f64 #s(literal 1/24 binary64) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/6 binary64) (.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (+.f64 #s(literal 1 binary64) (fma.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (+.f64 #s(literal 1 binary64) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (+.f64 #s(literal 1 binary64) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/6 binary64) (.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.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 (+ phi2 (* 1/2 (PI))))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (fma.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.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 (+ phi2 (* 1/2 (PI))))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.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 (+ phi2 (* 1/2 (PI))))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/6 binary64) (.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (sin (+ phi2 (* 1/2 (PI)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (sin (+ phi2 (* 1/2 (PI)))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (sin (+ phi2 (* 1/2 (PI)))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (.f64 phi2 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (sin (+ phi2 (* 1/2 (PI)))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/6 binary64) (.f64 phi2 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (+ phi2 (* 1/2 (PI))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (+ phi2 (* 1/2 (PI))) (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))))))
#s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (fma.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/6 binary64) (.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))) (.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))) (fma.f64 phi2 (.f64 (cos.f64 lambda1) (cos.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) (sin (+ phi2 (* 1/2 (PI))))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 (.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 lambda1) (cos.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) (sin (+ phi2 (* 1/2 (PI))))) (fma.f64 phi2 (fma.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/6 binary64) (.f64 phi2 (.f64 (cos.f64 lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 (cos.f64 lambda1) (cos.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 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (fma.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/6 binary64) (.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#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 (cos.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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/6 binary64) (.f64 phi2 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (+ 1 (* -1/2 (* phi2 phi2))) #s(literal 1 binary64))
#s(approx (+ 1 (* -1/2 (* phi2 phi2))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))
#s(approx (* -1/2 (* phi2 phi2)) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64))))
#s(approx (* phi2 phi2) (pow.f64 phi2 #s(literal 2 binary64)))
#s(approx (sin (+ phi2 (/ (PI) 2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (sin (+ phi2 (/ (PI) 2))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (sin (+ phi2 (/ (PI) 2))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (.f64 phi2 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (sin (+ phi2 (/ (PI) 2))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/6 binary64) (.f64 phi2 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (+ phi2 (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (+ phi2 (/ (PI) 2)) (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (* (* phi2 phi2) -1/2) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (fma.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (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 (/ (PI) 2))) (sin (- lambda1 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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (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 (/ (PI) 2))) (sin (- lambda1 lambda2))) (fma.f64 phi2 (fma.f64 phi2 (fma.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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda1 lambda2)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (fma.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 lambda2))) (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 lambda2)))) (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/6 binary64) (.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 lambda2)))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 lambda2)))) (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda2) (cos.f64 phi1)))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda2) (+.f64 (cos.f64 phi1) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda2))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda2) (+.f64 (cos.f64 phi1) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda2))))))))
#s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda2) (+.f64 (cos.f64 phi1) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda2)) (.f64 #s(literal 1/24 binary64) (cos.f64 lambda2)))))))))
#s(approx (+ (cos phi1) (cos phi2)) (+.f64 #s(literal 1 binary64) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (cos phi2)) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))
#s(approx (+ (cos phi1) (cos phi2)) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 phi1) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))
#s(approx (+ (cos phi1) (cos phi2)) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 phi1) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1/2 binary64))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (+.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)))))))))
#s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2))) (.f64 #s(literal 1/24 binary64) (sin.f64 (-.f64 (+.f64 lambda1 (.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2))))))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -2/45 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))))))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ (* (* phi2 phi2) -1/2) 1) #s(literal 1 binary64))
#s(approx (+ (* (* phi2 phi2) -1/2) 1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))
#s(approx (* (* phi2 phi2) (- (pow phi2 -2) 1/2)) #s(literal 1 binary64))
#s(approx (* (* phi2 phi2) (- (pow phi2 -2) 1/2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))
#s(approx (- (pow phi2 -2) 1/2) (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))))
#s(approx (- (pow phi2 -2) 1/2) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))) (pow.f64 phi2 #s(literal 2 binary64))))
#s(approx (pow phi2 -2) (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))))
#s(approx (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- 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 (- lambda1 lambda2))) (fma.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (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 (- lambda1 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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (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 (- lambda1 lambda2))) (fma.f64 phi2 (fma.f64 phi2 (fma.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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda1 lambda2)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) #s(literal 1 binary64))
#s(approx (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))
#s(approx (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2)) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64))))
#s(approx (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64))))
#s(approx (- (* 1/24 (* phi2 phi2)) 1/2) #s(literal -1/2 binary64))
#s(approx (- (* 1/24 (* phi2 phi2)) 1/2) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))
#s(approx (* 1/24 (* phi2 phi2)) (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))))
#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 (pow.f64 phi2 #s(literal 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) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (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 (pow.f64 phi2 #s(literal 2 binary64)) (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 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (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) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
#s(approx (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 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 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 (pow.f64 phi2 #s(literal 2 binary64)) (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 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 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 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (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 (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) (+.f64 (cos.f64 lambda2) (fma.f64 lambda1 (sin.f64 lambda2) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 lambda2))))))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) (+.f64 (cos.f64 lambda2) (fma.f64 lambda1 (sin.f64 lambda2) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (fma.f64 #s(literal -1/2 binary64) (.f64 lambda1 (sin.f64 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/24 binary64) (cos.f64 lambda2) (.f64 #s(literal 1/24 binary64) (*.f64 lambda1 (sin.f64 lambda2)))))))))))
#s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) (+.f64 (cos.f64 lambda2) (fma.f64 lambda1 (sin.f64 lambda2) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (fma.f64 #s(literal -1/2 binary64) (.f64 lambda1 (sin.f64 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/24 binary64) (cos.f64 lambda2) (fma.f64 #s(literal 1/24 binary64) (.f64 lambda1 (sin.f64 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (cos.f64 lambda2) (.f64 #s(literal -1/720 binary64) (*.f64 lambda1 (sin.f64 lambda2))))))))))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))))))))
#s(approx (* (cos phi2) (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))))) (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64))))))) (.f64 #s(literal 1/24 binary64) (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda2 (+.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (pow.f64 lambda2 #s(literal 2 binary64)))))))))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))
#s(approx (+ 1 (* (cos lambda2) (cos phi2))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)))
#s(approx (+ 1 (* (cos lambda2) (cos phi2))) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda2))))))
#s(approx (+ 1 (* (cos lambda2) (cos phi2))) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 lambda2) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda2))))))))
#s(approx (+ 1 (* (cos lambda2) (cos phi2))) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 lambda2) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda2)) (.f64 #s(literal 1/24 binary64) (cos.f64 lambda2)))))))))
#s(approx (* (cos lambda2) (cos phi2)) (cos.f64 lambda2))
#s(approx (* (cos lambda2) (cos phi2)) (+.f64 (cos.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda2)))))
#s(approx (* (cos lambda2) (cos phi2)) (+.f64 (cos.f64 lambda2) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda2)))))))
#s(approx (* (cos lambda2) (cos phi2)) (+.f64 (cos.f64 lambda2) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda2)) (.f64 #s(literal 1/24 binary64) (cos.f64 lambda2))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1)))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi1) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda1))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi1) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda1))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (+.f64 (cos.f64 phi1) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda1)) (.f64 #s(literal 1/24 binary64) (cos.f64 lambda1)))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 phi2 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal -1/6 binary64) (.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 phi2 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal -1/6 binary64) (.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))))))
#s(approx (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 2/45 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/3 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (- 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 2/45 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -2/45 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/24 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (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 (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (/.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -61/240 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/720 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (+.f64 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -61/240 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/720 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))))) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (.f64 (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/720 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -2/45 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (.f64 (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64))))))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))))))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 #s(literal -1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 1/360 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (.f64 (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (/.f64 (-.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
#s(approx (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (+.f64 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (.f64 (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64))))))) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (+.f64 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2/45 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/720 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/720 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (.f64 (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 #s(literal -1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 1/360 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))))))) (+.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (.f64 (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64))))))) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (+.f64 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (-.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -2/45 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/720 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/720 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -2/45 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/720 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/720 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))))))))))))) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -2/45 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/720 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))))))))))) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 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) (pow.f64 phi2 #s(literal 2 binary64)))))
#s(approx (pow (cos phi2) 2) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1 binary64)))))
#s(approx (pow (cos phi2) 2) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/45 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1 binary64)))))
#s(approx (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 #s(literal 1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 1/360 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 2/45 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.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 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))) (*.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (*.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 47/15 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/720 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -34/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -2/45 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (*.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 #s(literal 5/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal -1/3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 5/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (- (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 #s(literal 5/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal -1/3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 #s(literal 5/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -34/45 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -2/45 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))))))) (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal -1/3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 47/15 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -34/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/720 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 2/45 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal -34/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 1/360 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal -1/3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -34/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (fma.f64 #s(literal -47/15 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 #s(literal 5/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -34/45 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -2/45 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 5/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 #s(literal 5/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal -1/3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 #s(literal 5/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 #s(literal 5/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal -1/3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 #s(literal 5/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -34/45 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -2/45 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))))))) (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal -1/3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 47/15 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -34/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/720 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 2/45 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal -34/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 1/360 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal -1/3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 #s(literal 5/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -34/45 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -2/45 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 #s(literal 5/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))
#s(approx (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (*.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))))
#s(approx (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 #s(literal 5/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal -1/3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (*.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64))))))))))
#s(approx (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))))) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 #s(literal 5/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -34/45 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -2/45 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))))))) (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal -1/3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 47/15 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -34/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/720 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 2/45 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal -34/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 1/360 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal -1/3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 #s(literal 5/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal -1/3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))))))))
#s(approx (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (*.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))
#s(approx (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (*.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))
#s(approx (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 #s(literal 5/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal -1/3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))
#s(approx (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))) (fma.f64 #s(literal 3 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 #s(literal 5/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 #s(literal 5/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -34/45 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -2/45 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))))))) (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal -1/3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 47/15 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -34/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/720 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 2/45 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal -34/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 1/360 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal -1/3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal -1/3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (*.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))
#s(approx (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 #s(literal 5/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 #s(literal 5/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -34/45 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -2/45 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 #s(literal 5/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (fma.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (fma.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (fma.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))))
#s(approx (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (fma.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (fma.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (fma.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -34/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))))))))
#s(approx (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))
#s(approx (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))))
#s(approx (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))))) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))))
#s(approx (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -34/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (*.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))))))) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))))
#s(approx (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))
#s(approx (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))
#s(approx (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))))) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))
#s(approx (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -34/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (*.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))))))) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))
#s(approx (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))
#s(approx (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) (fma.f64 #s(literal -2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))
#s(approx (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal 5/3 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))
#s(approx (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -34/45 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))) (*.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))
#s(approx (pow (cos phi2) 4) #s(literal 1 binary64))
#s(approx (pow (cos phi2) 4) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))
#s(approx (pow (cos phi2) 4) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 5/3 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 2 binary64)))))
#s(approx (pow (cos phi2) 4) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 5/3 binary64) (*.f64 #s(literal -34/45 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))
#s(approx (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))
#s(approx (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))
#s(approx (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal -1/3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (*.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))
#s(approx (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal -1/3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 47/15 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -34/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/720 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 2/45 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal -34/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 1/360 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal -1/3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal -1/3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (fma.f64 #s(literal 3 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 4 binary64))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))
#s(approx (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))))
#s(approx (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))))))
#s(approx (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (fma.f64 #s(literal 3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal -1/3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))))))))))
#s(approx (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal 3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (fma.f64 #s(literal 3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal -1/3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -4 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (fma.f64 #s(literal 3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal -1/3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))))) (fma.f64 #s(literal 47/15 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -34/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/720 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 2/45 binary64) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))))))))))))))))
#s(approx (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))))
#s(approx (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))
#s(approx (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal -1/3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
#s(approx (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal -1/3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -34/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/720 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 2/45 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
#s(approx (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))
#s(approx (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2)) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/720 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 2/45 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
#s(approx (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) (-.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))
#s(approx (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) (-.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/3 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) #s(literal 2 binary64)))
#s(approx (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2) (-.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 2/45 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) #s(literal 2 binary64)))
#s(approx (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))
#s(approx (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/3 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))))
#s(approx (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 2/45 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))))
#s(approx (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
#s(approx (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -2/45 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))
#s(approx (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 3 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))
#s(approx (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))
#s(approx (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 47/15 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))) (.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))
#s(approx (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))
#s(approx (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))
#s(approx (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))
#s(approx (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -47/15 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))) (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))))
#s(approx (pow (cos phi2) 6) #s(literal 1 binary64))
#s(approx (pow (cos phi2) 6) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -3 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))
#s(approx (pow (cos phi2) 6) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 3 binary64)))))
#s(approx (pow (cos phi2) 6) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 4 binary64) (*.f64 #s(literal -47/15 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 3 binary64)))))
#s(approx (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (*.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
#s(approx (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))
#s(approx (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))
#s(approx (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal -34/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 1/360 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))
#s(approx (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)))
#s(approx (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64))))
#s(approx (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64))))
#s(approx (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (fma.f64 #s(literal -34/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64))))
#s(approx (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)) (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -47/15 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -34/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (* (cos phi2) (cos lambda2)) (cos.f64 lambda2))
#s(approx (* (cos phi2) (cos lambda2)) (+.f64 (cos.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda2)))))
#s(approx (* (cos phi2) (cos lambda2)) (+.f64 (cos.f64 lambda2) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda2)))))))
#s(approx (* (cos phi2) (cos lambda2)) (+.f64 (cos.f64 lambda2) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda2)) (.f64 #s(literal 1/24 binary64) (cos.f64 lambda2))))))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (+ (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -61/240 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/720 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/720 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (pow (cos phi1) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/720 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (pow (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/24 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/720 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal -2/45 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal 1/24 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/720 binary64) (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)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))
#s(approx (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -2/45 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -61/240 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/720 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (fma.f64 #s(literal -3/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 #s(literal 7/8 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -61/240 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (*.f64 #s(literal 7/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))
#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 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.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))))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (cos phi1) (cos phi1)) (- (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (* (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.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))))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (- (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/720 binary64) (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)))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))
#s(approx (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))
#s(approx (+ 1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -2/45 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))
#s(approx (/ (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (.f64 #s(literal -1/24 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (.f64 #s(literal -1/24 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (.f64 #s(literal -1/24 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2/45 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.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 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -2/45 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 (-.f64 lambda1 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 (pow.f64 phi2 #s(literal 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 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/24 binary64) (.f64 (pow.f64 phi2 #s(literal 2 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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (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 (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (/.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -61/240 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/720 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (+.f64 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (fma.f64 #s(literal -3/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 #s(literal 7/8 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (exp (* (log (cos phi1)) 3))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -61/240 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (*.f64 #s(literal 7/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.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))))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.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))))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #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 (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 (pow.f64 phi2 #s(literal 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 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/24 binary64) (.f64 (pow.f64 phi2 #s(literal 2 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 (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 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))))) (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 (pow.f64 phi2 #s(literal 2 binary64)) (.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 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (*.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 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 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))))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (/.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -61/240 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/720 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (+.f64 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (fma.f64 #s(literal -3/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 #s(literal 7/8 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))
#s(approx (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -61/240 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (*.f64 #s(literal 7/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))
#s(approx (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.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))))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.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))))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/24 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (- (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/24 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/720 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal -2/45 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/720 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (*.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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))) (*.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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) (*.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 phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -2/45 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/720 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))))))))))) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
#s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 1/360 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
#s(approx (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64)))
#s(approx (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (*.f64 (cos.f64 lambda1) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64))))
#s(approx (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 (cos.f64 lambda1) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 lambda1) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64))))
#s(approx (pow (- (cos phi1) (* (cos lambda1) (cos phi2))) 2) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 (cos.f64 lambda1) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 lambda1) (-.f64 (cos.f64 phi1) (cos.f64 lambda1))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 #s(literal 1/360 binary64) (*.f64 (cos.f64 lambda1) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))))))))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 lambda1)) #s(literal 2 binary64))))
#s(approx (- (cos phi1) (* (cos lambda1) (cos phi2))) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))
#s(approx (- (cos phi1) (* (cos lambda1) (cos phi2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda1)))) (cos.f64 lambda1)))
#s(approx (- (cos phi1) (* (cos lambda1) (cos phi2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/24 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda1))) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))))) (cos.f64 lambda1)))
#s(approx (- (cos phi1) (* (cos lambda1) (cos phi2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda1))) (.f64 #s(literal 1/24 binary64) (cos.f64 lambda1)))) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))))) (cos.f64 lambda1)))
#s(approx (* (cos lambda1) (cos phi2)) (cos.f64 lambda1))
#s(approx (* (cos lambda1) (cos phi2)) (+.f64 (cos.f64 lambda1) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda1)))))
#s(approx (* (cos lambda1) (cos phi2)) (+.f64 (cos.f64 lambda1) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda1)))))))
#s(approx (* (cos lambda1) (cos phi2)) (+.f64 (cos.f64 lambda1) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda1)) (.f64 #s(literal 1/24 binary64) (cos.f64 lambda1))))))))
#s(approx (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 2/45 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.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)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.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)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.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)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/3 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (- (pow (cos phi1) 2) (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2))) (-.f64 (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 2/45 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (exp (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2)) (fma.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -2/45 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (*.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) (*.f64 #s(literal 2 binary64) (log.f64 (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) (fma.f64 #s(literal -1 binary64) (pow.f64 phi2 #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (log.f64 (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) (fma.f64 #s(literal 2 binary64) (log.f64 (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1 binary64)))))
#s(approx (* (log (* (cos (- lambda1 lambda2)) (cos phi2))) 2) (fma.f64 #s(literal 2 binary64) (log.f64 (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -2/45 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64)))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) (log.f64 (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) (+.f64 (log.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) (+.f64 (log.f64 (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/12 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (log (* (cos (- lambda1 lambda2)) (cos phi2))) (+.f64 (log.f64 (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/45 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/12 binary64))) #s(literal 1/2 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 (pow.f64 phi2 #s(literal 2 binary64)) (-.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 (pow.f64 phi2 #s(literal 2 binary64)) (fma.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 (pow.f64 phi2 #s(literal 2 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) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (-.f64 (fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 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 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2))))))))) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))))
#s(approx (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
#s(approx (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 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 (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (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 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))))))
#s(approx (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (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.f64 phi2))
#s(approx (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))
#s(approx (sin phi2) (sin.f64 phi2))
#s(approx (sin (+ phi2 (* 1/2 (PI)))) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (+ phi2 (* 1/2 (PI))) phi2)
#s(approx (+ phi2 (* 1/2 (PI))) (.f64 phi2 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) phi2)))))
#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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))
#s(approx (+ 1 (* -1/2 (* phi2 phi2))) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64))))
#s(approx (+ 1 (* -1/2 (* phi2 phi2))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64))))
#s(approx (sin (+ phi2 (/ (PI) 2))) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (+ phi2 (/ (PI) 2)) phi2)
#s(approx (+ phi2 (/ (PI) 2)) (.f64 phi2 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) phi2)))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (* (* phi2 phi2) -1/2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (/.f64 (sin.f64 (-.f64 lambda1 lambda2)) (pow.f64 phi2 #s(literal 2 binary64))))))
#s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64))))
#s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64))))
#s(approx (* (* phi2 phi2) (- (pow phi2 -2) 1/2)) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64))))
#s(approx (* (* phi2 phi2) (- (pow phi2 -2) 1/2)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64))))
#s(approx (- (pow phi2 -2) 1/2) #s(literal -1/2 binary64))
#s(approx (- (pow phi2 -2) 1/2) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))
#s(approx (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 4 binary64))))
#s(approx (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) (.f64 (pow.f64 phi2 #s(literal 4 binary64)) (-.f64 #s(literal 1/24 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))))
#s(approx (+ 1 (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2))) (.f64 (pow.f64 phi2 #s(literal 4 binary64)) (-.f64 (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))))
#s(approx (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2)) (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 4 binary64))))
#s(approx (* (* phi2 phi2) (- (* 1/24 (* phi2 phi2)) 1/2)) (.f64 (pow.f64 phi2 #s(literal 4 binary64)) (-.f64 #s(literal 1/24 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))))
#s(approx (- (* 1/24 (* phi2 phi2)) 1/2) (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))))
#s(approx (- (* 1/24 (* phi2 phi2)) 1/2) (.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 #s(literal 1/24 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))))
#s(approx (pow (cos phi2) 2) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))
#s(approx (pow (cos phi2) 4) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))
#s(approx (pow (cos phi2) 6) (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (.f64 #s(literal -1 binary64) phi2))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (.f64 #s(literal -1 binary64) phi2)))))))
#s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) phi2))))))
#s(approx (+ 1 (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI)))))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) phi2))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) phi2)))))
#s(approx (sin (+ phi2 (* 1/2 (PI)))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (.f64 #s(literal -1 binary64) phi2))))
#s(approx (+ phi2 (* 1/2 (PI))) (.f64 #s(literal -1 binary64) (.f64 phi2 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) phi2)) #s(literal 1 binary64)))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) phi2)))))
#s(approx (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))) (.f64 (cos.f64 lambda1) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) phi2)))))
#s(approx (sin (+ phi2 (/ (PI) 2))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (.f64 #s(literal -1 binary64) phi2))))
#s(approx (+ phi2 (/ (PI) 2)) (.f64 #s(literal -1 binary64) (.f64 phi2 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) phi2)) #s(literal 1 binary64)))))
#s(approx (+ lambda1 (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (.f64 #s(literal -1 binary64) phi2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (atan2 (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (.f64 #s(literal -1 binary64) phi2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) phi2)))))
#s(approx (* (sin (neg lambda2)) (sin (+ phi2 (* 1/2 (PI))))) (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) phi2)))))

eval3.7s (12%)

Memory: -151.2MiB live, 6 242.5MiB allocated; 2.9s collecting garbage
Compiler: Compiled 1 646 482 to 57 893 computations (96.5% saved)

prune807.0ms (2.6%)

Memory

4.8MiB live, 2 157.8MiB allocated; 117ms collecting garbage

Pruning

127 alts after pruning (88 fresh and 39 done)

	Pruned	Kept	Total
New	13 317	88	13 405
Fresh	0	0	0
Picked	69	34	103
Done	0	5	5
Total	13 386	127	13 513

Accuracy

100.0%

Counts

13 513 → 127

Alt Table

Click to see full alt table

Status	Accuracy	Program
	39.6%	(/.f64 (-.f64 (.f64 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 2 binary64))) (-.f64 lambda1 (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #s(approx (cos phi2) #s(literal 1 binary64)) (cos.f64 phi1)))))
	38.2%	(/.f64 (-.f64 (.f64 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 2 binary64))) #s(approx (- lambda1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))) lambda1))))))
	49.8%	(/.f64 (+.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)) (pow.f64 lambda1 #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #s(approx (cos phi2) #s(literal 1 binary64)) (cos.f64 phi1))) lambda1))))
✓	78.2%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.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))))))))
	17.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 #s(approx (+ ( lambda2 lambda2) (* lambda1 lambda2)) (.f64 lambda2 (+.f64 lambda1 lambda2))))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
	43.5%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (exp.f64 (.f64 (log.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2))))))
	70.2%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)))) #s(approx (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow.f64 (-.f64 (cos.f64 phi1) #s(approx (* (cos lambda1) (cos phi2)) (cos.f64 phi2))) #s(literal 2 binary64))))))
	56.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (exp.f64 (.f64 (log.f64 (cos.f64 phi1)) #s(literal 3 binary64)))) (+.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))))
	77.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) #s(approx (pow (cos phi1) 3) #s(literal 1 binary64))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #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)))))))))
	58.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (/ (pow (cos phi1) 2) (- (cos phi1) ( (cos (- lambda1 lambda2)) (cos phi2)))) #s(approx (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) -1) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) #s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
	73.3%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1 binary64) (/.f64 #s(approx (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda2) lambda1))) lambda1) #s(approx ( -1/2 (cos lambda2)) #s(literal -1/2 binary64))))))))))
	34.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (.f64 (.f64 lambda1 lambda1) #s(approx (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) #s(approx (- (/ 1 (pow lambda1 2)) 1/2) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))))))))))
	57.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 #s(approx (sin lambda2) lambda2))))))))
✓	68.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(approx (* (cos phi2) (cos lambda2)) (cos.f64 phi2))))))
	68.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (/ (/ (- (pow (pow (cos phi1) 2) 3) (pow (pow ( (cos (- lambda1 lambda2)) (cos phi2)) 2) 3)) (+ (* (pow (cos phi1) 2) (pow (cos phi1) 2)) (+ (* (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (* (pow (cos phi1) 2) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 #s(approx (+ (* -1 (* (pow phi1 2) (+ (* 3 (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/ (* (+ (* -1/2 (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4))))) (* (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (- (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 2))) (- 1 (* (pow (cos phi2) 6) (pow (cos (- lambda1 lambda2)) 6)))) (* (pow (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) 2) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)))))) (/ 1 (* (+ 1 (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))) (- 1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 6 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 6 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
	59.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (/ (- (+ 1/2 ( 1/2 (cos (* 2 phi1)))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) #s(approx (/ (- (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))))))
	57.3%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (/ (- ( (pow (cos phi1) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2))) (* (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(approx (/ (- 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow (cos phi2) 2) (* (pow (cos (- lambda1 lambda2)) 2) (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))))))) (pow (- 1 (* (cos phi2) (cos (- lambda1 lambda2)))) 2)) (/.f64 (-.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))
	67.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (/ (+ (pow ( (cos (- lambda1 lambda2)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) #s(approx (/ (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 3)) (- (+ 1 (pow (* (cos phi2) (cos (- lambda1 lambda2))) 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(approx (/ (+ 1 (pow (cos (- lambda1 lambda2)) 3)) (- (+ 1 (pow (cos (- lambda1 lambda2)) 2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (neg.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (neg.f64 lambda2)))))))))
	57.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) ( (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 #s(approx (- lambda1 lambda2) lambda1))))))))
	58.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (sin.f64 #s(approx (- (+ lambda1 (* 1/2 (PI))) lambda2) lambda1)))))))
✓	78.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
✓	63.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
✓	62.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
	57.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(approx (+ (cos phi1) (cos phi2)) (+.f64 #s(literal 1 binary64) (cos.f64 phi2)))))))
	51.2%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 (/.f64 (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2) #s(approx (+ 1 (* (/ lambda1 lambda2) 1)) (.f64 lambda1 #s(approx (+ (/ 1 lambda1) (/ 1 lambda2)) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)) lambda2)))))) lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	82.2%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 (/.f64 #s(approx (- (pow (/ lambda1 lambda2) 3) 1) #s(literal -1 binary64)) (fma.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2) #s(approx (+ 1 (* (/ lambda1 lambda2) 1)) (.f64 lambda1 (+.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 #s(literal 1 binary64) lambda2)))))) lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
✓	69.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
	59.5%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(approx (+ (cos phi1) (cos phi2)) (+.f64 #s(literal 1 binary64) (cos.f64 phi2)))))))
✓	63.2%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #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))))) (cos.f64 phi2) (cos.f64 phi1)))))
✓	63.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #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))))) (cos.f64 phi2) (cos.f64 phi1)))))
✓	63.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1)))) (cos.f64 phi2) (cos.f64 phi1)))))
	81.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 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))))))))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (sin lambda1) lambda1) (sin.f64 lambda2)))))))
✓	77.7%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 (cos.f64 lambda2))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2) #s(literal 1 binary64)))))
	98.3%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 #s(approx (+ (cos lambda2) ( -1/2 (* lambda1 (neg (sin lambda2))))) (.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) lambda1) (cos lambda2)) (cos.f64 lambda2)))))))
✓	77.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (+.f64 (neg.f64 (sin.f64 lambda2)) #s(approx (* lambda1 (cos 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)))))
✓	87.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (neg.f64 (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
✓	87.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
✓	71.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))) (cos.f64 phi2) #s(literal 1 binary64)))))
✓	71.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))))))
	62.7%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) #s(approx (* (cos lambda2) (cos phi2)) (cos.f64 phi2)))))))
	64.3%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) #s(approx (* (cos lambda2) (cos phi2)) (cos.f64 lambda2)))))))
	73.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(approx (+ (neg (sin lambda2)) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (neg (sin lambda2))))))) (.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 lambda2) (pow.f64 lambda1 #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 #s(approx (- (* (* (cos lambda2) lambda1) -1/2) (neg (sin lambda2))) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))))
✓	77.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (-.f64 (.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
	62.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) (+.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 #s(literal 1/6 binary64) lambda2))) #s(literal 1 binary64))))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
	44.3%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2))))) #s(approx (+ (neg (sin lambda2)) (* lambda1 (cos lambda2))) #s(approx (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))) lambda2) (.f64 #s(literal -1/2 binary64) lambda1)) lambda2)) #s(literal 1/6 binary64)))))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
	71.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (sin.f64 #s(approx (+ lambda2 (/ (PI) 2)) lambda2)) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
✓	81.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) #s(approx ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(approx (+ (* -1 (* lambda1 (* (cos phi2) (neg (sin lambda2))))) (* (cos phi2) (cos lambda2))) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))))))
✓	81.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
	81.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (sin lambda1) lambda1) (sin.f64 lambda2)))))))
	81.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (fma.f64 #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
	81.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin 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)))))))))))
✓	67.7%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2)))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
✓	74.3%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2)))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda2) (cos.f64 phi1))))))
	63.5%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2)))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(approx (+ (cos phi1) (cos phi2)) (+.f64 #s(literal 1 binary64) (cos.f64 phi1)))))))
✓	62.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (cos lambda2) lambda1) (neg (sin lambda2))) lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 #s(approx (- lambda1 lambda2) lambda1))))))
✓	59.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (cos lambda2) lambda1) (neg (sin lambda2))) lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
	64.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) #s(approx (sin (neg lambda2)) (.f64 #s(literal -1 binary64) lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
	61.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) #s(approx (sin (neg lambda2)) (.f64 #s(literal -1 binary64) lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda2) (cos.f64 phi1))))))
	65.7%	(+.f64 lambda1 (atan2.f64 (.f64 #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))))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(approx (cos phi1) #s(approx (+ 1 (* -1/2 (pow phi1 2))) #s(literal 1 binary64))) #s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))))
✓	77.5%	(+.f64 lambda1 (atan2.f64 (.f64 #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)))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))))
	67.0%	(+.f64 lambda1 (atan2.f64 (.f64 #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)))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (cos (- lambda1 lambda2)) #s(approx (cos (neg lambda2)) #s(literal 1 binary64)))))))
	59.1%	(+.f64 lambda1 (atan2.f64 (.f64 #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 (- lambda1 lambda2)) (sin.f64 lambda1))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))))
✓	77.4%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))))
	67.1%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) #s(approx (cos (neg lambda2)) #s(literal 1 binary64)))))))
	61.6%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 #s(literal -1 binary64) lambda2)))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
	44.4%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) #s(approx (+ ( (* phi2 phi2) -1/2) 1) (.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64))))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))
✓	51.1%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (.f64 (.f64 phi2 phi2) (-.f64 (pow.f64 phi2 #s(literal -2 binary64)) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))))
✓	79.9%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
	79.7%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (cos (- lambda1 lambda2))) #s(approx (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))))))
	71.8%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) ( (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (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 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))
	59.5%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (/ (pow (cos phi1) 2) (- (cos phi1) ( (cos (- lambda1 lambda2)) (cos phi2)))) (/ (pow (* (cos (- lambda1 lambda2)) (cos phi2)) 2) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) #s(approx (/ (- (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (cos phi1) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (cos.f64 lambda1)))))))
	56.8%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 #s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) lambda2))) (cos.f64 phi2) #s(literal 1 binary64)))))
	63.4%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (sin (+ (- lambda1 lambda2) (/ (PI) 2))) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2))))))))
✓	70.2%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
	62.9%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) #s(approx (+ (cos phi1) (cos phi2)) (+.f64 #s(literal 1 binary64) (cos.f64 phi2)))))))
	79.9%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))) (+.f64 (cos.f64 phi1) #s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
	58.8%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (cos lambda2) lambda1) (neg (sin lambda2))) lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))
✓	72.2%	(+.f64 lambda1 (atan2.f64 #s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (+.f64 phi2 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (+.f64 (cos.f64 phi1) #s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))))
	54.1%	(+.f64 lambda1 (atan2.f64 #s(approx (* (sin (+ phi2 (/ (PI) 2))) (sin (- lambda1 lambda2))) (.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 #s(approx (+ phi2 ( 1/2 (PI))) phi2)))) (+.f64 (cos.f64 phi1) #s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))))
	80.4%	(+.f64 lambda1 (atan2.f64 #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)))) (+.f64 (cos.f64 phi1) #s(approx (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
✓	77.5%	(+.f64 lambda1 (atan2.f64 #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)))) (+.f64 (cos.f64 phi1) (.f64 #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 (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))))
	58.9%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 lambda1 (sin.f64 lambda2))))))))
	74.3%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
	63.5%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 #s(approx (+ (- lambda1 lambda2) (/ (PI) 2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda2))) (cos.f64 phi2) #s(literal 1 binary64)))))
	60.4%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))))
✓	57.7%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (sin.f64 #s(approx (+ phi2 (/ (PI) 2)) phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
✓	78.9%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #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 (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))))
	69.7%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2))) #s(approx (* (cos lambda1) (sin (+ phi2 (* 1/2 (PI))))) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
	68.8%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (.f64 lambda2 (+.f64 lambda1 (.f64 #s(literal -1/2 binary64) lambda2))))))))))
	68.4%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))))))))
	79.7%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (*.f64 lambda1 (fma.f64 #s(literal -1 binary64) (sin.f64 (neg.f64 lambda2)) (/.f64 (cos.f64 (neg.f64 lambda2)) lambda1)))))))))
	57.7%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))))
	69.2%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) #s(literal 1 binary64)))))))
✓	66.8%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))))
✓	56.8%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) #s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))))
	63.0%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))))
	66.8%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) #s(approx (+ 1 (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 lambda2))))))))
✓	55.3%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))))
	57.0%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (sin (+ phi2 (/ (PI) 2))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 #s(approx (+ phi2 ( 1/2 (PI))) phi2)))))))
	69.3%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 lambda2 #s(approx (- (/ lambda1 lambda2) 1) (.f64 lambda1 (-.f64 (/.f64 #s(literal 1 binary64) lambda2) (/.f64 #s(literal 1 binary64) lambda1)))))))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
	57.4%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 #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 phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
	54.8%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) #s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))))
	63.5%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(approx (+ (cos phi1) (cos (- lambda1 lambda2))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
	56.7%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 #s(literal -1 binary64) lambda2)))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) #s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))))
	55.1%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 #s(literal -1 binary64) lambda2)))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))))
✓	58.9%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ ( lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1))))))
	58.4%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))
	79.7%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) #s(approx (* lambda1 (cos (neg lambda2))) lambda1)))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
✓	73.1%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2)))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
	53.3%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) #s(approx (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))))
	53.0%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(approx (+ 1 (+ (* -1/2 (* phi1 phi1)) (* (cos phi2) (cos (- lambda1 lambda2))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))))
	67.6%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) (+.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) lambda1 (.f64 #s(literal 1/6 binary64) lambda2))) #s(literal 1 binary64))))))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
	67.4%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) (+.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda2)) #s(literal 1 binary64))))))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
	59.0%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) lambda1))) #s(approx (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
	60.9%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) #s(approx (sin (neg lambda2)) (.f64 #s(literal -1 binary64) lambda2)))) #s(approx (+ (cos phi1) ( (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
	20.7%	#s(approx (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))
	40.5%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx (+ ( (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) (fma.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))))
	27.2%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx (+ ( (cos phi2) (cos (- lambda1 lambda2))) (* (cos (* 1/2 (PI))) (sin phi1))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))))
	40.5%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx ( (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2)))) (.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))))
	24.2%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) 1)) (cos (- lambda1 lambda2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos (- lambda1 lambda2)) (+ (cos phi2) (* (cos (* 1/2 (PI))) (sin phi2))))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))))
✓	80.8%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) lambda1) #s(literal 1 binary64)) lambda1))
✓	63.4%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (fma.f64 (cos.f64 #s(approx (/ (- (pow lambda1 3) (pow lambda2 3)) (+ (* lambda1 lambda1) (+ (* lambda2 lambda2) (* lambda1 lambda2)))) lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1))
	57.8%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (+.f64 (/.f64 (atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))) lambda1) #s(literal 1 binary64)) lambda1))
	79.8%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (+.f64 (/.f64 (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) lambda1) #s(literal 1 binary64)) lambda1))
	58.9%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (+.f64 (/.f64 (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (fma.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1))
	68.9%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 #s(approx (+ (/ (atan2 ( (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) 1) (/.f64 (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) lambda1)) lambda1))
✓	52.3%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)

Compiler

Compiled 24 272 to 6 545 computations (73% saved)

regimes584.0ms (1.9%)

Memory

15.4MiB live, 1 396.4MiB allocated; 53ms collecting garbage

Counts

303 → 1

Calls

Call 1

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

123.0ms	lambda1
77.0ms	phi1
77.0ms	phi2
74.0ms	lambda2
73.0ms	(cos.f64 phi1)

Results

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

Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes605.0ms (1.9%)

Memory

106.6MiB live, 1 247.1MiB allocated; 190ms collecting garbage

Counts

268 → 1

Calls

Call 1

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

Outputs

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

Calls

7 calls:

110.0ms	lambda2
110.0ms	phi1
104.0ms	lambda1
69.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))))))
68.0ms	phi2

Results

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

Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes499.0ms (1.6%)

Memory

2.6MiB live, 881.0MiB allocated; 145ms collecting garbage

Counts

234 → 1

Calls

Call 1

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

Calls

7 calls:

105.0ms	phi2
98.0ms	(cos.f64 phi1)
58.0ms	lambda1
57.0ms	lambda2
57.0ms	phi1

Results

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

Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes285.0ms (0.9%)

Memory

42.9MiB live, 569.5MiB allocated; 37ms collecting garbage

Counts

157 → 1

Calls

Call 1

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

Calls

7 calls:

53.0ms	lambda2
39.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))))))
39.0ms	phi2
37.0ms	phi1
37.0ms	lambda1

Results

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

Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes330.0ms (1.1%)

Memory

-5.3MiB live, 583.9MiB allocated; 86ms collecting garbage

Counts

155 → 1

Calls

Call 1

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

Outputs

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

Calls

7 calls:

59.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))))))
48.0ms	(cos.f64 phi2)
39.0ms	phi1
38.0ms	lambda2
37.0ms	phi2

Results

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

Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes265.0ms (0.8%)

Memory

39.5MiB live, 551.7MiB allocated; 20ms collecting garbage

Counts

153 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

7 calls:

39.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))))))
38.0ms	lambda2
37.0ms	phi2
37.0ms	phi1
36.0ms	lambda1

Results

Accuracy	Segments	Branch
98.3%	3	`(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))`
90.0%	2	`lambda1`
98.9%	3	`lambda2`
94.1%	2	`phi2`
93.6%	2	`(cos.f64 phi1)`
94.1%	2	`(cos.f64 phi2)`
93.5%	2	`phi1`

Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes63.0ms (0.2%)

Memory

-12.1MiB live, 97.9MiB allocated; 24ms collecting garbage

Counts

152 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

55.0ms

lambda2

Results

Accuracy	Segments	Branch
98.6%	3	`lambda2`

Compiler

Compiled 1 to 4 computations (-300% saved)

regimes226.0ms (0.7%)

Memory

10.7MiB live, 478.9MiB allocated; 19ms collecting garbage

Counts

151 → 2

Calls

Call 1

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

Outputs

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

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

Calls

6 calls:

38.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))))))
37.0ms	lambda2
37.0ms	phi1
36.0ms	(cos.f64 phi2)
36.0ms	phi2

Results

Accuracy	Segments	Branch
91.2%	2	`phi1`
91.2%	2	`(cos.f64 phi1)`
90.5%	2	`(cos.f64 phi2)`
90.8%	2	`phi2`
90.6%	4	`(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))`
89.1%	3	`lambda2`

Compiler

Compiled 27 to 36 computations (-33.3% saved)

regimes62.0ms (0.2%)

Memory

-11.7MiB live, 129.3MiB allocated; 6ms collecting garbage

Counts

111 → 2

Calls

Call 1

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

Outputs

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

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

Calls

2 calls:

28.0ms	phi1
27.0ms	(cos.f64 phi1)

Results

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

Compiler

Compiled 3 to 9 computations (-200% saved)

regimes201.0ms (0.6%)

Memory

-16.7MiB live, 251.1MiB allocated; 51ms collecting garbage

Counts

105 → 2

Calls

Call 1

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

Outputs

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

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

Calls

5 calls:

73.0ms	lambda1
43.0ms	phi1
28.0ms	phi2
27.0ms	(cos.f64 phi2)
25.0ms	(cos.f64 phi1)

Results

Accuracy	Segments	Branch
80.9%	1	`lambda1`
88.9%	2	`(cos.f64 phi2)`
88.9%	2	`phi2`
85.4%	2	`phi1`
85.4%	2	`(cos.f64 phi1)`

Compiler

Compiled 7 to 22 computations (-214.3% saved)

regimes281.0ms (0.9%)

Memory

17.4MiB live, 164.8MiB allocated; 5ms collecting garbage

Counts

91 → 2

Calls

Call 1

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

Outputs

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

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

Calls

4 calls:

155.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))))))
74.0ms	(cos.f64 phi2)
26.0ms	phi2
21.0ms	lambda2

Results

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

Compiler

Compiled 24 to 27 computations (-12.5% saved)

regimes32.0ms (0.1%)

Memory

-34.7MiB live, 57.5MiB allocated; 8ms collecting garbage

Counts

84 → 2

Calls

Call 1

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

Outputs

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

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

Calls

1 calls:

25.0ms

phi2

Results

Accuracy	Segments	Branch
85.6%	2	`phi2`

Compiler

Compiled 1 to 4 computations (-300% saved)

regimes38.0ms (0.1%)

Memory

31.9MiB live, 78.0MiB allocated; 2ms collecting garbage

Counts

68 → 2

Calls

Call 1

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

Outputs

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

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

Calls

2 calls:

16.0ms	phi2
15.0ms	(cos.f64 phi2)

Results

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

Compiler

Compiled 3 to 9 computations (-200% saved)

regimes58.0ms (0.2%)

Memory

-10.5MiB live, 129.8MiB allocated; 14ms collecting garbage

Counts

46 → 2

Calls

Call 1

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

Outputs

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

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

Calls

4 calls:

17.0ms	(cos.f64 phi1)
14.0ms	(cos.f64 phi2)
14.0ms	phi1
12.0ms	phi2

Results

Accuracy	Segments	Branch
79.8%	1	`(cos.f64 phi1)`
79.8%	1	`phi1`
82.5%	2	`phi2`
82.9%	2	`(cos.f64 phi2)`

Compiler

Compiled 6 to 18 computations (-200% saved)

regimes59.0ms (0.2%)

Memory

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

Outputs

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

Calls

5 calls:

14.0ms	lambda2
13.0ms	phi2
12.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	lambda1
9.0ms	(cos.f64 phi2)

Results

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

Compiler

Compiled 25 to 31 computations (-24% saved)

regimes73.0ms (0.2%)

Memory

24.8MiB live, 179.2MiB allocated; 16ms collecting garbage

Counts

33 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

7 calls:

18.0ms	phi1
10.0ms	lambda1
9.0ms	lambda2
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))))))
9.0ms	phi2

Results

Accuracy	Segments	Branch
76.5%	2	`(cos.f64 phi1)`
79.8%	3	`lambda2`
73.1%	1	`phi2`
76.7%	2	`lambda1`
79.7%	3	`(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))`
76.5%	2	`phi1`
73.1%	1	`(cos.f64 phi2)`

Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes62.0ms (0.2%)

Memory

-13.7MiB live, 178.6MiB allocated; 6ms collecting garbage

Counts

31 → 2

Calls

Call 1

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

Outputs

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

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

Calls

7 calls:

10.0ms	lambda1
9.0ms	lambda2
9.0ms	phi2
8.0ms	(cos.f64 phi1)
8.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
69.3%	1	`phi2`
69.3%	1	`(cos.f64 phi2)`
72.8%	2	`(cos.f64 phi1)`
72.8%	2	`phi1`
71.2%	2	`lambda1`
74.0%	3	`(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))`
71.7%	2	`lambda2`

Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes18.0ms (0.1%)

Memory

6.0MiB live, 53.3MiB allocated; 1ms collecting garbage

Counts

30 → 2

Calls

Call 1

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

Outputs

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

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

Calls

2 calls:

8.0ms	(cos.f64 phi1)
8.0ms	phi1

Results

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

Compiler

Compiled 3 to 9 computations (-200% saved)

regimes17.0ms (0.1%)

Memory

4.9MiB live, 53.9MiB allocated; 2ms collecting garbage

Counts

5 → 1

Calls

Call 1

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

Outputs

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

Calls

7 calls:

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

Results

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

Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes14.0ms (0%)

Memory

0.9MiB live, 48.5MiB allocated; 1ms collecting garbage

Counts

4 → 2

Calls

Call 1

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

Outputs

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

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

Calls

7 calls:

3.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	phi2
2.0ms	lambda2
2.0ms	lambda1

Results

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

Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes12.0ms (0%)

Memory

-6.0MiB live, 41.7MiB allocated; 0ms collecting garbage

Counts

3 → 1

Calls

Call 1

Inputs

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

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

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

Outputs

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

Calls

7 calls:

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

Results

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

Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes8.0ms (0%)

Memory

-17.3MiB live, 30.5MiB allocated; 1ms collecting garbage

Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts

1 → 1

Calls

Call 1

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

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

Calls

7 calls:

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

Results

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

Compiler

Compiled 28 to 40 computations (-42.9% saved)

bsearch74.0ms (0.2%)

Memory

8.5MiB live, 199.3MiB allocated; 5ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	predicate-same
1×	narrow-enough

Steps

Time	Left	Right
30.0ms	4.613785311652482e-20	1.1785856509977055e-13
40.0ms	-1.395315132705692	-8.788867149680942e-5

Samples

38.0ms	58×	1	valid
21.0ms	166×	0	valid

Compiler

Compiled 1 087 to 777 computations (28.5% saved)

Precisions

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

ival-cos: 33.0ms (65.1% of total)

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

adjust: 3.0ms (5.9% of total)

ival-mult!: 3.0ms (5.9% of total)

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

ival-add!: 1.0ms (2% of total)

ival-sub!: 1.0ms (2% of total)

bsearch4.0ms (0%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	predicate-same
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	4.613785311652482e-20	1.1785856509977055e-13
2.0ms	-1.395315132705692	-8.788867149680942e-5

Compiler

Compiled 1 367 to 945 computations (30.9% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.9999997383906334	0.9999999714755271

Compiler

Compiled 23 to 21 computations (8.7% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.9999997383906334	0.9999999714755271

Compiler

Compiled 23 to 21 computations (8.7% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.9969755310131688	0.999939071595459

Compiler

Compiled 22 to 21 computations (4.5% saved)

bsearch21.0ms (0.1%)

Memory

-10.0MiB live, 39.1MiB allocated; 11ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
20.0ms	61336971847412.81	69378397313545.055

Samples

16.0ms	15×	1	valid
2.0ms	17×	0	valid

Compiler

Compiled 219 to 157 computations (28.3% saved)

Precisions

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

adjust: 8.0ms (46.7% of total)

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

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

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

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

ival-mult!: 0.0ms (0% of total)

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

bsearch1.0ms (0%)

Memory

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

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
0.0ms	61336971847412.81	69378397313545.055

Compiler

Compiled 203 to 151 computations (25.6% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.9672284658896428	0.9717772579951064

Compiler

Compiled 22 to 21 computations (4.5% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.8667992614142046	0.8829918414105257

Compiler

Compiled 22 to 21 computations (4.5% saved)

bsearch56.0ms (0.2%)

Memory

6.5MiB live, 149.1MiB allocated; 3ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	predicate-same
1×	narrow-enough

Steps

Time	Left	Right
5.0ms	4.613785311652482e-20	1.1785856509977055e-13
48.0ms	-1923699073.0785968	-19489471.867630154

Samples

38.0ms	71×	1	valid
8.0ms	57×	0	valid

Compiler

Compiled 1 199 to 801 computations (33.2% saved)

Precisions

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

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

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

adjust: 4.0ms (9.7% of total)

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

ival-mult!: 2.0ms (4.9% of total)

ival-add!: 1.0ms (2.4% of total)

ival-sub!: 1.0ms (2.4% of total)

bsearch1.0ms (0%)

Memory

-46.9MiB live, 1.9MiB allocated; 2ms collecting garbage

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.9999997383906334	0.9999999714755271

Compiler

Compiled 23 to 21 computations (8.7% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.9999997383906334	0.9999999714755271

Compiler

Compiled 23 to 21 computations (8.7% saved)

bsearch45.0ms (0.1%)

Memory

18.5MiB live, 112.5MiB allocated; 3ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
43.0ms	-9.58338609861087e-99	-3.758383462911037e-99

Samples

35.0ms	48×	1	valid
4.0ms	32×	0	valid

Compiler

Compiled 593 to 376 computations (36.6% saved)

Precisions

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

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

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

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

adjust: 2.0ms (5.5% of total)

ival-mult!: 1.0ms (2.8% of total)

ival-add!: 1.0ms (2.8% of total)

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

derivations687.0ms (2.2%)

Memory

18.4MiB live, 861.7MiB allocated; 30ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 1 763 to 250 computations (85.8% saved)

preprocess185.0ms (0.6%)

Memory

28.7MiB live, 410.3MiB allocated; 35ms collecting garbage

Remove

(abs phi2)

(abs phi1)

Compiler

Compiled 11 010 to 4 160 computations (62.2% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze706.0ms (2.3%)

sample5.8s (18.6%)

explain391.0ms (1.3%)

preprocess36.0ms (0.1%)

series24.0ms (0.1%)

rewrite203.0ms (0.7%)

eval56.0ms (0.2%)

prune19.0ms (0.1%)

series633.0ms (2%)

rewrite606.0ms (1.9%)

eval959.0ms (3.1%)

prune217.0ms (0.7%)

series1.7s (5.6%)

rewrite2.4s (7.7%)

eval2.4s (7.6%)

prune701.0ms (2.3%)

series2.4s (7.6%)

rewrite2.5s (8%)

eval3.7s (12%)

prune807.0ms (2.6%)

regimes584.0ms (1.9%)

regimes605.0ms (1.9%)

regimes499.0ms (1.6%)

regimes285.0ms (0.9%)

regimes330.0ms (1.1%)

regimes265.0ms (0.8%)

regimes63.0ms (0.2%)

regimes226.0ms (0.7%)

regimes62.0ms (0.2%)

regimes201.0ms (0.6%)

regimes281.0ms (0.9%)

regimes32.0ms (0.1%)

regimes38.0ms (0.1%)

regimes58.0ms (0.2%)

regimes59.0ms (0.2%)

regimes73.0ms (0.2%)

regimes62.0ms (0.2%)

regimes18.0ms (0.1%)

regimes17.0ms (0.1%)

regimes14.0ms (0%)

regimes12.0ms (0%)

regimes8.0ms (0%)

bsearch74.0ms (0.2%)

bsearch4.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch21.0ms (0.1%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch56.0ms (0.2%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch45.0ms (0.1%)

derivations687.0ms (2.2%)

preprocess185.0ms (0.6%)

end0.0ms (0%)

Profiling